[Сеть, интернет] Помогите автоматизировать запись фаилов на рабочий стол компьютеров в сети

[ileo1717]

подскажите как это реализовать на Autoit:
net view > net.txt
FOR /F " tokens=1 " %%i in (net.txt) do (
if exist "%%i\C$\ProgramData\" (
copy 1.txt "%%i\C$\ProgramData\Microsoft\Windows\Start Menu\Programs\Startup\"
) else (
copy 1.txt "%%i\c$\documents and settings\all users\start menu\programs\startup\"
)
)


Добавлено:

Сообщение автоматически объединено: 5 Апр 2013

сам смог добиться только фаила со списком компьютеров, как потом название подставить в путь хз все перепробывал

#include <file.au3>
Global $NetView = "comp_list.txt"
RunWait(@ComSpec & " /c " & 'net view >'&$NetView, "", @SW_HIDE) ;выполнить команду CMD "net view" и поместить результат в текстовый файл
Dim $aRecords
_FileReadToArray($NetView,$aRecords);прочитать этот текстовый файл в массив
FileOpen($NetView, 2)
For $i=1 To $aRecords[0];убрать все лишнее, оставить только имана ПК
If StringInStr($aRecords[$i], "\\") Then
$aRecords[$i] = StringReplace($aRecords[$i], " ", "")
FileWriteLine($NetView, $aRecords[$i] & "" & @CRLF)
EndIf
Next
FileClose($NetView)

 

[kaster]

ileo1717

Предупреждение

За нарушение правил форума (пункт В.11):

Любые отрывки AutoIt кода необходимо заключать в тег [autoit]

(подробнее), а обычный код соответственно в тег [code]

(подробнее). Также большие выдержки текста помещайте под тег [spoiler]

(подробнее), там где это поддерживается естественно. Как в случае с названием темы, также короткое и эргономичное сообщение привлекает больше внимания, и шансы на получение конкретного ответа увеличиваются.

С уважением, ваш Глобальный модератор.

 

[madmasles]

И еще.

Предупреждение

Оформите, пожалуйста, тему в соответствии с Правилами обязательного оформления тем в разделе "Стол заказов"

С уважением, ваш Модератор.

Тема закрыта.