Visual Basic - Error buscando registro AYUDA!

Life is soft - evento anual de software empresarial
   
Vista:

Error buscando registro AYUDA!

Publicado por Sergio (5 intervenciones) el 10/08/2011 18:43:01
Muy buenas y gracias de antemano por llegar hasta aquí

Estoy tratando de hacer una conexión a access 2010 desde vb6, para hacer una búsqueda en una tabla con un determinado dato sabido de antemano (VarIdUsuario), según esa búsqueda quiero coger el nombre de usuario (UsuUsuario) resultado de esa búsqueda para mostrarlo en la statusbar. Me da error en la línea 6 (Nombre de origen de datos demasiado largo). Acepto otras ideas alternativas si son más sencillas y eficientes. ¿Qué hago mal?

1 Dim adoConexion As New ADODB.Connection
2 Dim sSQLQuery As String
3 Dim adoRegistros As New ADODB.Recordset

4 Set cn = New Connection
5 adoConexion.Provider = "MSDASQL.1"
6 adoConexion.Open (App.Path & "\db.mdb")

7 sSQLQuery = "SELECT * FROM USUARIOS WHERE IDUsuario = '" & VarIdUsuario

8 adoRegistros.Open sConsulta, adoConexion, adOpenStatic, adLockReadOnly

9 If adoRegistros.BOF = adoRegistros.EOF And adoRegistros.EOF = False Then
10 StB_Principal.Panels.Item(4) = "Usuario: " & adoRegistros!UsuUsuario
11 End If

12 adoConexion.Close
13 Set adoConexion = Nothing
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder