Ver Mensaje Individual
  #1 (permalink)  
Antiguo 16/06/2005, 00:18
Sete18
 
Fecha de Ingreso: junio-2005
Mensajes: 9
Antigüedad: 19 años, 8 meses
Puntos: 0
Sonrisa Para variar una consulta =)

Saludos señores, les cuento, hice una consulta a una BD 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.OLED B.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.

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