Ver Mensaje Individual
  #12 (permalink)  
Antiguo 23/06/2009, 08:49
ccristian79
 
Fecha de Ingreso: junio-2009
Mensajes: 12
Antigüedad: 14 años, 10 meses
Puntos: 0
Respuesta: consulta sobre un combobox

Hola amigos, ante todo muchas gracias por sus respuestas.. estuve haciendo algunas pruebas e investigando .. y mas o menos tengo el codigo que deberia utilizar para realizar lo q quiero, el problema es que estoy recibiendo un error a la hora de ejecutarlo que es el siguiente
Referencia a objeto no establecida como instancia de un objeto.
No se encontro NullReferenceException

el codigo que tengo es el siguiente :

Private Sub CMBnombre_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CMBnombre.Click
Dim cn As New OleDbConnection( _
"provider=SQLOLEDB.1;" & _
"Integrated Security=SSPI; " & _
"Persist Security Info=False;" & _
"User ID=xxxx;" & _
"Password=xxxxxx;" & _
"Initial Catalog=OperadoresMT;" & _
"Data Source=cristian\SQLEXPRESS")
cn.Open()

Dim da As OleDbDataAdapter
Dim ds As New DataSet
da = New OleDbDataAdapter("Select * From Clientes WHERE Nombre='" & CMBnombre.Text & "'", cn)
da.Fill(ds, " Clientes")
If ds.Tables("Clientes ").DefaultView.Count >= 0 Then
txtdireccion.Text = ds.Tables("Clientes").DefaultView.Item("Direccion" ).ToString
txtlocalidad.Text = ds.Tables("Clientes").DefaultView.Item("Localidad" ).ToString
txtprovincia.Text = ds.Tables("Clientes").DefaultView.Item("Localidad" ).ToString
txtpais.Text = ds.Tables("Clientes").DefaultView.Item("Localidad" ).ToString
txttelefono.Text = ds.Tables("Clientes").DefaultView.Item("Localidad" ).ToString
txtcuit.Text = ds.Tables("Clientes").DefaultView.Item("Localidad" ).ToString
txtcontacto.Text = ds.Tables("Clientes").DefaultView.Item("Localidad" ).ToString
txtobservaciones.Text = ds.Tables("Clientes").DefaultView.Item("Localidad" ).ToString
End If

End Sub

Podra guiarme alguno diciendome q es lo que estoy haciendo mal ??? gracias nuevamente..