conexion ADO access

conexion ADO access

Postby Francisco Horta » Mon Jul 28, 2008 3:52 am

Tengo este codigo para abrir una base de datos de access sin password y va muy bien:

cFile:="mibase.mdb"
oConexionAdo := TOLEAUTO():New("adodb.connection")
oRS := TOLEAUTO():New("adodb.recordset")
oOpen := "Provider= MicroSoft.Jet.OLEDB.4.0;Data Source="+cFile+";"
oConexionAdo:Open(oOpen)

Pero al tratar de abrir una base de datos con Password me truena en el open,y lo hago asi:

cFile:="mibaseconpass.mdb"
oConexionAdo := TOLEAUTO():New("adodb.connection")
oRS := TOLEAUTO():New("adodb.recordset")
oOpen := "Provider= MicroSoft.Jet.OLEDB.4.0;Data Source="+cFile+";Password=DB12345"
oConexionAdo:Open(oOpen)

En que parte estoy fallando?
gracias
paco
Francisco Horta
 
Posts: 845
Joined: Sun Oct 09, 2005 5:36 pm
Location: la laguna, mexico.

Postby Armando » Mon Jul 28, 2008 1:43 pm

Paco:

Encontre esto, tal vez es tu solución:

Code: Select all  Expand view  RUN
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;Jet OLEDB:Database Password=MyDbPassword;


Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3239
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Postby Francisco Horta » Tue Jul 29, 2008 5:32 pm

Gracias Armando
salu2
Paco
Francisco Horta
 
Posts: 845
Joined: Sun Oct 09, 2005 5:36 pm
Location: la laguna, mexico.


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 35 guests