جستجو در کتابخانه [بایگانی]

rezacarlos

یک شنبه 16 اردیبهشت 1386, 04:37 صبح

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

sohrab o

یک شنبه 16 اردیبهشت 1386, 08:35 صبح

DATA1.Recordset.FindFirst "BookName='" & TxtName.text "'"

sohrab o

یک شنبه 16 اردیبهشت 1386, 08:36 صبح

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

ascpro

یک شنبه 16 اردیبهشت 1386, 23:01 عصر

من کدشو برات مینویسم که بقیه کد جستجوشو که فکر کنم بلدی خودت باید بنویسی.
معمولا این کدو با همون کد جستجو در text1_change مینویسن.

Set rs = db.OpenRecordset("select * from نام جدول where نام فیلد LIKE '" & Text1.Text & "*'", dbOpenDynaset)

این کد هم باید در General بنویسی:

Public db As Database
Public rs As Recordset