ODBC Connection
Publicado por Mazen A.K (1 intervención) el 03/04/2007 00:53:23
amigos tengo la siguiente duda... en la version de VB 6.0 yo creaba una conexion a una base de datos creando primeramente una cuenta en Data Sources (ODBC) apuntando a una base de datos en espec'ifica y luego dentro del proyecto de VB apuntaba el ODBC Connection a dicho data source. Adicionalmente usaba el siguiente codigo para visualizar datos dentro de la aplicacion: Ejemplo
Clave1 = CDbl(txtHTD.Text)
Adodc2.CommandType = adCmdText ' Maestro
sql = "select * from MAESTRO where HTD = " & Clave1 ' & "'"
Adodc2.RecordSource = sql
Adodc2.Refresh
' Adodc2.Recordset.Update
If Adodc2.Recordset.EOF Then
Adodc2.Recordset.AddNew
End If
Adodc2.Recordset.Fields(0) = UCase(txtHTD.Text)
Adodc2.Recordset.Fields(1) = UCase(txtDe.Text)
Adodc2.Recordset.Fields(2) = UCase(txtPara.Text)
Adodc2.Recordset.Fields(3) = CDate(txtFecha.Text)
Adodc2.Recordset.Fields(4) = UCase(txtRemi.Text)
Adodc2.Recordset.Fields(5) = UCase(txtOb)
Adodc2.Recordset.Fields(6) = Text2.Text
Adodc2.Recordset.Update
pero ahora estoy disenando una aplicacion en VB.NET y necesito visualizar data. ya cree el Data Source, agregue un ODBC Connection (OdbcConnection1) lo conecte con el DataSource (ConnectionString:DSN=ccc;DefaultDir=D:\;DriverId=25;DBQ=D:\bdPtoFijo.mdb;MaxBufferSize=2048;FIL=MS Access;PageTimeout=5;UID=admin) de forma exitosa. lo q necesito es saber cual codigo usar para buscar y visualizar data en la aplicacion que estoy creando, mediante esta conexion... espero me ayuden gracias....
Clave1 = CDbl(txtHTD.Text)
Adodc2.CommandType = adCmdText ' Maestro
sql = "select * from MAESTRO where HTD = " & Clave1 ' & "'"
Adodc2.RecordSource = sql
Adodc2.Refresh
' Adodc2.Recordset.Update
If Adodc2.Recordset.EOF Then
Adodc2.Recordset.AddNew
End If
Adodc2.Recordset.Fields(0) = UCase(txtHTD.Text)
Adodc2.Recordset.Fields(1) = UCase(txtDe.Text)
Adodc2.Recordset.Fields(2) = UCase(txtPara.Text)
Adodc2.Recordset.Fields(3) = CDate(txtFecha.Text)
Adodc2.Recordset.Fields(4) = UCase(txtRemi.Text)
Adodc2.Recordset.Fields(5) = UCase(txtOb)
Adodc2.Recordset.Fields(6) = Text2.Text
Adodc2.Recordset.Update
pero ahora estoy disenando una aplicacion en VB.NET y necesito visualizar data. ya cree el Data Source, agregue un ODBC Connection (OdbcConnection1) lo conecte con el DataSource (ConnectionString:DSN=ccc;DefaultDir=D:\;DriverId=25;DBQ=D:\bdPtoFijo.mdb;MaxBufferSize=2048;FIL=MS Access;PageTimeout=5;UID=admin) de forma exitosa. lo q necesito es saber cual codigo usar para buscar y visualizar data en la aplicacion que estoy creando, mediante esta conexion... espero me ayuden gracias....
Valora esta pregunta


0