+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Software Development Programming (http://parsicoders.com/forumdisplay.php?fid=37)
+--- انجمن: Visual Basic Programming (http://parsicoders.com/forumdisplay.php?fid=39)
+---- انجمن: Visual Basic 6 (http://parsicoders.com/forumdisplay.php?fid=44)
+---- موضوع: جستجو در دیتا بیس اکسس (/showthread.php?tid=3866)
جستجو در دیتا بیس اکسس - aghamali - 10-29-2015
سلام
مسخواستم بدونم کد بیسیک 6 هست که در چند یا کل فیلدهای یک دیتابیس اکسس رو جستجو کنه
ممنون میشم راهنمایی کنید
RE: جستجو در دیتا بیس اکسس - Amin_Mansouri - 10-31-2015
درود
خوبی؟
کد :
کد:
On Error GoTo err:
Dim sql As String
Set con = New ADODB.Connection
con.CursorLocation = adUseClient
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:Program Filesjosoftdatabasejosoft.mdb;Persist Security Info=False"
Set rs = New ADODB.Recordset
rs.Open "Select * from [FeeBalance] where [AdmnNo] = '" & Text1.Text & "'", con, 3, 3
rs.MoveLast
'rs.MoveNext
If rs.EOF And rs.BOF Then
MsgBox ("No Fee Balance Found in the Above Student!")
Else
rs.MoveLast
Text15.Text = rs!Amountpaid
Text17.Text = rs!balance
End If
err:RE: جستجو در دیتا بیس اکسس - aghamali - 10-31-2015
ممنونم
تست میکنم ایشاله که مشکلم حل بشه
RE: جستجو در دیتا بیس اکسس - aghamali - 10-31-2015
من یه نگاه کردم اما سر در نیاوردم بازم دقت میکنم ببینم چطور میشه ، اخه عجله ای دیدم
ولی یبار دیگه توضیح میدم ما 2 تا فیلد تلفن داریم در دیتابیس
حالا میخواهیم وقتی یه مشاره رو سرچ میکنیم همزمان 2 تا فیلد رو جستجو کنه و نتیجه رو نشون بده تو لیست باکس
RE: جستجو در دیتا بیس اکسس - aghamali - 11-03-2015
Up Up Up Up Up
RE: جستجو در دیتا بیس اکسس - Amin_Mansouri - 11-18-2015
سمپل کد :
http://parsicoders.com/showthread.php?tid=2378
سرچ کنید