Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-10-2008
tonid tonid is offline
Miembro
 
Registrado: sep 2003
Posts: 15
Poder: 0
tonid Va por buen camino
conexion diferentes bases de datos

Hola compañeros estoy desarrollando una apliación de gestión de exhortos, con componentes ado desde delphi 6, y la bd es sql server 2005 express. La consulta es que he creado dos bases de datos una para civil y otra para penal, y quiero que al arrancar la aplicación pueda seleccionar la base de datos, empleo el adoconnection en su propiedad connectionstring, pero creo que me he liado, alguna ayuda?
gracias.
Responder Con Cita
  #2  
Antiguo 07-10-2008
luisgutierrezb luisgutierrezb is offline
Miembro
 
Registrado: oct 2005
Ubicación: México
Posts: 925
Poder: 19
luisgutierrezb Va por buen camino
Puedes modificar el connectionstring antes de que te conectes para asi entrar a la base que quieras
Responder Con Cita
  #3  
Antiguo 08-10-2008
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.233
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Una forma sencilla es crear las dos cadenas de conexion en dos ficheros de texto, por ejempo. Al entrar al la aplicación pregunta al usuario y dependiendo de la respuesta carga en la propiedad ConnectionStrring de tu ADOConnection el contenido del fichero que quieras.

Algo Así:

Código Delphi [-]
var
  TS:TStrings;
  fileName, path:String;
begin
  // preguntar cual desea cargar
  ....


  if (resp = 'penal') then begin
    fileName := 'connP.txt';
  end
  else begin
    fileName := 'connC.txt';
  end;

  path := IncludeTrailingBackSlash(ExtractFilePath(Application.ExeName));
  TS := TStringList.Create();
  try
    TS.LoadFromFile(path + fileName);
    ADOConnection.ConnectionString := TS.Text;
  finally
    TS.Free;
  end;
end;
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #4  
Antiguo 08-10-2008
Avatar de poliburro
[poliburro] poliburro is offline
Miembro Premium
 
Registrado: ago 2004
Ubicación: México D.F
Posts: 3.068
Poder: 23
poliburro Va por buen camino
Cita:
Empezado por Neftali Ver Mensaje
Una forma sencilla es crear las dos cadenas de conexion en dos ficheros de texto, por ejempo. Al entrar al la aplicación pregunta al usuario y dependiendo de la respuesta carga en la propiedad ConnectionStrring de tu ADOConnection el contenido del fichero que quieras.

Es verdad aunque para mi gusto son mejor los archivos UDL ya que al ejecutarlos te permiten configurar la cadena con el Wizard de ADO. Además de que estos archivos al tener la estructura de un Ini, son sumamente sencillos de leer.


Otra opción para ti amigo es que definas la cadena de conexión apuntando a la DB master y en tiempo de ejecución y dependiendo de la elección del usuario y antes de abrir la conexión cambies la propiedadad DefaultDataBaseName



Saludos y suerte
__________________
Conoce mi blog http://www.edgartec.com
Responder Con Cita
  #5  
Antiguo 08-10-2008
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.233
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por poliburro Ver Mensaje
para mi gusto son mejor los archivos UDL ya que al ejecutarlos te permiten configurar la cadena con el Wizard de ADO.
Básicamente es lo mismo.
En el caso de los UDL no puedes hacer directamente LoadFromFile, pero tienen la ventaja como dices de abrirse con el asistente.

También es buena elección.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #6  
Antiguo 08-10-2008
Avatar de poliburro
[poliburro] poliburro is offline
Miembro Premium
 
Registrado: ago 2004
Ubicación: México D.F
Posts: 3.068
Poder: 23
poliburro Va por buen camino
Cita:
Empezado por Neftali Ver Mensaje
Básicamente es lo mismo.
En el caso de los UDL no puedes hacer directamente LoadFromFile, pero tienen la ventaja como dices de abrirse con el asistente.

También es buena elección.

Con loadfromfile no, pero sí con la clase ini.

Código SQL [-]
 
With TInifile.Create('ArchivoUdl') Do
  Begin
    AdoConnection.Connectionstring :=  'Provider=' + ReadStringIni('OleDb','Provider','');
    Free;
  End;
__________________
Conoce mi blog http://www.edgartec.com
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
ODBC y diferentes Bases de datos FDB Conexión con bases de datos 0 23-09-2008 18:56:01
JOIN de dos tablas en dos bases de datos diferentes gluglu Firebird e Interbase 3 12-02-2005 13:39:48
select con diferentes bases de datos Carlos SM MySQL 1 10-01-2005 19:21:03
Una Consulta De 2 Bases De Datos Diferentes edy_aca SQL 2 12-12-2003 12:24:49
Consulta entre bases de datos diferentes yanaysi Varios 1 28-05-2003 05:35:37


La franja horaria es GMT +2. Ahora son las 13:57:17.


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