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 24-08-2006
edalmasso edalmasso is offline
Miembro
 
Registrado: nov 2005
Ubicación: Mendoza - Argentina
Posts: 37
Poder: 0
edalmasso Va por buen camino
Question Como cambiar la conexion a SQLServer en runtime?

Buenas foro!!,

Tengo una pregunta sobre la ficha de Conexión para SQL Server:

"Utilice la ficha Conexión para especificar cómo conectar a los datos de Microsoft SQL Server.
La ficha Conexión depende del proveedor y sólo muestra las propiedades de conexión que necesita el proveedor de OLE DB para Microsoft SQL Server. "

Esa ficha, lo que quiero es poder mostrar la pantalla que usa todo programador para configurar una conexión a SQLServer.
Cargar la conexión y que se pueda modificar.
Lo que no puedo lograr es saber que clase es la ficha.

Por las dudas, en el zip esta la imagen de la ficha que quiero mostrar.

Saludos!!
Archivos Adjuntos
Tipo de Archivo: zip SQLconn.zip (3,3 KB, 26 visitas)
Responder Con Cita
  #2  
Antiguo 27-08-2006
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
Esto te servirá

Esta rutina hace lo que necesitas mi buen amigo

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
 Const
   LCSPATHUDLCONFIG = 'c:\Tem-des\edgram\';
 Var
   LsUDlConfig: WideString; //Almacena la cadena de conexion
   LStlDTLCont: TStringList; //Almacena el contenido del DataLink
begin
  Try
     LStlDTLCont := TStringList.Create;
     //Cargo la configuración almacenada
     If FileExists(LCSPATHUDLCONFIG + 'Test.udl') Then
       LStlDTLCont.LoadFromFile(LCSPATHUDLCONFIG + 'Test.udl');
     //llamo a la ventana de configuración de la cadena de conexión
     LsUDlConfig := PromptDataSource(Self.Handle,LStlDTLCont.Text);
     //Asigno la nueva configuración y grabo los cambios
    If Length(Trim(LsUDlConfig)) > 0 Then
      LStlDTLCont.Text := LsUDlConfig;
    LStlDTLCont.SaveToFile(LCSPATHUDLCONFIG + 'Test.udl');
  Finally
    LStlDTLCont.free;
  End;
end;

Última edición por poliburro fecha: 27-08-2006 a las 05:38:24.
Responder Con Cita
  #3  
Antiguo 28-08-2006
edalmasso edalmasso is offline
Miembro
 
Registrado: nov 2005
Ubicación: Mendoza - Argentina
Posts: 37
Poder: 0
edalmasso Va por buen camino
Muchas gracias por la respuesta, probe la función pero hay un método que no puedo acceder, lo habrás creado vos?, es : PromptDataSource( ... )
Y no me aparece en la ayuda ni en Internet buscando.

Saludos
Responder Con Cita
  #4  
Antiguo 28-08-2006
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
La función PromptDataSource se encuentra en la unidad ADODB

Por cierto yo uso delphi 7, no se cuanta compatibilidad haya con versiones anteriores o nuevas de delphi.

Suerte
Responder Con Cita
  #5  
Antiguo 28-08-2006
edalmasso edalmasso is offline
Miembro
 
Registrado: nov 2005
Ubicación: Mendoza - Argentina
Posts: 37
Poder: 0
edalmasso Va por buen camino
Thumbs up

Querido, anduvo espectacular!!, muchas gracias.
Lo hice andar en D2006 en un proyecto .NET sin problemas.
Saludos.
Eduardo

PD: gracias x la respuesta tan rápida.
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
Como evitar un Runtime error 216 sitrico Varios 2 20-03-2009 17:21:12
conexión con sqlserver gerly MS SQL Server 11 19-12-2007 22:14:42
Como crear un usuario SQLSERVER desde ASP.NET sin ser DBA o SA? HombreSigma .NET 1 02-12-2005 19:03:54
Conexion a base de datos en MSDE con login y clave SQLSERVER HombreSigma MS SQL Server 1 26-09-2005 03:54:23
Cambiar mi Wallpaper en RUntime bustio Varios 4 01-10-2004 18:47:13


La franja horaria es GMT +2. Ahora son las 00:23:50.


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