un gran problema con bde

[LordBits]

no se porque mi aplicacion en ciertas maquinas cuando ingreso a ella, se ve que empieza a buscar por la red de la empresa informacion, sabiendo que la base de datos esta local,
he mirado el bde y el path esta direccionado localmente.pero el hace una busqueda en la red, me doy cuenta porque los iconos de la red enciende, ademas es mas lenta..

alguien puede ayudarme con esto....

[marcoszorrilla]

Tendrías que decirnos exactamente como tienes configurado el camino y que es lo que has puesto en el Alias.....


Un Saludo.

[LordBits]

Este es el codigo que utilizo para crear el alias cuando en la maquina no existe.

Siempre la base de datos va a estar en el directorio donde se ejecute la aplicación, pero este en algunos equipos se va por la red a buscar algo..


DB_DIRNAME = datos

GE_DBNAMEALIAS = ‘Gelec’

session.NetFileDir := 'c:\';

(* If alias does not exist then create it *)

if not Session.IsAlias(GE_DBNAMEALIAS) then begin

(* Create alias *)

sDBPath := ExtractFilePath(Application.Exename) + DB_DIRNAME;

Session.AddStandardAlias(GE_DBNAMEALIAS, sDBPath, 'PARADOX');

try

Session.SaveConfigFile;

except

ShowMessageBox(Application.Handle , GetMsg(IDS_GEEXEC0002),

GetMsg(IDS_MSG_ERROR),

MB_ICONINFORMATION or MB_OK);

UnloadLang;

Halt(0);

end;

end

else begin (* Update alias directory *)

lstParams := TStringList.Create;

lstParams.Clear;

sDBPath := ExtractFilePath(Application.Exename) + DB_DIRNAME;

lstParams.Add('PATH=' + sDBPath);

Session.ModifyAlias(GE_DBNAMEALIAS, lstParams);

try

Session.SaveConfigFile;

except

ShowMessageBox(Application.Handle , GetMsg(IDS_GEEXEC0002),

GetMsg(IDS_MSG_ERROR),

MB_ICONINFORMATION or MB_OK);

UnloadLang;

Halt(0);

end;

lstParams.Destroy;

end;