
Pregunta Vb .net
Publicado por Ariel Olea (4 intervenciones) el 11/07/2006 16:49:12
Hola a todos.
alguien me podria decir como puedo pasar este codigo
de visual basic 6 a visual basic 2005 express edition?
Agradecere su ayuda.
gracias..
codigo VB6
==========
Dim Db As ADODB.Connection
Dim Conexion As String
Dim WithEvents Rs As ADODB.Recordset
Conexion = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & App.Path & "\BASE.mdb"
Set Db = New ADODB.Connection
Db.Open Conexion
Set Rs = New ADODB.Recordset
Rs.CursorLocation = adUseClient
Rs.Open "SELECT* FROM TABLA", Db, adOpenDynamic, adLockOptimistic, adCmdText
Set DataGrid1.DataSource = Rs
'CERRAR FORMULARIO UNLOAD
Set DataGrid1.DataSource = Nothing
Rs.Close
Set Rs = Nothing
Db.Close
Set Db = Nothing
alguien me podria decir como puedo pasar este codigo
de visual basic 6 a visual basic 2005 express edition?
Agradecere su ayuda.
gracias..
codigo VB6
==========
Dim Db As ADODB.Connection
Dim Conexion As String
Dim WithEvents Rs As ADODB.Recordset
Conexion = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & App.Path & "\BASE.mdb"
Set Db = New ADODB.Connection
Db.Open Conexion
Set Rs = New ADODB.Recordset
Rs.CursorLocation = adUseClient
Rs.Open "SELECT* FROM TABLA", Db, adOpenDynamic, adLockOptimistic, adCmdText
Set DataGrid1.DataSource = Rs
'CERRAR FORMULARIO UNLOAD
Set DataGrid1.DataSource = Nothing
Rs.Close
Set Rs = Nothing
Db.Close
Set Db = Nothing
Valora esta pregunta


0