Connection problemer...

Er grøn i Visual Basic, bruger 6.0 og skal hente noget data i en MySQL database, men har problemer med at "få forbindelse". Har installeret MyODBC og krydset "Microsoft Remote Data Object 2.0" af under "References" i Visual Basic.

Får fejlen "Compile error: User-defined type not defined" hvor "Private Sub Command1_Click()" markeres med gult og "objConn As ADODB.Connection" med blåt, i følgende kode:

Private Sub Command1_Click()

Dim objConn As ADODB.Connection
Dim objRs As ADODB.Recordset
Dim strConnString As String
Dim strSQL As String

Set objConn = New ADODB.Connection
Set objRs = New ADODB.Recordset

strConnString = "DRIVER={MySql};SERVER=ip;Option=16834;DATABASE=db;UID=uid;PWD=pw"
objConn.Open strConnString

strSQL = "SELECT email FROM users WHERE id=51"
objRs.Open strSQL, objConn

Text1.Caption = objRs("email")

objRs.Close
objConn.Close

End Sub

Hvor er fejlen? :)