VPF::Копирование файлов по сети - Форум программистов

jotun

Дата 8.10.2007, 11:10 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.9.2007

Репутация: нет
Всего: нет

Здравствуйте. У меня вопрос: имеется расшаренная папка в сети из которой нужно скопировать файл в Делфи7 . Вот код:

Код


procedure TForm1.Button2Click(Sender: TObject);
var
  SHFileOpStruct : TSHFileOpStruct;
  From,tto : array [0..255] of Char;
begin
    SetCurrentDirectory(Pchar('c:\1\'));
      //from:='d:\new.gdb';
      from:='\\192.168.0.10\c:\as\a.dbf';
      tto:='c:\1\';
     with  SHFileOpStruct do
   begin
   Wnd:=handle;
   wFunc:=FO_COPY;
   pFrom:=from;
   pto:=tto;
   fFlags:=0;
   fAnyOperationsAborted:=false;
   hNameMappings:=nil;
   lpszProgressTitle:=nil;
   end;
   SHFileOperation( SHFileOpStruct);

end;

Выдает ошибку: "Не удается произвести чтение из файла или каталога". Когда копирую со своей машины все нормально. Ответьте пожалуйста в чем причина. Спасибо за внимание.

jotun

Дата 8.10.2007, 11:26 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.9.2007

Репутация: нет
Всего: нет

Извините туплю smile

Нашел ошибку
from:='\\192.168.0.10\as\a.dbf';

Тему можно закрывать.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »