Problem in connection with Access

See more:

VB

Microsoft

I use the below mentioned code for Connecting vb6 with ms access
but when i run the project it displays the Compile error which is( User Defined type not defined) and highlight this line ( Conn As ADODB.Connection )
Pls solve this problem


Global Conn As ADODB.Connection
Global rs As ADODB.Recordset

Sub Access_Connector()
Set Conn = New ADODB.Connection
Conn.Provider = "microsoft.jet.oledb.4.0"
Conn.CursorLocation = adUseClient
Conn.Open App.Path & "\SIS.mdb"
End Sub