Ver Mensaje Individual
  #4  
Antiguo 05-08-2006
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.557
Reputación: 25
egostar Va camino a la fama
Post

Cita:
Empezado por Coco_jac
Hola Lepe, mira la configuracion lo tengo en un datamodulo, mira hize una pruaba antes de eso de cambiar el alias en tiempo de ejecucion pero me salia error como si no refrescara la nueva ruta, luego tenia que cerrar y volver a ejecutar para ver recien los cambios, ya que la ruta lo guardo en un INI, y los actualizo ahi mismo. y los vuelvo a leer.
NO se tal vez hice algo incorrecto.

Espero sus comentarios
Si estas usando el proceso del articulo "Paradox en Red", estas usando archivos INI con la siguiente estructura

Cita:
[Datos]
RutaRed = \\MOVIL\
RutaLocal = D:\DESARROLLO\SIH\
Ruta = Tables
Ruta PrivateDir = SIHPriv
Ruta net = SIHNet
Servidor = SI
En el DataModule yo uso lo siguiente:

Cita:
rutaRed := readstring ('Datos', 'RutaRed', '');
rutaLocal := readstring ('Datos', 'RutaLocal', '');
servidor := readstring ('Datos', 'Servidor', '');
Si se ejecuta el programa en el mismo servidor uso esto:

Cita:
ruta := rutaLocal + readstring ('Datos', 'Ruta', '');
rutanet := rutaLocal + readstring ('Datos', 'Ruta net', '');
rutaprivate := rutaLocal + readstring ('Datos', 'Ruta PrivateDir', '');
y si se ejecuta desde otra maquina de la red uso esto:

Cita:
ruta := rutaRed + readstring ('Datos', 'Ruta', '');
rutanet := rutaRed + readstring ('Datos', 'Ruta net', '');
rutaprivate := rutaRed + readstring ('Datos', 'Ruta PrivateDir', '');
Entonces cuando creas la sesión ya no importa de que maquina se este ejecutando el programa

Cita:
With Session1 do begin
NetFileDir := rutanet;
PrivateDir := rutaprivate;
End;
Params.Clear;
Params.Add('LOCAL SHARE=FALSE');
Params.Add('PATH=' + RUTA);
Params.Add('DEFAULT DRIVER=PARADOX');
Params.Add('ENABLE SCHEMA CACHE=TRUE');
Params.Add('ENABLE BCD=FALSE');
Además de que no debes de usar la propiedad Alias del DataBase, usas solo la propiedad DriverName = STANDARD

Espero haber entendido tu pregunta y por supuesto contestado de manera explicita.

Saludos.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita