Marcos y publico en general,
Gracias por tu respuesta pero todo lo que enuncias lo tengo hecho y lo verifique. Tengo el BDE instalado en ambas maquinas y apuntan a la misma carpeta del servidor.
Te copio el codigo por si se me escapo algo...
Código Delphi
[-]
procedure TDM.DataModuleCreate(Sender: TObject);
begin
ok:=true;
getdir(0,dir);
try
database1.AliasName:='taco';
database1.Connected:=true;
if ((anterior=1))
then
begin
if( messagedlg('La última ejecución fue en modo local,'+#13+'desea restaurar la Base de Datos de la red?',MTWarning,mbOKCancel,0)=mrok)
then
begin
database1.Connected:=false;
Database1BeforeConnect(sender);
windows.WinExec(pchar(dir+'\Restauracion\Restauracion.exe'),1);
database1.Connected:=true;
end;
end;
database1.Session.NetFileDir:=ExpandUNCFileName(Database1.Directory+'\NET');
database1.Session.PrivateDir:='C:\WINDOWS\temp'; activarTablas;
logfile(0);
except
if (messagedlg('La red no está funcionando,' +#13+'desea trabajar en forma local?', MTerror, mbOKCAncel,0)=mrok)
then
begin
database1.Directory:='c:\';
database1.Connected:=false;
database1.AliasName:='tacoloc';
database1.Connected:=true;
database1.Session.NetFileDir:=ExpandFileName(Database1.Directory+'\NET');
database1.Session.PrivateDir:='C:\WINDOWS\temp'; activarTablas;
logfile(1);
end
else
ok:=false;
end;
end;
a que te referis con apuntar con...
Cita:
Empezado por marcoszorrilla
apuntanto a la misma carpeta del Servidor el fichero de bloqueos .Net
Por ejemplo.
\\Servidor\Datos\Net
|
Vale aclarar que si se conecta una sola no hay problemas, la cuestion surge cuando se quiere conectar la segunda
Gracias