Private Sub Form_Load()
Dim dbUserName As ADODB.Connection
Dim cmdCommand As New ADODB.Command
Dim rsUserName As ADODB.Recordset

Set dbUserName = New ADODB.Connection

dbUserName.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;" & "Persist Security Info=False;" & "Data Source = C:\Documents and Settings\Administrator\Desktop\db1.mdb"
dbUserName.CursorLocation = adUseClient
dbUserName.Open

after this wen i run the with command it gives an error
"COULD NOT FIND INSTALLABLE ISAM"
WT does dis mean???

try installing the latest mdac from MS
(search with google)

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.