PDA

View Full Version : چگونگی جست و جو در table



dezchilds
سه شنبه 28 خرداد 1387, 08:58 صبح
سلام من با وی بی 6 یه برنامه نوشتم که مقیدش کردم به یه بانک اطلاعاتی حالا میخوام توی بانک اطلاعاتیجست و جو راه بندازم مثل کوری چطوری اینکار را انجام بدم؟

sh2007
سه شنبه 28 خرداد 1387, 09:21 صبح
با سلام
همان كدهائي رو كه در sql هست مي تواني در adodc.recourdsource قرار دهي
و بعد adodc.refresh را بكار ببر
كد اسكيو ال هم عبارتست از
SELECT * FROM Table1 WHERE Field1 = Name
و ساير دستورات و عملگرهاي sql نيز براي جستجو كاربرد دارد

dezchilds
سه شنبه 28 خرداد 1387, 17:33 عصر
سلام و ممنون نمیشه بدون sql و با ویبی کارش رو انجام بدم ؟ مثلآ با اینپوت باکس یکم هم بیشتر راهنمایی کنید اولین بارمه که میخوام با وی ب جست و جو کنم

reza_optical
سه شنبه 28 خرداد 1387, 18:39 عصر
با سلام
عزیز vb یه زبان برنامه نویسیه که به شما این امکانو میده با provider های مختلف به data base های مختلف وصل شی شما برای filter کردن داده هاتون که در بانک اطلاعاتی هست باید با استفاده از یک provider به دیتا بیس وصل شین و به وسیله اون دستورات SQL رو اجرا کنین و بعد توسط یک object که میتونه یه Grid ویا textbox و ... باشه اطلاعاتتونو نمایش بدین

.:KeihanCPU:.
سه شنبه 28 خرداد 1387, 19:27 عصر
Set db = OpenDatabase("MyBank.Mdb")
Set RS = db.OpenRecordset("MyTable", dbOpenTable)
RS.Index = "IndexName"
s = "íÒí ˜å ãíÎæÇíä ÌÓÊÌæ ˜äíÏ"
RS.Seek "=", s
If RS.NoMatch Then
MsgBox "NotFound"
Else
Call Print1(RS)
End If
db.Close

که در اینجا
Print(rs) تابع پرینت رو صدا میکنه و Rs رو به اون تحویل میده

ali_habibi1384
سه شنبه 28 خرداد 1387, 23:07 عصر
adodc1.recordset.filter=("fild = '" & text & "'")

sh2007
چهارشنبه 29 خرداد 1387, 09:44 صبح
سلام و ممنون نمیشه بدون sql و با ویبی کارش رو انجام بدم ؟ مثلآ با اینپوت باکس یکم هم بیشتر راهنمایی کنید اولین بارمه که میخوام با وی ب جست و جو کنم

سلام
بجاي name كه گفتم شما مي توانيد يك متغير را كه از inputbox مقدار مي گيرد وارد كنيد
و به مثالهاي كه دوستان هم گفقتند توجه كنيد همه آنها استفاده هاي خوبي دارند