Главная страница
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.028 c
4-1103657293
Митяй2
2004-12-21 22:28
2005.02.20
Как из программы на Delphi выполнить дозвон к интернету


3-1106481586
Руслана
2005-01-23 14:59
2005.02.20
Подскажите по сортировке


14-1106895441
MBo
2005-01-28 09:57
2005.02.20
Пятничные задачки. ;)


1-1107340311
frEE)stylEr
2005-02-02 13:31
2005.02.20
Реестр


14-1106846392
Бугага
2005-01-27 20:19
2005.02.20
Колосков подал в отставку с поста РФС