Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 05-02-2008
MaSSaKKre MaSSaKKre is offline
Miembro
 
Registrado: sep 2005
Posts: 34
Poder: 0
MaSSaKKre Va por buen camino
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 [-]


//CONECTANDO LA BASE DE DATOS
    //CONDICION DE QUE LA BD DEBE ESTAR DESCONECTADA
     IF ADOCONNECTION1.Connected= FALSE THEN
        BEGIN
 IF FILEEXISTS(RUTA) THEN  //SI LA RUTA EXISTE SE CONECTA
  BEGIN
 ADOCONNECTION1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+QuotedStr(RUTA)+';Persist Security Info=false;Jet OLEDBatabase Password=123456'; //asignando la contraseña de la base de datos
 ADOCONNECTION1.Connected:=TRUE;
 ShowMessage('LA CONEXION DE LA BASE DE DATOS HA SIDO EXITOSA');
 EXIT;
  END
    ELSE
      BEGIN //SI LA RUTA NO EXISTE ENVIA MENSAJE DE ERROR
      ShowMessage('NO SE ENCUENTRA LA BASE DE DATOS EN LA RUTA ESPECIFICADA');
      EDIT1.SetFocus;
      EXIT;
      END;
        END
           ELSE   //IF DE VERIFICACION DE BD CONECTADA, SI YA ESTABA CONECTADA ENVIA AVISO
             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;
              //TABLA_LOCAL SERVIDOR         //TABLA_REMOTA LAPTOP
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;
//ENVIANDO DATOS A LA SEGUNDA TABLA DE LA BASE DE DATOS
with ADOQuery2 do
begin
   Close;
   SQL.Clear;
                  //TABLA_LOCAL SERVIDOR         //TABLA_REMOTA LAPTOP
SQL.Add('INSERT Into tbl_ING_RecibosCuentas Select * From tbl_ING_RecibosCuentas In"'
        +DIR+'"where ClaveRecibo BETWEEN '+RECIBO1+' AND '+RECIBO2+'');
 ExecSQL;
  END;//ADOQUERY
     END; //CERRAMOS EL IF DE VERIFICACION DE BD CONECTADA
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
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Como pasar datos de una hoja de Excel a Bases de Datos de Paradox Goyo OOP 1 06-02-2007 01:57:20
Mydac con Treeviwew como listar Bases de Datos y Tablas JXJ MySQL 0 10-10-2006 20:21:02
Intercambiar información entre bases de datos por Internet ¿TCP o FTP? Ariel Pérez Internet 2 15-09-2006 08:28:35
Como realizar consultas entre dos bases de datos jfgonzalez Conexión con bases de datos 1 20-10-2005 01:52:48
Como Asociar Tablas de bases de Datos distintas pcicom Firebird e Interbase 1 29-09-2004 18:39:32


La franja horaria es GMT +2. Ahora son las 05:31:45.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi