VBS: Скрипт копирование файлов, в зависимости от шлюза пользователя

2 Александр:

1) Читаем тему - http://forum.script-coding.com/viewtopic.php?id=1740. ) И присоединяемся к общей толпе безграмотных (в которую вхожу и я), желающих говорить по русски и "лечить" свой русский язык. )
2) Предполагаю, что Вам вполне подойдёт Scripting.FileSystemObject.

Определение шлюза

Set WMI = GetObject("winmgmts:\\.\root\cimv2")
Set oDGs = WMI.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each oDG In oDGs
If Not IsNull(oDG.DefaultIPGateway) Then
DefaultGateway=oDG.DefaultIPGateway(0)
End If
Next

использование шлюза

Select Case DefaultGateway
Case "10.1.254.1"
'Do something
Case "10.2.254.1"
'Do something
Case "10.3.254.1"
'Do something
Case "10.4.254.1"
'Do something
Case "10.5.254.1"
'Do something
Case "10.6.254.1"
'Do something
End Select

Неа...     (читай подпись...)  гугль Вам в помощь + MSDN + TechNet + википедия

Да. Без замыкающего слэша copyfile будет воспринимать папку windows как имя файла и попытается скопировать исходный файл в файл с именем папки windows.

Можно. Например, так:
- запустите (например, с помощью метода Exec объекта WScript.Shell) из основного сценария вспомогательный, целью которого будет "вывешивание" окошка MsgBox с соответствующим сообщением, и сохраните ProcessID вспомогательного сценария;
- после завершения копирования из основного сценария снимите (руководствуясь уже известным PID) процесс вспомогательного, а затем запустите его вновь, но уже с другим сообщением (здесь удобнее использовать метод Popup объекта WScript.Shell, т.к. есть возможность задать интервал времени, в течение которого окошко будет "висеть").

Однако, если смысл обсуждаемой задачи лишь в том, чтобы как-то визуализировать процесс копирования, то, думается, лучше вместо самодельной конструкции использовать метод CopyHere объекта Shell.Application).

а почему определение шлюза может не отрабатывать???, на некоторых машинах на редких на 2-3 из 200, значение DefaultGateway пустое.

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

как то ни странно у мс есть логон и удаленное подключение

нет, сервер, не во всех офисах!
Раздача ip идёт статически.

Да и шлюз тоже.

Александр, если некорректность в определении шлюза наблюдается на одних и тех же станциях, то пока могу предложить следующее:
1) убедитесь, что на "проблемных" станциях адрес шлюза настроен статически;
2) в случае положительной ситуации по первому пункту, убедитесь, что сценарий на этих станциях отрабатывает без ошибок;
3) если и со вторым пунктом всё в порядке, то сравните таблицы маршрутизации "проблемной" и "нормальной" станций.

Кстати, какие версии ОС на станциях?

Процедура выбора не столь тривиальна. Посылка датаграммы ("пинг") службой клиента "Сетевой вход в систему" серверам-"кандидатам" - это лишь один из пунктов алгоритма.
Если говорить очень кратко, то выбирается первый из ответивших контроллеров. Причины, по которым тот или иной контроллер ответил первым,- это целая совокупность деталей сетевой инфраструктуры и текущего состояния контроллеров. Например, имеют значение: деление домена на сайты, наличие контроллера в сайте, наличие разницы в приоритетах и весах, указанных в SRV-записях для контроллеров, текущая нагрузка контроллеров...
Даже если руководствоваться только "пингом", то и в этом случае вероятность опережающего ответа конкретного сервера не будет равна 1 (при условии опроса нескольких серверов, разумеется).

Раз такое событие не невероятно, значит имеется возможность некорректного решения обсуждаемой задачи этим методом.

Вообщем проблема, в том что wmi не видет пространства имен root\cimv2. Что можно сделать, что бы поднять wmi?

не помогло(((

ну все так сдела
единственное

2) толкаем команду rundll32 wbemupgd, UpgradeRepository

это так??
rundll32 UpgradeRepository