Using Access with Microsoft VB 6

[cam7584]

I dont know if this is the place to post this but I need to create a program in VB 6 where the user can type in as many letters as they know of a persons last name, then the app will search an access database and return all the last names that match the search criteria. Then, the user can select a last name from the list and it will provide the user with that persons address and forwarding address information. I know how to do this using VB.Net but I havent used VB 6 in a very long time and I dont even remember how to access the database. I really need some tips and any help I can get. Thanks.

 

[GingerR]

You'd probably be better off in the VB forum.

Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244

 

[RoyVidar]

Ah - there you'd only be told to use ADO, open a connection to the db, then open an ADO recordset based on the connection. Something along the lines of the following air code...

[tt]dim rs as adodb.recordset
dim cn as adodb.connection
dim strSql as string
set cn = new adodb.connection
' do the stuff from the link
strSql="select * from mytable where lastname like '%" & txtSearch.text & "%'"
set rs = cn.execute(strSql,,adcmdtext)
if not rs.bof and not rs.eof then
debug.print rs.getstring
end if[/tt]

Should the last name contain single quotes, you'd probably need to utilize the replace function on the string...

To get an updateable recordset, you'd probably need a bit more, but it should be easy to find in help files on ADO.

Roy-Vidar

 

[cam7584]

Ah thanks guys, I appreciate the responses. I will try to use that code to get something started.