Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.20;
Скачать: CL | DM;

Вниз

Создание файла!   Найти похожие ветки 

 
serko   (2005-02-06 18:20) [0]

Ребя помогите! На сетевом компьютере Server открыт полный доступ к папке Delphi, а я со своего компа Serega хочу там создать файл! Делаю так:

procedure TForm1.BitBtn1Click(Sender: TObject);
Begin
    Assignfile(vr,"\\server\c\Delphi\Fail.txt");
    Rewrite(vr);
    closefile(vr);
End;

При нажатии кнопки выскакивает такая ошибка "I\O error 53"
В чем проблема?
Помогите решить такую задачку!
Хотя если в ручную создать там файл, никаких проблем нет!
Откликнувшимся заранее спасиба!


 
default ©   (2005-02-06 18:34) [1]

ShowMessage(SysErrorMessage(53))="Не найден сетевой путь"


 
Ivolg ©   (2005-02-06 18:35) [2]

У меня всё работает, попробуй так:
var
 vr:TStringList;
begin
   vr:=TStringList.Create;
   vr.SaveToFile("\\server\c\Delphi\Fail.txt");
end;


 
serko   (2005-02-06 18:47) [3]

>> default ©   (06.02.05 18:34) [1]
Как это не найден сетевой путь если он реально существует?


 
default ©   (2005-02-06 18:49) [4]

serko   (06.02.05 18:47) [3]
значит путь задан неверно(


 
Ivolg ©   (2005-02-06 19:11) [5]

Можен не на полный доступ открыт! На до поставить галку "Разрешение изменения файлов по сети"!



Страницы: 1 вся ветка

Текущий архив: 2005.02.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.061 c
3-1106489170
Mamed
2005-01-23 17:06
2005.02.20
TQRCompositeReport


4-1105186547
BVV
2005-01-08 15:15
2005.02.20
TerminateProcess


1-1107261067
NightStranger
2005-02-01 15:31
2005.02.20
Что за тип TPointer?


1-1107343188
hgd
2005-02-02 14:19
2005.02.20
Выставление отступа


14-1106956720
Vadim
2005-01-29 02:58
2005.02.20
Почему программистов считают странными людьми ?