Visual Basic - No se han especificado valores para algunos de los parametros requeridos

Hola a todos, ojala que alguien pueda ayudarme.
Estoy realizando una consulta de seleccion SQL en VB6:



Private Sub CargaUsHor()
Dim strsql As String
Dim cont As Integer
Set horarios = New ADODB.Recordset
strsql = "select USERID.[USERINFO],NAME, Schld from USERINFO,UserUsedSClasses " & _
"where USERID.USERINFO = UserId.UserUsedSClasses"
horarios.Open strsql, cn // al llegar a esta linea me aparece le mensaje
End Sub

Talves el error este en la sintaxis de la consulta, no se...

sin duda el error es en la consulta, fijate de armarla antes , si es en sql usa query analyzer y si es acces el asistente para nueva cunsulta y chequea que te traiga los resultados esperados

saludos