Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Aplicacion en red con delphi (https://www.clubdelphi.com/foros/showthread.php?t=66984)

zugazua2001 23-03-2010 12:51:39

Aplicacion en red con delphi
 
Hola amigos del foro, tengo un servidor windows server 2003, un dominio armado dentro del mismo, puedo acceder desde un escritorio remoto a mi equipo que hace de servidor, al entrar mas de un usuario se me corrompen los indices, puedo de alguna manera evitar esa corrupcion de indices?

Muchas gracias por todo

Casimiro Notevi 23-03-2010 13:23:13

Amigo zugazua2001, llevas más de 200 mensajes, creo que has leído la guía de estilo y "la otra guía de estilo" que está en mi firma ;).
Tan sólo podemos contestarte con: no somos adivinos ;)
O sea, que expliques algo, ¿no te parece que se te olvidó? jejeje :)

zugazua2001 26-03-2010 17:45:03

Se corrompe el indice al acceder desde escritorio remoto
 
Hola amigos del foro, tengo el siguiente inconveniente, uso escritorio remoto para acceder a mi equipo donde tengo un sistema desarrollado en delphi 6 con paradox y sistema operativo xp. El sistema si esta mi señora en la maquina y yo en el escritorio remoto simultaneamente se me corrompen los indices, existe modo de que yo pueda solo ver la informacion del sistema sin que se corrompan los indices, ya se que el sistema es un sistema de escritorio, pero bue quizas existe alguna solucion.

Gracias por todo

Softweb 27-03-2010 00:17:24

Hola zugazua2001

El problema es que paradox para funcionar multiusuario (en red) hay que hacerle algunas cosas lo primero compartir el directorio de bloqueo.

Por ejemplo crea dentro del directorio de la base de datos un directorio vació que se llame "net" y luego en el create del Datamodule de la aplicación pones algo como esto.

Código Delphi [-]
var
  DbDir: string;


  // Control de posible reventón por faltar el alias
  try
    Database1.Close;
    Database1.Open;
    DbDir := Database1.Directory;
    Database1.Close;
    Database1.Session.NetFileDir := DbDir + 'Net';
    Database1.Open;
    TableEntorno.Open;
    TableEntorno.Close;
  except
    MessageDlg( 'No se puede conectar con la Base de Datos', mtError, [mbYes], 0);
    Application.Terminate;
  end;

De esta forma comparten todos los usuarios los bloqueos de la base de datos.

Aparte es conveniente cambiar algunas configuraciones como el cache de escritura en disco y alguna mas.

Saludos


La franja horaria es GMT +2. Ahora son las 16:31:01.

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