پیغام رکورد تکراری

[TheMatrix]

سلام به دوستان.
من با MS Access 2003 کار میکنم میخواستم ببینم که اگه تو یه Table وقتی یه مقدار تکراری (مثلا نام خانوادگی) رو تو یه رکورد اضافه کنیم یه پیغام بده که این نام خانوادگی قبلا بوده.
نکته: اجازه اضافه کردن رو بده ولی یه پیغام به عنوان اطلاع رسانی نشون بده.
ممنون.:لبخندساده:

[smderfan]

سلام
شما می تونید برای شناسایی فاکتور فوق از فرمان Dlookup اسفاده کنید :

For numerical values:
DLookup("FieldName", "TableName", "Criteria = " & forms!FormName!ControlName)

For strings: (note the apostrophe before and after the value)
DLookup("FieldName", "TableName", "Criteria = '" & forms!FormName!ControlName & "'")

dates:
DLookup("FieldName", "TableName", "Criteria = #" & forms!FormName!ControlName & "#")

[smderfan]

سلام
شما می تونید برای شناسایی فاکتور فوق از فرمان Dlookup اسفاده کنید :

For numerical values:
DLookup("FieldName", "TableName", "Criteria = " & forms!FormName!ControlName)

For strings: (note the apostrophe before and after the value)
DLookup("FieldName", "TableName", "Criteria = '" & forms!FormName!ControlName & "'")

dates:
DLookup("FieldName", "TableName", "Criteria = #" & forms!FormName!ControlName & "#")

[HPARHIZI]

سلام
شما می تونید برای شناسایی فاکتور فوق از فرمان Dlookup اسفاده کنید :

For numerical values:
DLookup("FieldName", "TableName", "Criteria = " & forms!FormName!ControlName)

For strings: (note the apostrophe before and after the value)
DLookup("FieldName", "TableName", "Criteria = '" & forms!FormName!ControlName & "'")

dates:
DLookup("FieldName", "TableName", "Criteria = #" & forms!FormName!ControlName & "#")


سلام
خيلي ممنون
اگر ممكنه يه مثال نمونه در اين خصوص هم ارائه بديد ممنون ميشم
با تشكر

[TheMatrix]

سلام
شما می تونید برای شناسایی فاکتور فوق از فرمان Dlookup اسفاده کنید :

For numerical values:
DLookup("FieldName", "TableName", "Criteria = " & forms!FormName!ControlName)

For strings: (note the apostrophe before and after the value)
DLookup("FieldName", "TableName", "Criteria = '" & forms!FormName!ControlName & "'")

dates:
DLookup("FieldName", "TableName", "Criteria = #" & forms!FormName!ControlName & "#")


یه خورده بیشتر توضیح میدین؟

[مهدی قربانی]

سلام
نمونه موجود در اين تاپيك ميتونه كمكتون كنه :
http://barnamenevis.org/forum/%D9%BE%D8%A7%DB%8C%DA%AF%D8%A7%D9%87-%D8%AF%D8%A7%D8%AF%D9%87-ms-access/97408-%D8%B9%D8%AF%D9%85-%D8%AC%D8%A7%D8%A8%D8%AC%D8%A7%D8%A6%DB%8C-%D9%85%DA%A9%D8%A7%D9%86-%D9%86%D9%85%D8%A7-%D8%AF%D8%B1-%D9%85%D9%82%D8%A7%D8%AF%DB%8C%D8%B1-%D8%AA%DA%A9%D8%B1%D8%A7%D8%B1%DB%8C.html

[smderfan]

سلام ؛ ببخشید که دیر شد.

If DLookup("FieldName", "TableName", "Criteria = '" & [ControlName] & "'") >= 1 Then
MsgBox "نام خانوادگي مورد نظر در بانک وجود دارد"
End If
FieldName : فیلد نام خانوادگی
TableName : نام Table
Criteria : فیلد نام خانوادگی
[ControlName] : نام Text box ی که نام خانوادگی در آن قرار دارد

[TheMatrix]

سلام باز هم اگر میشه خیلی ساده تر توضیح بدید.
اصلا Dlookup چیه و اون کدهای مذکور رو چه طوری باید به کار ببریم؟

[smderfan]

سلام ؛
دوست عزیز ؛ نمونه را ببینید متوجه خواهید شد.

[dadsara]

سلام ؛
دوست عزیز ؛ نمونه را ببینید متوجه خواهید شد.
باسلام
دوست عزیز چنانچه مقدار در بانک وجود داشته باشد، آیا می توان با DlookUp خروجی را در یک لیست باکس به کاربر نشان داد.

[smderfan]

سلام
امکان خروجی با DlookUp وجود نداره شما فقط می تونید جستجو رو انجام بدید.
برای این کار می تونید بصورت زیر استفاده کنید.

SQL1 = "SELECT Table1.Lastname, Table1.name FROM Table1 WHERE (((Table1.Lastname)=[Forms]![Form1]![Text0]));"
Me.RecordSource = SQL1
If Me.Recordset.RecordCount >= 1 Then
MsgBox "نام خانوادگي مورد نظر در بانک وجود دارد", vbCritical, "توجه"
MsgBox Me!Name 'نام مورد نظر را نمايش مي دهد
End If