Хабр Курсы для всех
РЕКЛАМА
Практикум, Хекслет, SkyPro, авторские курсы — собрали всех и попросили скидки. Осталось выбрать!
fileWrite(
"<html>
<body>
Hello, habr
</body>
</html>"
)fileWrite("<html>")
fileWrite("<body>")
fileWrite(var_habr)
fileWrite("</body>")
fileWrite("</html>")fileWrite(
"<html>
<body>" +
var_habr
+ "</body>
</html>"
)Set objDomain1 = GetObject("LDAP://usl.local/OU=Computers,OU=Центр,OU=НашаФирма,DC=usl,DC=local")
Set objDomain2 = GetObject("LDAP://usl.local/OU=Computers,OU=Регион1,OU=НашаФирма,DC=usl,DC=local")
Set objDomain3 = GetObject("LDAP://usl.local/OU=Computers,OU=Регион2,OU=НашаФирма,DC=usl,DC=local")
...
Set objDomainN = GetObject("LDAP://usl.local/OU=Computers,OU=РегионN,OU=НашаФирма,DC=usl,DC=local")OUs = ("Центр","Регион1",...,"РегионN")
for each OUItem in OUs:
Set objDomain = GetObject("LDAP://usl.local/OU=Computers,OU=" & OUItem & ",OU=НашаФирма,DC=usl,DC=local")
<Код заполнения массива имен компьютеров>
next
Проверка статуса антивируса в корпоративной сети посредством VBScript