Visual Basic - Ayuda urgente !!!!!

Hola amigos, necesito hacer un programa para mi escuela el cual tiene una base de datos en access. Yo lo que quiero saber es como compruebo que el usuario y la comtraseña es correcta , bueno si alguien me puede ayudar gracias , saludos
Les dejo el codigo que tengo , me da un error en .open

Private Sub Form_Load()
Dim cnn As New ADODB.Connection
Dim rsx As New ADODB.Recordset
Dim strsql As String
With cnn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Properties("Data Source").Value = "G:\Programa\Base.mdb"
.Properties("User ID").Value = "x"
.Properties("Jet OLEDB:System Database").Value = ""
.Properties("Password").Value = ""
.Open
End With



'Cargo el ResulSet con los registros
strsql = "SELECT * FROM Base WHERE Contraseña='" & Text2.Text & "' AND username='" & Text1.Text & "'"
rsx.Open (strsql)

'Me fijo si es vacio el ResultSet
If Not rsx.BOF Then
'no es vacio
Else
'es vacio


End If

End Sub

Esa es una forma, pero recuerda de que siempre hay que encriptar los password's.