Caty,
por lo que veo, lo que quieres hacer son dos pasos:
-primero bajarla mediante FTP a un equipo al que tengas acceso que puede ser en el que resida la aplicación.
-segundo, acceder a ella mediante ADO(por ejemplo) de modo local.
Para lo primero puedes utilizar "Microsoft Internet Tranfer Control" que te permite trabajar con dos protocolos:
-http
-ftp
Para lo segundo, utiliza ADO:
(Tendrás que cambiar mucho código pues es un ejemplo sacado del MSDN)
Código:
Public Sub OpenX()
Dim cnn1 As ADODB.Connection
Dim rstEmployees As ADODB.Recordset
Dim strCnn As String
' Abre una conexión.
strCnn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & S_ruta & "\tuBBDD.mdb;Persist Security Info=False"
Set cnn1 = New ADODB.Connection
cnn1.Open strCnn
' Abre la tabla Empleados.
Set rstEmployees = New ADODB.Recordset
rstEmployees.CursorType = adOpenKeyset
rstEmployees.LockType = adLockOptimistic
rstEmployees.Open "empleado", cnn1, , , adCmdTable
' Asigna la fecha de contratación del registro del primer empleado
' a una variable y, después, cambia la fecha de contratación.
varDate = rstEmployees!hire_date
Debug.Print "Datos originales"
Debug.Print " Nombre – Fecha de contratación"
Debug.Print " " & rstEmployees!fName & " " & _
rstEmployees!lName & " - " & rstEmployees!hire_date
rstEmployees!hire_date = #1/1/1900#
rstEmployees.Update
Debug.Print "Datos que han cambiado"
Debug.Print " Nombre – Fecha de contratación"
Debug.Print " " & rstEmployees!fName & " " & _
rstEmployees!lName & " - " & rstEmployees!hire_date
' Vuelve a consultar el objeto Recordset y restablece la
' fecha de contratación.
rstEmployees.Requery
rstEmployees!hire_date = varDate
rstEmployees.Update
Debug.Print "Datos después de restablecer."
Debug.Print " Nombre – Fecha de contratación"
Debug.Print " " & rstEmployees!fName & " " & _
rstEmployees!lName & " - " & rstEmployees!hire_date
rstEmployees.Close
cnn1.Close
End Sub
Espero que te sirva.
Un saludo
Pablo