|
-
Jun 19th, 2001, 03:47 AM
#1
Fanatic Member
you need to use recordsets, something like:
(access97 using DAO)
Sub cboYourCombo_AfterUpdate()
Dim sSearch as string
dim db as database
dim rs as recordset
set db = Currentdb
sSearch = cboYourCombo.Text
set rs = db.openrecordset("select * from tblYourTable where YourField='" & sSearch & "')
rs.movefirst
txtFirstTextbox = rs("FirstField")
txtSecondTextBox = rs("SecondField")
rs.close
End sub
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|