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

Вниз

Как подключится к сетевому рессурсу и стащить (если нужно) файл   Найти похожие ветки 

 
Boroda Oleg   (2004-01-21 10:20) [0]

Господа, тривиальный вопрос!

Нужно подключится к сетевому рессурсу и стащить оттуда файл, если возникает такая необходимость. Как это можно решить без подключения сетевого диска?

Свое время я реализовывал функцию с подключением диска, но принцип работы мне не понравился. Во-первых, лениво проверять, есть ли уже такой диск (в качестве подключенного), во-вторых после первого подключения/отключения возникает ошибка, и в одном и том же сеансе Винды - 2 раз подключится не получается. Хотелось бы сделать это красиво.
На всякий случай приведу способ с подключением диска, может кто-то углядит ошибку - почему во второй раз после отключения не могу подключится.

var NR : TNetResource;
i : integer;
b : boolean;
begin
NR.dwType:=Resourcetype_disk;
NR.lpLocalName:="S:";
NR.lpRemoteName:="\\Main\marketingrab";
NR.lpProvider:="";
i:=(WNetAddConnection2
(NR,"lening","boroda",connect_update_profile));
b:=fCopy.CheckNewFiles; // копирование файла, если увеличилась дата

WNetCancelConnection2("S:",0,true);
// WNetCancelConnection2("\\Main\marketingrab",0,true); // пробовал и так, и так
WNetCancelConnection2("S:",CONNECT_UPDATE_PROFILE,true);

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


 
Stas ©   (2004-01-21 10:22) [1]

А что разве CopyFile не скопирует с "\\COMP1\folder1\file.txt"



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

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

Наверх




Память: 0.47 MB
Время: 0.021 c
3-1981
keymaster
2004-01-06 16:20
2004.02.02
Обращение к 2м базам в 1 запросе


3-2008
dimm22
2004-01-07 14:12
2004.02.02
SQL запрос.


1-2084
Крутыш
2004-01-19 23:26
2004.02.02
Есть ли документация русская


14-2284
TankMan
2004-01-11 11:39
2004.02.02
Возможно ли


9-1945
TEST
2003-07-17 20:58
2004.02.02
Delphi поддерживает .mb, .ma, .lwo, xsi?