Ver Mensaje Individual
  #1  
Antiguo 08-01-2015
Jose_Pérez Jose_Pérez is offline
Miembro
 
Registrado: may 2003
Posts: 156
Reputación: 22
Jose_Pérez Va por buen camino
Problemas con Session.PrivateDir en Windows 7

Antes de nada feliz año a tod@s.

Tengo un programa funcionando y trabajando en red (Delphi 5 y tablas dBase) desde hace un año y hasta ahora no se me había presentado ningún problema con Session.PrivateDir. Sin embargo, al instalar Windows 7 en uno de los usuario me genera el siguiente error:

Invalid parameter.
File or directory not exits.
File c:\TemporalPrograma\_QSQL000.dbf
Table not exists

El error se produce al lanzar una consulta SQL. Por alguna razón no se crea el archivo _QSQL000.dbf en el directorio especificado en Session.PrivateDir . Hemos descartado un problema de permiso de escritura; tanto es así que los archivos paradox.lck y proxusr.lck si se crean. Los demás usuarios trabajan con Window XP y no tienen problemas.

Este es el código:
Código Delphi [-]
  DataModulo.Database.Params.Add('DEFAULT DRIVE=PARADOX');
  DataModulo.Database.Params.Add('ENABLE BDC=FALSE');

  If Not DirectoryExists(Path+'\Net') Then
    MkDir(Path+'\Net');

  If Not DirectoryExists('C:\TemporalPrograma') Then
    MkDir('C:\TemporalPrograma');

  Session.PrivateDir:='C:\TemporalPrograma
  Session.NetFileDir:=Path+'\Net';

¿Alguna sugerencia?

Última edición por Jose_Pérez fecha: 08-01-2015 a las 15:47:13.
Responder Con Cita