این کد ایرادش چیه؟

[اوبالیت به بو]

سلام :
این کد من چه ایرادی داره:

'Search Name
On Error Resume Next
If NameTxt.Text = "" Then
Adodc1.Refresh
Else
Adodc1.Recordset.Filter = "Name=' " + NameTxt.Text + " ' "
Adodc1.Recordset.Filter = " Name like '" & NameTxt.Text & "*'"
End If
Name: نام فیلد مورد نظر من تو بانک اطلاعاتی هستش.
NameTxt: جایی هستش که من کلمه مورد نظر رو برای جستجو وارد می کنم.
من وقتی این کد رو تویه یه Command می نویسم برای من اشتباه جستجو می کنه یا به عبارتی بگم هیچ جستجویی انجام نمی ده.
و اطلاعات راجب به اولین رکورد بانک رو نمایش میده.
بچه ها من الان چند وقت گیر کردم میشه این کد رو صحیحش رو بهم بدین!!!
مرسی از لطفتون

[amirsajjadi]

با سلام
1)دو تا فاصله ی اضافی گذاشتی


Adodc1.Recordset.Filter = "Name='" + NameTxt.Text + "'"

اگه درست نشد
2)فیلد Name رو به یک چیز دیگه مثل _Name_ تغییر نام بده
اگه درست نشد
3)شاید توی بانکتون حرف (ی) داشته باشید و هنگام جستجوی حرف (ی عربی با دو نقطه در زیر حرف) رو جستجو میکنید یا بلعکس بنابراین جواب نمیده

[اوبالیت به بو]

خوب من الان اید چی کار کنم چون نمیشه که برنامه Search نداشته باشه.
میشه یه کد در اختیارم بزارین.

[اوبالیت به بو]

نمیشه یه کد در اختیارم قرار بدین مثل این باشه؟؟؟
مرسی اگه این کارو بکنین.

[perfeshnal]

دوست عزیز اگر در سایت جستجو کنید برنامه های زیادی هست که از کدهای جستجو درش استفاده شده و می تونید استفاده کنید.
اینطوری زودتر به جواب می رسید.

[ali_habibi1384]

آقای obalijoOon مسالی رو که شما توی سایت میگی اکثرا جزء مسال پیش پا افتاده هستش و حداقل 90% اونا رو چندین با پاسخ داده اند و شما اگر سرچ کنی به نتیجه می رسی پس مطرح کردن اونا موردی نداره! و نیز خلاف مقررات سایته.
از آقای perfeshnal هم تشکر می کنم از تذکر بجا شون