جست و جو در بانک های اطلاعاتی

[ali-software]

سلام.چجوری میشه توی یک بانک اطلاعاتی جستجو کرد؟

[mmssoft]

سلام.چجوری میشه توی یک بانک اطلاعاتی جستجو کرد؟

پروژه زیر رو دانلود کن. حتما به جوابت میرسی.

دانلود پروژه (http://tnmsoft.persiangig.com/BBM/Database.zip) - حجم - 764 کیلوبایت

[HjSoft]

راه هاي مختلفي براي جستجو هست . شما نحوه كارتو بيان كن تا كمكت كنيم .
براي مثال فيلتر :
adodc1.recordset.filter = "name = '" & txt_name &"'"
درضمن براي جلوگيري از نقض قوانين لطفا قبلا جستجو كنيد .

[Tasiyan]

جستجوی بانک اطلاعاتی به صورت حرفه ای (http://barnamenevis.org/forum/showpost.php?p=748110&postcount=3)

:لبخند:

[masoodamini]

این طوری اگه فقط یک کلمه از اسم رو بنویسی واست نشون میده
_Adodc1.RecordSource = "SELECT * FROM table1 WHERE name
_like'" & "%" & Text1.Text
& "'" & "%"

[ali-software]

سلام.ببینید می خواهم مثلا اگه کسی یک نام رو جستوجو کرد کل اطلاعات فیلد رو ببینم.

[saeedzx]

ببین این سورس مهد کودک که میتونی به راحتی جستجو ویرایش از یک قسمتی پرینت بگیری

http://barnamenevis.org/forum/attachment.php?attachmentid=35066&d=1249898284

[HjSoft]

سلام.ببینید می خواهم مثلا اگه کسی یک نام رو جستوجو کرد کل اطلاعات فیلد رو ببینم.
يعني چي ؟ بيشتر توضيح بدين .

[ali-software]

سلام.ببینید من یک دفتر تلفن نوشتم حالا اگه بخواهم برا کاربر یک امکان جستجو بذارم که به وسیله ی آن که هر چیز رو جست و جو کند اگه پیدا شود تمام اطلاعات در همان رکورد نمایش داده شود.ممنون

[xxxxx_xxxxx]

دوست عزيز كار با ديتابيس چيزي هست كه حداقل صد نمونه از آن تو همين سايت وجود داره و بارها آموزش داده شده: 1 (http://barnamenevis.org/forum/showpost.php?p=511554&postcount=12) 2 (http://barnamenevis.org/forum/showpost.php?p=433039&postcount=4) 3 (http://barnamenevis.org/forum/showpost.php?p=433040&postcount=5) 4 (http://barnamenevis.org/forum/showpost.php?p=517158&postcount=15) 5 (http://barnamenevis.org/forum/showpost.php?p=511540&postcount=9) 6 (http://barnamenevis.org/forum/showpost.php?p=526777&postcount=30) 7 (http://barnamenevis.org/forum/showpost.php?p=511553&postcount=12) ... n

شما هنوز مشخص نكرديد كه از چه ابزاري براي كار بانك استفاده كرديد. اونوفت انتظار داريد با گفتن يك جمله كه "چطور ميشه تو بانك اطلاعاتي جستجو كرد" بهتون كمك بشه.

1- اول از همه تو سايت جستجو كنيد.
2- سؤالتون رو دقيق مطرح كنيد.
موفق باشيد

[ali-software]

عزیزم به وسیله ی data

[saeedzx]

سلام با این کد بانک بارگذاری می شه

ado.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=bank.mdb;Persist Security Info=False"
ado.RecordSource = "Select * from bas"
ado.Refresh
Set DataGrid1.DataSource = ado
ado.Recordset.Sort = "name"

با این کد هم جستجو

If Text4.Text <> "" Then
ado.RecordSource = "Select *from bas where name='" & Text4.Text & "'"
ado.Refresh
Text4.Text = ""
Exit Sub
End If

[mmssoft]

سلام با این کد بانک بارگذاری می شه


با این کد هم جستجو

آقای saeedzx محترم ایشون گفتن کنترل Data نه Adodc. کمی توجه کنید.

برای وصل شدن به کنترل دیتا :

Data1.Database = (App.Path & "\Database.mdb")
Data1.RecordSource = "DatabaseTableName"
به جای مسیر دیتابیس میتونید مسیر دیتابیس مورد نظرتون رو بذارید و به جای DatabaseTableName هم باید نام Table خودتون رو بنویسید.

[xxxxx_xxxxx]

آقای saeedzx محترم ایشون گفتن کنترل Data نه Adodc. کمی توجه کنید.

برای وصل شدن به کنترل دیتا :

Data1.Database = (App.Path & "\Database.mdb")
Data1.RecordSource = "DatabaseTableName"به جای مسیر دیتابیس میتونید مسیر دیتابیس مورد نظرتون رو بذارید و به جای DatabaseTableName هم باید نام Table خودتون رو بنویسید.
آقاي mmssoft محترم ايشون گفتن جستجو نه نحوه وصل شدن به بانك:چشمک: كمي توجه كنيد!



عزیزم به وسیله ی data
شما هم جستجو كنيد:
جستجو در data (http://barnamenevis.org/forum/showthread.php?t=105036)

[saeedzx]

ببین ali-software جان میخوام کامل برات توضیح بدم پس خوب دقت کن



Private Sub Form_Activate()
ado.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=bank.mdb;Persist Security Info=False"
ado.RecordSource = "Select * from new"
ado.Refresh
Set DataGrid1.DataSource = ado
ado.Recordset.Sort = "name"
End Sub

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

حالا وقتی تو این بانک رو فراخونی کردی

می تونی با این دستور توی دیتا گرید جستجو کنی



If Text1.Text <> "" Then
ado.RecordSource = "Select *from new where name='" & Text1.Text & "'"
ado.Refresh
Text1.Text = ""
Exit Sub
End If

[HjSoft]

تمام گفته ها رو تاييد ميكنم بعلاوه كد زير :

adodc1.recordset.filter = "name = '" & txt_name & "'"
البته من روش خودم رو بيشتر ترجيم مي دم چون لازم به Refresh نداره و با دستور adnonefilter هم از بين ميره .