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

Вниз

Копирование файлов по сети   Найти похожие ветки 

 
Meneee   (2005-01-11 20:39) [0]

Делаю так:

      WNetAddConnection(Pchar(TntLBComputers.Items[i]),nil,PChar("RPC"))
      CopyFile(PChar(FormOpen.TntEdPath.text),PChar("\\VPC\C\test.ww"),false);

Но не работает, подскажите в чем ошибка, или дайте пример. З ранее спасибо


 
Anatoly Podgoretsky ©   (2005-01-11 21:09) [1]

Какая ошибка?


 
Meneee   (2005-01-12 05:33) [2]


> Какая ошибка?

Мда .. Слов нету..
Не копирует, задается вопрос почему? Может кто подкинет пример?


 
Kerk ©   (2005-01-12 05:41) [3]

Meneee   (12.01.05 5:33) [2]
вопрос тебе был задан правильный. посмотри что функция возвращает


 
Gero ©   (2005-01-12 07:50) [4]

И поставь вместо переменных константы, мы же не знаем, что у тебя в TntLBComputers.Items[i] или в FormOpen.TntEdPath.text.


 
Meneee   (2005-01-12 11:10) [5]

WNetAddConnection("VPC",nil,PChar("RPC"))
     CopyFile(("C:\1.ato"),PChar("\\VPC\C\test.ww"),false);
VPC=Имя компьютера в сети, на который хочу скопировать
RPC=Имя моего компьютера в сети
Я аравильно делаю?


 
Reindeer Moss Eater ©   (2005-01-12 11:37) [6]

конечно аравильно.


 
Anatoly Podgoretsky ©   (2005-01-12 11:48) [7]

Meneee   (12.01.05 05:33) [2]
CopyFile это функция, а в справке указано как проверить ошибку, так какой код ошибки? Или ты такой самоуверенный, что принципиально ошибки не проверяешь, поскольку их быть не может, ведь у меня все правильно?

Meneee   (12.01.05 11:10) [5]
Неправильно, нет проверки на ошибку.


 
Eraser ©   (2005-01-12 13:10) [8]

Последний аргумент- ссылка на переменную, если не ошибаюсь. Значит нужно передавать переменную, в которую вернётся значение из ф-ии.


 
BiN ©   (2005-01-12 13:30) [9]

Eraser ©   (12.01.05 13:10) [8]

Последний аргумент- ссылка на переменную, если не ошибаюсь.


"если не" можешь смело убрать


 
BiN ©   (2005-01-12 13:31) [10]

в смысле, ошибаешься


 
Eraser ©   (2005-01-12 13:48) [11]

BiN
Ты прав! Я перепутал с deletefile.


 
Meneee   (2005-01-12 20:20) [12]

WNetAddConnection("VPC",nil,PChar("RPC"))
СopyFile(("C:\1.ato"),PChar("\\VPC\C\test.ww"),false);
ShowMessage(IntToStr(GetLastError));
Получается 0



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

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

Наверх




Память: 0.49 MB
Время: 0.028 c
14-1109084511
Cosinus
2005-02-22 18:01
2005.03.13
Сталкивался кто-нибудь с "бинарными" шрифтами?


3-1108024003
REA
2005-02-10 11:26
2005.03.13
SQL Запрос


3-1108117514
sashakamap
2005-02-11 13:25
2005.03.13
ADO MAX(....)


9-1102850191
DeadMeat
2004-12-12 14:16
2005.03.13
Цена моделей


1-1109359877
Kiad
2005-02-25 22:31
2005.03.13
MDI