11/07/2006, 09:54
|
| | | Fecha de Ingreso: julio-2006 Ubicación: en mi trabajo
Mensajes: 2
Antigüedad: 17 años, 10 meses Puntos: 0 | |
| oye si quieres te paso un codigo que ami me sirvio.
espero que te sirva es un procedimiento para buscar:
Public Sub buscar()
con = New SqlConnection("server = (local);trusted_connection=yes;database=nombre de la bd")
cadena = "SELECT * from tabla de tu bd where campo= '" & _property& "'"
comando = New SqlCommand(cadena, con)
Try
con.Open()
READER = comando.ExecuteReader
If READER.HasRows Then
While READER.Read()
_property= READER("campo")
(y pones todos los campos que quieres que te devuelva)
End While
End If
con.Close()
READER.Close()
Catch ex As Exception
MsgBox("Error: " & ex.Message, MsgBoxStyle.Critical, "error")
End Try
End Sub |