[Brewster]

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