09/10/2008, 18:09
|
| | | Fecha de Ingreso: octubre-2008
Mensajes: 37
Antigüedad: 15 años, 7 meses Puntos: 1 | |
| Respuesta: modulo de conexion de una BD y Visual basic
Option Explicit
Dim cadenaconexion As String
Public conn As ADODB.Connection
Public tabla As New ADODB.Recordset
Public Sub conectar()
cadenaconexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Archivos de programa\Microsoft Visual Studio\VB98\NWIND.MDB;Persist Security Info=False"
Set conn = CreateObject("ADODB.connection")
conn.ConnectionString = cadenaconexion
conn.CursorLocation = 3
conn.Open
Exit Sub
error:
Resume Next
End Sub
////////////////////////////////////////////////////////////////////////////
pero ahora quisiera una codificacion para abrir la tabla desde un formulario utilizando ado |