Как мне переслать файлы по сетке на все комы

← →
alex21 © (2003-09-08 09:05) [0]

Здраствуйте мастера делфи у вас какойто сайт интересеый все мои вопрсы в форуме кудато деваются ну ладно.
Как я могу во все комы в сетке отпрвить файл Mytext.txt во все директории виндовс в сети по возможности не в звваисимости от доступа итд.

← →
app © (2003-09-08 09:12) [1]

А ты спамом не занимайся, задавай только один вопрос по теме

← →
Anatoly Podgoretsky © (2003-09-08 09:17) [2]

Так уж прямо в Windows, кто в здравом уме такое позволит, да еще и без прав, это называется взлом. Ну а кудв тебе разрешено, то файлы пересылаются естественно названной функцией CopyFile

← →
alex21 © (2003-09-08 12:48) [3]

Пожалуйста приведите пример кода Anatoly Podgoretsky вас лично прошу а тоя какой день парюсь.

← →
Anatoly Podgoretsky © (2003-09-08 12:57) [4]

А почему ты не взглянешь в справку, приводить такой простой код просто стыдно.

← →
Alex21 © (2003-09-09 07:37) [5]

Возможно но уменя проблемы с доступом.

← →
Alex21 © (2003-09-09 16:13) [6]

Здесь чо мастеров нету что что ли

← →
Anatoly Podgoretsky © (2003-09-09 16:36) [7]

Не понял, с каким доступом, справка лежит на твоем компьютере!
В папке Program Files

← →
Alex21 © (2003-09-10 07:03) [8]

Anatoly Podgoretsky я все понял все прет просто надо путь сетевой прописать я не знаю как

← →
Anatoly Podgoretsky © (2003-09-10 07:33) [9]

Сетевой это строка.

← →
Alex21 © (2003-09-10 09:17) [10]

Anatoly Podgoretsky то есть ("21.220.1\c\windows") or
("AS\12\c\windows")

← →
Anatoly Podgoretsky © (2003-09-10 09:27) [11]

Да так

← →
Alex21 © (2003-09-10 09:47) [12]

Anatoly Podgoretsky спасибо попробую

← →
Alex21 © (2003-09-12 08:52) [13]

Anatoly Podgoretsky вы мне сказали что строку надо прописывать текстом
я сделал так
Copyfile("Project1.exe","10.220.1.13\C:\2\hello.exe",true);
реальный пример но у мня он не пошелл
что сделал не правильно а дома без сетки все копирует
как быть что делать

← →
лёха (2003-09-12 09:17) [14]

а ты так попробуй Copyfile("Project1.exe","\\10.220.1.13\C\2\hello.exe",true); :D

← →
Alex21 © (2003-09-12 09:21) [15]

лёха как понять :D тоесть на д диск чтоли

← →
FoxBox (2003-09-12 09:33) [16]

> Alex21

Нет, :D - это народ типа смеется. А как тебе Ж8-] такая ролжица? А если кроме шуток, попробуй в командной строке (под кнопкой "Пуск", "ВЫПОЛНИТЬ") набрать \\10.220.1.13\C\2\ Если откроется каталог, пьем Херши. Возможно, файл "Project1.exe" машина не может найти. Для чистоты эксперимента укажи полный путь к файлу типа c:\myprojects\test\project1.exe Может и поможет. Если папка "\\10.220.1.13\C\2\" с файлами не открылась, сам понимаешь, кривой путь задал... Так и быть расскажу тебе: путь удаленной машины это \\<Имя машины/ее адрес>\<Имя отшаренного ресурса>\<Имя папки>... Т.е. \\BuchComp\C-Drive\Temp\TestFolder\
Вот так

← →
Ivanesus (2003-09-12 09:47) [17]

Попробуй так:
Copyfile("FileName.exe","\\XXX.XXX.XXX.XXX\Folder\NewFileName.exe",true);
где
FileName - имя файла, который хочешь копировать.
\\IP Adress - IP адресс или сетевое имя КОМПА на который производится копирование.
Folder - Расшаренный ресурс на удаленном КОМПЕ, с соответствующими правами доступа.
NewFileName - Имя файла, которым он(FileName) будет называться на удаленном КОМПЕ.
True - При существовании на удаленном КОМПЕ файла с именем NewFileName операция копирования не произойдел, при False - файл перезапишется.
В твоем случае:
Copyfile("Project1.exe","\\10.220.1.13\C:\2\hello.exe",true);

P.S.
С моей точки зрения расшаривать корень диска (C:\2\hello.exe) - плохой тон.

← →
Alex21 © (2003-09-12 09:49) [18]

FoxBox Спасибо все заработало оказывается в пути не надо двоеточие после с указывать я сам не понял почему

← →
Jeca57 (2003-09-12 09:54) [19]

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

var
nw : _NETRESOURCE;
str : string;
err : integer;
begin
nw.dwType:=RESOURCETYPE_DISK;
nw.lpLocalName:=PChar("U:");
nw.lpRemoteName:=PChar("\\comp1\C");
nw.lpProvider:=nil;
str:="password";
WNetCancelConnection2("U:",0,false);
Err:=WNetAddConnection2(nw,PChar(str),nil,0);
If Err=NO_ERROR then str:="NO_ERROR "
else if Err=ERROR_ALREADY_ASSIGNED then str:="ERROR_ALREADY_ASSIGNED "
else if Err=ERROR_BAD_DEV_TYPE then str:="ERROR_BAD_DEV_TYPE "
else if Err=ERROR_BAD_DEVICE then str:="ERROR_BAD_DEVICE "
else if Err=ERROR_BAD_NET_NAME then str:="ERROR_BAD_NET_NAME "
else if Err=ERROR_BAD_PROFILE then str:="ERROR_BAD_PROFILE "
else if Err=ERROR_BAD_PROVIDER then str:="ERROR_BAD_PROVIDER "
else if Err=ERROR_BUSY then str:="ERROR_BUSY "
else if Err=ERROR_CANCELLED then str:="ERROR_CANCELLED "
else if Err=ERROR_CANNOT_OPEN_PROFILE then str:="ERROR_CANNOT_OPEN_PROFILE "
else if Err=ERROR_DEVICE_ALREADY_REMEMBERED then str:="ERROR_DEVICE_ALREADY_REMEMBERED "
else if Err=ERROR_EXTENDED_ERROR then str:="ERROR_EXTENDED_ERROR "
else if Err=ERROR_INVALID_PASSWORD then str:="ERROR_INVALID_PASSWORD "
else if Err=ERROR_NO_NET_OR_BAD_PATH then str:="ERROR_NO_NET_OR_BAD_PATH "
else if Err=ERROR_NO_NETWORK then str:="ERROR_NO_NETWORK "
else str:="UNKNOWN ERROR - ";
end;

← →
FoxBox (2003-09-12 09:59) [20]

> Alex21

Таки обращаю твое внимание! В твоем случае "С" - это имя шары, а не имя диска. Тебе просто повезло, что шара указывает на корневой каталог диска С на удаленной машине и почти так же обзывается (можно было бы задать имя шары как C-Drive). С таким же успехом можно организовать шару на какую-нить другую директорию и получим типа \\MyComp\CommonFolder\TrashFolder\ В-общем, читай винды для чайников (уж не обижайся)

Есть стандартные названия ресурсов: C$, D$ и т.п.
То есть, если есть права доступа, то можно всегда записать:
\\xxx.xxx.xxx.xxx\C$\путь_на_диске_с
или
\\NetBIOS_имя_компьютера\С$\путь_на_диске_с

← →
Plok (2003-09-12 13:18) [22]

> Есть стандартные названия ресурсов: C$, D$ и т.п.
> То есть, если есть права доступа, то можно всегда записать:
> \\xxx.xxx.xxx.xxx\C$\путь_на_диске_с

Так записать можно НЕ ВСЕГДА!!! Если удален из списков доступа этот ресурс(правда его редко удаляют и зря!!) то ты на C$ или D$ не войдешь....

2Tano

На сколько я знаю на Вынь 9х стандартных ресурсов типа C$ нету.
При обращении к 98 этот способ не прокатит.

А у меня хр но набо чтобы на все вины перекидывал

Так Copyfile на все винды и не только на них, а и на Линукс, Новел, В Интернет, на устройства и т.д. перекидывает, это функция никак не связана с типом операционной системы.
Был бы только доступен ресурс.

Я имею ввиду типичный случай (по умолчанию). Разуеется, можно и доступ закрыть и ресурсы и т.д. и т.п. но тут не про взлом речь идет. Обычно (!) стандартные имена: C$,...,Z$ - диски, ADMIN$ - папка с Windows.
Кстати о W98. Незнаю, как у >Reystlin © , а у меня FAR их (C$,...) даже в обычном просмотре сети показывает (правда серенькими, системными) и доступ - пиши-не хочу.

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