Несколько пользователей для запуска одного и того же скрипта

У меня есть VBScript, который копирует 1 (один) файл из сетевого расположения на пользователей C:. У меня есть 11 человек, которым нужно запустить этот скрипт.

Что мне использовать в качестве подстановочного знака для нескольких имен пользователей, чтобы мне не приходилось создавать несколько сценариев для каждого человека?


userid vbscript
person sean bulinski    schedule 29.10.2014    source источник

Ответы (1)


arrow_upward
0
arrow_downward

Есть несколько способов получить имя учетной записи вошедшего в систему пользователя, например, путем расширения соответствующей переменной среды:

>>> Set sh = CreateObject("WScript.Shell")
>>> WScript.Echo sh.ExpandEnvironmentStrings("%USERNAME%")
jsmith

или через объект WshNetwork:

>>> Set net = CreateObject("WScript.Network")
>>> WScript.Echo net.UserName
jsmith

или через WMI:

>>> Set wmi = GetObject("winmgmts://./root/cimv2")
>>> For Each obj In wmi.ExecQuery("SELECT * FROM Win32_ComputerSystem") : _
WScript.Echo obj.UserName : _
Next
VM01\jsmith
person Ansgar Wiechers    schedule 29.10.2014
comment
это сценарий, который у меня сейчас есть, как мне вставить в него ваши рассуждения? - person sean bulinski; 30.10.2014
comment
Установить fs = CreateObject(Scripting.FileSystemObject) fs.CopyFile K:\Eng_Config\Sean\DS Stamp Macro\Stamp*.pdf, C:\Users\sebuiln\AppData\Roaming\Adobe\Acrobat\10.0\Stamps\, True - person sean bulinski; 30.10.2014
comment
Назначьте имя пользователя переменной и соедините эту переменную с остальной частью пути: "K:\Eng_Config\" & username & "\DS Stamp Macro\Stamp*.pdf" - person Ansgar Wiechers; 30.10.2014