Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/02/2005, 14:37
luxma
 
Fecha de Ingreso: febrero-2005
Mensajes: 2
Antigüedad: 19 años, 4 meses
Puntos: 0
Coneccion de ComboBox a Base de Datos

Tengo el siguiente código, para conectame a una base de datos en sybase desde visual basic .net, pero no me presenta registros el código, que hago, necesito ayuda urgente!!!!!!

Gracias!!!!

dim. myConnection As String

' If the connection string is null, use a default.

If myConnection = "" Then

myConnection = "PWD=rala78;DSN=DESARROLLO;UID=lbarrien;SRVR=DESAR ROLLO;DB=PRUEBA"

End If

Dim myConn As New Odbc.OdbcConnection(myConnection)

Dim mySelectQuery As String = "SELECT NOMB_DEPA FROM DEPA "

Dim myOdbcCommand As New Odbc.OdbcCommand(mySelectQuery)

myOdbcCommand.Connection = myConn

myConn.Open()

Me.CmbDepartamento.Items.Add(myOdbcCommand.Execute Scalar)

Me.CmbDepartamento.Refresh()

'myOdbcCommand.ExecuteReader.NextResult()

myOdbcCommand.Connection.Close()