Ahora me ha surgido otro problemita, sucede que ambas bases de datos estan protegidas por contraseña por lo cual no puedo hacer el migrado de datos, es decir, cuando les quito la contraseña a ambas bases de datos o por lo menos a la base de datos remota, si logro hacer el migrado de datos, pero cuando tiene contraseña no puedo hacer dicho migrado.
Mi conexion a la base de datos es la siguiente
Código Delphi
[-]
IF ADOCONNECTION1.Connected= FALSE THEN
BEGIN
IF FILEEXISTS(RUTA) THEN BEGIN
ADOCONNECTION1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+QuotedStr(RUTA)+';Persist Security Info=false;Jet OLEDBatabase Password=123456'; ADOCONNECTION1.Connected:=TRUE;
ShowMessage('LA CONEXION DE LA BASE DE DATOS HA SIDO EXITOSA');
EXIT;
END
ELSE
BEGIN ShowMessage('NO SE ENCUENTRA LA BASE DE DATOS EN LA RUTA ESPECIFICADA');
EDIT1.SetFocus;
EXIT;
END;
END
ELSE BEGIN
ShowMessage('LA CONEXION DE LA BASE DE DATOS YA HA SIDO REALIZADA ANTERIORMENTE');
EXIT;
END;
despues estes es el codigo que utilizado para el migrado de la informacion es el siguiente:
Código Delphi
[-]with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('INSERT Into tbl_ING_Recibos Select * From tbl_ING_Recibos In"'
+DIR+'"where FechaRecibo like "'+FECHAPAGO+
'" AND ClaveRecibo BETWEEN '+RECIBO1+' AND '+RECIBO2+'');
ExecSQL;
END;
with ADOQuery2 do
begin
Close;
SQL.Clear;
SQL.Add('INSERT Into tbl_ING_RecibosCuentas Select * From tbl_ING_RecibosCuentas In"'
+DIR+'"where ClaveRecibo BETWEEN '+RECIBO1+' AND '+RECIBO2+'');
ExecSQL;
END; END;
el problema esta en que al conectarme con la base de datos a una si la estoy abriendo con el password y la otra en ningun
momento digo cual es su pass ni lo asigno ni nada y pues no se donde debo abrir la base de datos y asignarle su pass.
ahora bien la solucion seria de que ya fuera que al momento de abrir mi aplicacion antes de hacer el migrado de datos, yo pudiera quitarle por medio
de codigo la contraseña a la base de datos, luego hacer el migrado y poner nuevamente la contraseña a la base de datos ó
en su defecto, pues que alguien me ayude con mi consulta para poder abrir la base de datos antes que se ejecute
mi codigo SQL.
Espero me respondan.
saludos