Acceso denegado al crear un fichero de texto
 

Hola.-

Mi problema es el siguiente, quiero escribir en intraweb un fichero de texto una serie de lineas, el código es el siguiente.-

procedure GuardarFicheroOut(Registro : String);
Var
Fichero : TextFile;
Begin
AssignFile(Fichero,'pepe.txt');
Try
Append(Fichero);
Except
Rewrite(Fichero);
End;
Try
Write(Fichero, Registro);
Writeln(Fichero,'');
Finally
CloseFile(Fichero);
End;
End;

procedure TIWForm1.IWAppFormCreate(Sender: TObject);
begin
GuardarFicheroOut('Uno');
GuardarFicheroOut('Dos');
GuardarFicheroOut('Tres');
end;

En local funciona perfectamente pero a la hora de subirlo a Internet siempre da el mismo error "File Access Denied", he mirado los permisos y tiene dado todos los permisos posibles, pero me sigue dando ese error.

¿A que se puede deber?.

Gracias

Intenta usar las etiquetas [ Delphi ] y [ /Delphi ] (sin espacios). Voy a volver a escribir el código para que se vea mejor tu código para buscar el fallo

Código Delphi [-]
procedure GuardarFicheroOut(Registro : String);
 Var
   Fichero : TextFile;
 Begin
   AssignFile(Fichero,'pepe.txt');
   Try
     Append(Fichero);
   Except
     Rewrite(Fichero);
   End;
   Try
     Write(Fichero, Registro);
     Writeln(Fichero,'');
   Finally
     CloseFile(Fichero);
   End;
 End;

procedure TIWForm1.IWAppFormCreate(Sender: TObject);
 begin
    GuardarFicheroOut('Uno');
    GuardarFicheroOut('Dos');
    GuardarFicheroOut('Tres');
 end;

Estas completamente seguro que el usuario con el que corre el servidor web (iis o apache) tiene permisos de escritura en el directorio donde intentas escribir??

en principio, si utilizas IIS, el usuario que accede al fichero es IUsrInvitado tiene todos los permisos ese usuario??? has mirado los permisos en el IIS??? has mirado los propios permisos de windows???

Espero haberte orientado un poco más....

Saludos, Tony

Ya funciona perfectamente, el problema era que había que poner el camino absoluto del servidor (nada de "../").

Muchas gracias a todos por vuestras respuestas.