Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Conectar con servidor (https://www.clubdelphi.com/foros/showthread.php?t=67890)

Ricardo2010 12-05-2010 16:47:39

Conectar con servidor
 
Buenas, trabajo con D2009 y tengo el siguiente problema, la aplicación copiaba documentos desde un equipo (Cliente) a otro (servidor). sin problemas Esto lo efectua con las siguientes instrucciones

if MessageDlg(Msg, mtCustom, mbOKCancel, 0) = mrOK then
begin
OldFile := TFileStream.Create(
OldFileName, fmOpenRead or fmShareDenyWrite);
try
NewFile := TFileStream.Create(
NewFileName, fmCreate or fmShareDenyRead);
try
NewFile.CopyFrom(OldFile, OldFile.Size);
finally
FreeAndNil(NewFile);
end;
finally
FreeAndNil(OldFile);
end;
end;

Esta funciona correctamente, el problema que tengo es que se decidio traspasar el directorio a otro servidor , este se sabe completa la ruta (path) pero el sistema no llega ya que debe autentificarse para ingresar, el usuario y contraseña la tengo.
Tengo el path, usuario y contraseña para identificacion, la pregunta es como hago para que internamente a traves de D2009 se conecte al servidor.

Si yo por fuera llamo al path me solicita el usuario/contraseña para ingresar se las doy y el sistema nuevamente vuelve a funcionar, este acto como lo hago internamente.

gracias


La franja horaria es GMT +2. Ahora son las 17:16:37.

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