فیلد تکراری در دیتابیس

[MAHDIEHSANI 2]

سلام دوستان من یه دفترچه یاداشت ساختم حالا درست کار می کنه من میخوام هر وقت یه متن رو با عنوان ذخیره کردم دوباره همین متن تکراری ذخیره نشه یعنی قبل ار ذخیره برسی کنه تیبل رو اگه ردیف تکراری بود پیام بده (این موضوع از قبل ذخیره شده) یعنی عنوان ها و متن تکراری ذخیره نشه.

[hojjatborohan 56]

شما بیا از عمل سرچ استفاده کن بعد row دیتابیس رو بگیر اگه 0 بود که یعنی وجود نداره و عمل ذخیره رو انجام بده اما اگه بالاتر از 0 بود یعنی اون کلمه توی دیتابیس موجود و یک پیغام مبنی بر وجود این کلمه نمایش بده به همین سادگی

[mehdi.m 158]

در 12 ساعت قبل، MAHDIEHSANI گفته است :

سلام دوستان من یه دفترچه یاداشت ساختم حالا درست کار می کنه من میخوام هر وقت یه متن رو با عنوان ذخیره کردم دوباره همین متن تکراری ذخیره نشه یعنی قبل ار ذخیره برسی کنه تیبل رو اگه ردیف تکراری بود پیام بده (این موضوع از قبل ذخیره شده) یعنی عنوان ها و متن تکراری ذخیره نشه.

قبل از ثبت عنوان جدید

با یه دستور select و یه حلقه بیا همه عنوان هارو بگیر.بعدفیلد رو چک کن با مقدار ورودی

به این صورت:

cur=S.ExecQuery("SELECT onvan FROM tbl ")
Dim name As String
For i =0 To cur.RowCount-1
		cur.Position=i
		name=cur.GetString("onvan")
	If name=edittext1.Text Then
		ToastMessageShow("تکراری است",False)
		Return
	End If
Next