CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Saber Si Select Encuentra Lo Q Busca

<< < (2/2)

Sete:
Ya definitivamente les hice casi y me meti con el ExcecuteScalar, la cosa es q me quedo de la siguiente forma:


--- Código: Text --- ' VariablesPrivate Conn As OleDbConnection    Private scalarCMD As OleDbCommand Conn = New OleDb.OleDbConnection(&#34;Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:&#092;pruebasdeVB.NET&#092;-==Ultimo==-&#092;Login.0.1.1&#092;bin&#092;Almagro.mdb&#34;)        scalarCMD = New OleDbCommand(&#34;SELECT Login, Pass FROM Usuario where (Login=@Login and Pass=@Pass)&#34;, Conn) Dim respuesta As String         Conn = New OleDb.OleDbConnection(&#34;Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:&#092;pruebasdeVB.NET&#092;-==Ultimo==-&#092;Login.0.1.1&#092;bin&#092;Almagro.mdb&#34;)        scalarCMD = New OleDbCommand(&#34;SELECT Login, Pass FROM Usuario where (Login=@Login and Pass=@Pass)&#34;, Conn)         scalarCMD.Parameters.Add(&#34;@Login&#34;, OleDbType.VarChar, 15).Value = txtLogin.Text        scalarCMD.Parameters.Add(&#34;@Pass&#34;, OleDbType.VarChar, 15).Value = txtPass.Text         MessageBox.Show(&#34;Hasta los Parametros.....Todo OK&#34;)        Conn.Open()        respuesta = scalarCMD.ExecuteScalar()        Conn.Close()         MessageBox.Show(respuesta) 
El problema es q al final solo me entrega el Login y no se como hacerlo para q me entregue la Pass y una vez echo esto q hacer para dejar Ingresar a la aplicacion ..Bueno eso seria.

Sete:
EUREKA!!

ya señores encontre como asignar los resultados a una variable...lo hice así:


--- Código: Text ---scalarCMD.Parameters.Add(&#34;@Login&#34;, OleDbType.VarChar, 15).Value = txtLogin.Text        scalarCMD.Parameters.Add(&#34;@Pass&#34;, OleDbType.VarChar, 15).Value = txtPass.Text         MessageBox.Show(&#34;Hasta los Parametros.....Todo OK&#34;)        Conn.Open()        scalarCMD.ExecuteScalar()         respLogin = scalarCMD.Parameters(&#34;@Login&#34;).Value()        respPass = scalarCMD.Parameters(&#34;@Pass&#34;).Value()        Conn.Close()         MessageBox.Show(respLogin)        MessageBox.Show(respPass) 
Ahora haria un if preguntando si las respLogin y respPass, son igua les txtLogin.text y txtPass.text, para abriri la aplicacion o cerrarla, pero sera la forma mas indicada?? o abra alguna mas eficiente??

Saludos señores y gracias por la ayuda.
=)

senzao18:
Yo lo que haria es regresar un valor true si la consulta encuentra registros con el procedimiento almacenado y tomar la variable.


--- Código: Text --- If (select count(*) from usuarios donde usuario y contraseña igual a algo)&#62;0             set @bandera =Trueelse      set @bandera =False  select @bandera from tabla  
O declarar un parametro de tipo output como tu le haces, pero que no sea el usuario y  contrasña.

Navegación

[0] Índice de Mensajes

[*] Página Anterior

Ir a la versión completa