Visual Basic.NET - visual basic 2008.net + access consulta

 
Vista:

visual basic 2008.net + access consulta

Publicado por matsca (1 intervención) el 09/11/2009 21:27:10
Hola a todos tengo un problema con visual basic 2008.net + access ...
Realizo una consulta desde visual hacia una tabla de access (la conexion está bien), mi problema surge cuando quiero hacer una consulta en sql con mas de una respuesta por ejemplo...

Dim rs As ADODB.Recordset
Dim sql1 As String

sql1 = "select NomUser, Pass from Usuarios where NomUser='" & Trim(TextBox1.Text) & "'"
rs = conexion.Execute(sql1)

Bien creo una variable rs (record set) la cual, luego de la consulta sql, va a albergar 2 resultados: NomUser y Pass.
¿Cómo hago para poder separar los resultados de la consulta en variables diferentes?

espero me puedan ayudar!!
desde ya muchas gracias
Matias
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

RE:visual basic 2008.net + access consulta

Publicado por csdk (17 intervenciones) el 10/11/2009 19:25:59
sq = ("SELECT * FROM clientes where abreviacion like '%" & t & "%'")
Dim m_cbCommandBuilder As New Npgsql.NpgsqlCommand(sq, ADOCONN)
Call Conex()
dr = m_cbCommandBuilder.ExecuteReader()
While dr.Read
Buscar.ListView1.Items.Add(dr("cvl_cliente"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("abreviacion"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("fecha"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("Rason_social"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("rfc"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("web"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("dom"))
Buscar.Label3.Text = i
i = i + 1
End While
desconectar()
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar