Conectar Base de datos Access

Option Explicit
Public sql As String
Public var As String
Public rssql As ADODB.Recordset
Public Conn As ADODB.Connection

Sub main()
Set Conn = New ADODB.Connection
Set rssql = New ADODB.Recordset

Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;persist
security info=true;Jet OLEDB:Database
Password=XXXXXXX;Data source=" & App.Path & "\MP3.Mdb"
Form1.Show
End Sub
Nota: lo que dice "App.Path" es la ruta de donde tienes
la aplicacion y lo concatenas con el nombre de la base de
datos.

Espero te sirva

Florentino

Quisiera un ejemplo de conexion con un BD Access 2000

alojada en un sitio

web.

Gracias


.