[access] Formulaire de login

Bonjour bonjour,
j'essaye actuellement de faire un formulaire de login via access (non je n'ai pas choisis le programme à utiliser ^^)

Mon problème si situe globalement dans l'execution d'une requete Select via vb puis la réutilisation du résultat.

Pour le moment mon code ressemble à ça :
-------------------------------------------
Private Sub BValid_Click()

Dim DB As Database
Dim DS As Recordset
Dim rq As String
Dim InLog As String
Dim InPass As String

Set DB = CurrentDb
InLog = Me.TLogin
InPass = Me.TPassword
rq = "SELECT Password from Users where Users.login=InLog;"

Set DS = DB.OpenRecordset(rq, dbOpenForwardOnly, , dbReadOnly)

If DS = InPass Then
DoCmd.OpenForm ("Ok")
Else
MsgBox "Mauvais login/password"
End If


End Sub
-------------------------------------------

Donc là je tourne en rond sur comment comparer le resultat de mon select (une table) au pass qui entré dans le formulaire (une chaine)

Si vous pouviez m'éclairer, ça serait sympa =)

Configuration: Windows XP
Firefox 2.0.0.3