کمک در مورد جستجو در پایگاه داده اکسس

[Usefi]

با سلام
بنده قبل از این برای جستجو در پایگاه داده اکسس از متد findfirst. در data استفاده میکردم و این زمانی جواب میداد که متن جستجو شده دقیقا برابر با متن فیلد مورد نظر باشد نه کمتر نه بیشتر
اما الان نیاز دارم که اسن جستجو تقریبا بهینه تر و راحت تر و کاربرپسند تر باشه . یعنی اینکه مثلا کاربر اگه یک کلمه یا جمله رو وارد کرد تمام رکوردهای پایگاه داده که توی فیلد مورد نظرشون اون کلمه یا کلمه های اون جمله است نمایش داده بشه . ممنون میشم دوستان راهنمایی کنن .

 

[cracki]

باید بیشتر توضیح بدید
نوع کانکشن چیه؟
دستور اتصال چیه؟
دستور SQL می تونید به کار ببرید؟ جستجو توی دیتابیس از چه نوع استفاده می شه؟ نمونه حداقل بزارید ببینیم جریان چیه

موفق باشید

 

[Usefi]

باید بیشتر توضیح بدید
نوع انکشن چیه؟
دستور اتصال چیه؟
دستور SQL می تونید به کار ببرید؟ چستجو توی دیتابیس از چه نوع استفاده می شه؟ نمونه حداق بزارید ببینیم جریان چیه

موفق باشید

عرضم به حضور گرام که پایگاه داده که access هس و خدمتتون عرض کردم .
تا حالا هم از دستورات sql برای اتصال یا جستجو استفاده نکردم .
میخوام تمام رکوردهایی که داخل فیلد "توضیحات" اونها به فرض عبارت "سلام" وجود داره نمایش داده بشه .
نمونه چی بذارم براتون ؟

 

[cracki]

اگه برای اتصال از ADO استفاده می کنید که توصیه می شه این کد برای اتصال و جستجو به کار می آید

[LEFT]Dim strConnect As String
Dim strProvider As String
Dim strDataSource As String
Dim strDataBaseName As String
Dim connConnection As ADODB.Connection
Dim rsRecordSet As ADODB.Recordset

strProvider = "Provider= Microsoft.Jet.OLEDB.4.0;"
strDataBaseName = App.Path & "\Database.mdb"
strDataSource = "Data Source=" & strDataBaseName
strConnect = strProvider & strDataSource
Set connConnection = New ADODB.Connection
connConnection.CursorLocation = adUseClient
connConnection.Open strConnect
'---------------------------------
Set rsRecordSet = New ADODB.Recordset
rsRecordSet.CursorType = adOpenStatic
rsRecordSet.CursorLocation = adUseClient
rsRecordSet.LockType = adLockPessimistic 'adLockReadOnly

rsRecordSet.Source = "Select * From YourTableName WHERE YourFieldName LIKE '%سلام%'"

rsRecordSet.ActiveConnection = connConnection
rsRecordSet.Open[/LEFT]

می دونید که برای استفاده از ADO باید در رفرنس پروژه
Microsoft ActiveX Data Objects 2.8 Library
رو اضافه کنید.

 

[Usefi]

ممنون از راهنماییت کرکی جان
بنده دارم از data استفاده میکنم . آیا برای اون هم راه حلی وجود داره ؟

 

[Usefi]

ممنون از راهنماییت کرکی جان
بنده دارم از data استفاده میکنم . آیا برای اون هم راه حلی وجود داره ؟

. . . ! ؟

 

[cracki]

حتما وجود داره ! ولی من اطلاعی ندارم...