Para variar una consulta =)

16/06/2005 - 08:21 por Sete | Informe spam

Saludos señores, les cuento, hice una consulta a un aBD en access desde VB.NET, no me genera ningun error y por lo tanto deberia estar bien, pero el problema es q no se como hacer para saber si la consulta devuelve algun resultado, aqui les coloco el codigo

' VARIABLE

Private Conn As OleDbConnectio
Private DA As OleDbDataAdapte
Private selectCMD As OleDbComman
Private DS As DataSe

'En el For

Conn = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\pruebasdeVB.NET\Almagro.mdb"

selectCMD = New OleDbCommand("SELECT Login, Pass FROM Usuario where (Login=@Login and Pass=@Pass)", Conn

DA = New OleDbDataAdapter(

DA.SelectCommand = selectCM

selectCMD.Parameters.Add("@Login", OleDbType.VarChar, 15).Value = txtLogin.Tex
selectCMD.Parameters.Add("@Pass", OleDbType.VarChar, 15).Value = txtPass.Tex

MessageBox.Show("HAsta los Parametros.Todo OK"

'En el Boto

Dim custDS As DataSet = New DataSet(
DA.Fill(custDS, "Customers"
MessageBox.Show("Conuslta Realizada OK"

Como dato, todo esto ya lo habia echo, pero con el asistente, y como generaba tanto codigo q no entendia me decidi a hacerlo por mi cuenta, pero el problema es solo que no se q codigo colocar para ver si la consulta encuentra o no lo q anda buscando, para posteriormente dejar ingresar o no a la aplicacion

eso seria...gracias muchachos...y muchos saludos

Sete

Ver este tema: http://www.softwaremix.net/viewtopic-401840.html

Enviado desde http://www.softwaremix.net

Siga el debate

1 respuesta

Tengo una respuesta

Preguntas similare

Re: Para variar una consulta =)

Leer las respuestas

#1 A.Poblacion

16/06/2005 - 09:27 | Informe spam

Detrás del DA.Fill(custDS, "Customers"), examina la tabla cargada. Si tiene
más de un registro, significa que el Login y el Password los ha encontrado:

If custDS.Tables("Customers").Rows.Count>0 Then

Aunque de todas formas, no es la forma más eficaz de averiguar si el login y
el password existen en la base de datos. En lugar de llenar un DataSet,
resultaría más eficaz lanzar un "Select Count..." con el método
ExecuteScalar del OleDbCommand.

"Sete" wrote in message
news:

Saludos señores, les cuento, hice una consulta a un aBD en access desde

VB.NET, no me genera ningun error y por lo tanto deberia estar bien, pero el
problema es q no se como hacer para saber si la consulta devuelve algun
resultado, aqui les coloco el codigo:

' VARIABLES

Private Conn As OleDbConnection
Private DA As OleDbDataAdapter
Private selectCMD As OleDbCommand
Private DS As DataSet

'En el Form

Conn = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data

Source=D:\pruebasdeVB.NET\Almagro.mdb")

selectCMD = New OleDbCommand("SELECT Login, Pass FROM Usuario where

(Login=@Login and Pass=@Pass)", Conn)

DA = New OleDbDataAdapter()

DA.SelectCommand = selectCMD

selectCMD.Parameters.Add("@Login", OleDbType.VarChar, 15).Value txtLogin.Text
selectCMD.Parameters.Add("@Pass", OleDbType.VarChar, 15).Value txtPass.Text

MessageBox.Show("HAsta los Parametros.Todo OK")

'En el Boton

Dim custDS As DataSet = New DataSet()
DA.Fill(custDS, "Customers")
MessageBox.Show("Conuslta Realizada OK")

Como dato, todo esto ya lo habia echo, pero con el asistente, y como

generaba tanto codigo q no entendia me decidi a hacerlo por mi cuenta, pero
el problema es solo que no se q codigo colocar para ver si la consulta
encuentra o no lo q anda buscando, para posteriormente dejar ingresar o no
a la aplicacion.

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida