Hola gente tengo un problema quiero hacer una consulta en una base de datos de access ( OleDbdataadapter()) no me sale la busqueda por nombre le posteo el codigo a ver si estoy haciendo algo mal:
Try
Dim conexion As New OleDbConnection("provider=microsoft.jet.oledb.4.0; data source='C:\bd con access\finaltp4.mdb'")
conexion.Open()
Dim dataadapter As New OleDb.OleDbDataAdapter
Dim consulta As New OleDb.OleDbCommand
Dim buscar_nombre As String
buscar_nombre = Me.TextBox1.Text
consulta = New OleDbCommand("select codigo,nombre,sueldo,codigodepartamento from empleados where nombre = '" & buscar_nombre & "'", conexion)
dataadapter.SelectCommand = consulta
Dim registro As OleDbDataReader = consulta.ExecuteReader()
If registro.Read Then
Me.TextBox2.AppendText(registro("codigo"))
Me.TextBox3.AppendText(registro("nombre"))
Me.TextBox4.AppendText(registro("sueldo"))
Me.TextBox5.AppendText(registro("codigodepartament o"))
Else
MessageBox.Show("registro inexistente")
End If
conexion.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
es una busqueda por nombre donde en el texbox1 escribo el nombre a buscar y que me muestre sus datos.
bueno espero que me ayuden pues se me hace dificil hacer solo todo con access ya que yo solo uso SQL Server .
bueno saludos