Скрипты для системных администраторов Windows, Полезные скрипты для Win2003 Опции

[I00matolog]

Задача банальна - раскидать всем юзерам на рабочий стол ярлык
Сервер 2008 вынь без домена.
т.е.

copy /y c:\tmp\LINK.lnk C:\Users\$I\Desktop

где $I - это перебор файлика с именами профилей

как это на винде делается?
for $i (cat list.txt)
do
copy /y c:\tmp\LINK.lnk C:\Users\$I\Desktop
done

?

[Aleha]

Привет всем.
Нужна помощь со скриптом на vbs.

Задача стоит такая: есть пользователи в AD, есть компьютеры там же. Надо чтобы при логине пользователя на компьютер, в поле Description пользователя прописывалось имя компьютера.

Пока пришел к такому решению:

Dim adsinfo, ThisComp, oUser

' Определяем объекты
Set adsinfo = CreateObject("adsysteminfo")
Set ThisComp = GetObject("LDAP://" & adsinfo.ComputerName)
Set oUser = GetObject("LDAP://" & adsinfo.UserName)

' Заносим данные в AD

'В поле Description учетки пользователя пишем имя компьютера
oUser.put "Description", ThisComp.cn
oUser.Setinfo
wscript.quit

Но так не подходит т.к. пользователи своими доменными УЗ заходят и на терминальные сервера, т.е. надо как то исключить их.
Все компьютеры названы одним и тем же паттерном (LND-WS0001, CPR-WS0001 и так далее, у нас четыре локации) а вот сервера бывают разные.
Думаю про какой то if then else, но язык vbs знаю из рук вон плохо.