Jobs
Author: A.phani chakravarthy Date Submitted: 7/26/2006 Category: Forms Compatibility: VB 6 This code has been accessed 9515 times.
Email Yourself this snippet:
// this code enable u to connect to database and retrieve the records dim con as new adodb.connection dim rs as new adodb.recordset
Code
public sub form1_load() set con=new adodb.connection con.connectinString="Provider=microsoftjet3.4,path=c:\empdatabase...," con.open set rs=new adodb.recordset rs.open"select * from emp",con,adopendynamic,adlockpessimistic text1.text=rs.fields(0) text2.text=rs.fields(1)