connecting vb with to access database without using adodc...

[vikas1111]

This is the code which i have written.....
[code=vb]
Option Explicit
Dim c As New ADODB.Connectio n
Dim cm As ADODB.Command
Dim rs As New ADODB.Recordset
Private Sub regno_Change()
c.Open ("Provider=Micr osoft.Jet.OLEDB .4.0;Data Source=d:/Comion.mdb;Pers ist Security Info=false")
rs.Open "select * from main_table", c, adOpenDynamic
Me.regno.Text = rs(3)
End Sub
[/code]
The error i am getting " User defined type not defined- -- for the first line of my code itself"
Can anyone pls help me????

[debasisdas]

Have you added the reference of ADO library ?

[vikas1111]

Have you added the reference of ADO library ?

ya microsoft activex data object 2.library

[debasisdas]

Run in debug mode and check which line is throwing the error.

[vikas1111]

Run in debug mode and check which line is throwing the error.

now error in this line
c.Open ("Provider=Micr osoft.Jet.OLEDB .4.0;Data Source=d:/Comion.mdb;Pers ist Security Info=false")

The path which i have mentioned is correct....And i have already removed password..

[debasisdas]

Try using this
[code=vb]
c.Open "Provider=Micro soft.Jet.OLEDB. 4.0;Data Source=d:\Comio n.mdb;Persist Security Info=false"
[/code]

[vikas1111]

Try using this
[code=vb]
c.Open "Provider=Micro soft.Jet.OLEDB. 4.0;Data Source=d:\Comio n.mdb;Persist Security Info=false"
[/code]

Hi
I changed it but i am getting the same error in the same line.... The error reads like this::::::
Run time error 3705

[debasisdas]

error in which line of code ?

[rizwan6feb]

If you are still having problem, try this

1. Paste ADODC control on your form
2. Connect it to your database using properties dialog
3. If it successfully connects to the database, copy the connection string and use it in place of the code which is creating problem
4. Remove the ADODC control from your form

[debasisdas]

To get the correct connection string it is better to use a UDL file .

[vikas1111]

If you are still having problem, try this

1. Paste ADODC control on your form
2. Connect it to your database using properties dialog
3. If it successfully connects to the database, copy the connection string and use it in place of the code which is creating problem
4. Remove the ADODC control from your form

hey Rizwan..
It worked thanks...
I want to know another thing.. If i want to link another column of the same table and in the same form with another text box then what should i do ?

[QVeen72]

Hi,

You are not supposed to Open a Connection in a Change Event....
Try to add a ".bas" module Declare Connections as Public , In MDI Form Load Open the Connection..

Yes, the error 3705 is : Object already open..
So , Before Opening Check the State of the Connection..

[code=vb]
If c.State <> adStateOpen Then
Set c =Nothing
c.Open ("Provider=Micr osoft.Jet.OLEDB .4.0;Data Source=d:\Comio n.mdb;Persist Security Info=false")
End If
[/code]

[debasisdas]

Just assign the column name or index of the column in the record set tothe text box.

[vikas1111]

Just assign the column name or index of the column in the record set tothe text box.

Ya i tried it but its not working ...

[debasisdas]

What is the error message ?