عدم ثبت اعداد تکراری در چند فیلد مختلف

[general007]

با سلام :گریه:
چگونه میتوان در هنگام ثبت اعداد تکراری در قسمتهایی که با رنگ سبز مشخص شده اند به کاربر اخطار داد
من با توجه به راهنمایی های دوستان این کار را برای یک فیلد انجام دادم ( اما برای چند فیلد ارور میدهد )لطفا من را راهنمایی و یا در صورت امکان فایل را اصلاح کنید .
باتشکر :متفکر:

[com12151337]

سلام
در تکست باکس هرکدام خواستید تکراری بودن را اعلام کنه این دستورا در AfterUpdate بنویسد فقط جایگزین کنید
Private Sub qNAME_AfterUpdate()
Dim sID As String
Dim stLinkCriteria As String
Dim rsc As DAO.Recordset

Set rsc = Me.RecordsetClone

sID = Me.qNAME.Value
stLinkCriteria = "[qNAME]=" & "'" & sID & "'"

If DCount("qNAME", "NAME", stLinkCriteria) > 0 Then
'Undo duplicate entry
Me.Undo
'Message box warning of duplication
MsgBox "نام پرسنل وارده " _
& sID & " تکراري است تصحيح نماييد ." _
& vbCr & vbCr, vbInformation, "اخطار در مشخصات نام "

End If

Set rsc = Nothing

End Sub

موفق باشی
یاعلی

[com12151337]

سلام
نمونه شما اصلاح شد شماره درخواست و شماره پرونده را نگاه کنید
موفق باشید
یا علی

[general007]

سلام
نمونه شما اصلاح شد شماره درخواست و شماره پرونده را نگاه کنید
موفق باشید
یا علی
با سلام دوست عزیزcom12151337
بابت زحمتی که کشیدید ممنون
فقط یه مشکل من میخوام اگر اعداد تکراری بود فقط اخطار بدهد و عدد را ثبت کند
مثلااگر یک عدد قبلا در شماره در خواست ثبت شده بود ( در صورت تکراری بودن عدد در فیلد شماره درخواست پیغام تکراری بدهد )واگر آن عدد در فیلد های دیگر موجود بود و ما مشابه همان عدد را در فیلد دیگری مثل شماره پرونده خواستیم ثبت کنیم ، اروری ندهد و عدد را ثبت کند .
با تشکرازشما :خجالت:

[com12151337]

سلام
ببین به این شکل میخواستی
یا علی

[com12151337]

سلام
ببین به این شکل میخواستی
یا علی

[general007]

سلام
ببین به این شکل میخواستی
یا علی

با سلام
دوست گرامی من منظورم رو بد رسوندم ( مثلا در اکسل ما دابلیکیت رو برای ستون A فعال میکنم هرعددی در ستون A ثبت شود وتکراری باشد با رنگی شدن مشخص می شود و اگر همان عدد در ستونBنوشته شود به ما پیغام نمی دهد .
در این فایلم من میخوام اگر یک عدد در فیلد پرونده بود و مجدد آن را تایپ کردیم پیغام دهد ( این تکراری بودن را در همان فیلد پرونده جستجو کند و پیغام تکراری بودن را بدهد )و به همین ترتیب اگر عددی در شماره در خواست تکراری بود فقط در فیلد شماره در خواست سرچ کند و پیغام بدهد ) بخاطر ثبت اعداد مختلف تر جیحا از تکست باکس استفاده شود
ممنوا از زحمات شما

[general007]

سلام
درخواست کمک از اساتید محترم در صورت امکان فایل را اصلاح کنید
باتشکر:خجالت:

[general007]

درخواست کمک فوری
دوستان کارم گیر همین کد ه
لطفا راهنمایی کنید
باتشکر

[com12151337]

سلام
یک کار بسیار ساده که میشه انجام داد نمونه را براتان گذاشتم البته اگر از توضیح که دادید همین باشد
موفق باشید
یا علی

[general007]

سلام دوست گرامی
ممنون از زحمتی که کشیدید
شما تو نمونه ای که اصلاح کردید اگر عدد تکراری باشه کلا اجازه ثبت نمیده
می خواستم بدونم می شه کاری کرد که فقط اخطار تکراری بودن رو بده و کاربر اجازه ثبت عدد رو داشته باشه
ممنون از شما

[com12151337]

سلام
نمونه اصلاح شد