Вопрос : Отсчет VBS вниз датирует сценарий зафиксирует учет ОБЪЯВЛЕНИЯ потребителя

Мне нужно добавить Кодего подсчитает вниз с даты от один или два миллиона недели в MsgBox после этого фиксирует учет ОБЪЯВЛЕНИЯ потребителя когда objSysInfo даты expires.


Dim, objUser, strwWWHomePage, strUserDN, ppt, objSysInfo strMbox

Set = CreateObject («ADSystemInfo")
strUserDN = objSysInfo.UserName
Set = GetObject («LDAP: /» &

' strUserDN) включите резюме Next
' ошибки handling
On ошибки сперва управляйте возвратами, котор значение перемеююого к
' "" во-вторых пытает установить его с формой AD
' значения если секунда терпит неудачу перемеююый все еще будет установлена к
strwWWHomePage = "":, то strwWWHomePage = испытание ошибки переход 0

' handling
On ошибки Disable
' objUser.Get («wWWHomePage») значение в ppt Then
strwWWHomePage = "" variable
If установленном = CreateObject («strMbox PowerPoint.Application")
= MsgBox («вы имеете дни x для того чтобы завершить эту необходимую тренировку или ваш учет будет заперт. Щелкните О'КЕЙОМ для того чтобы начать ppt
представления PowerPoint»). Видимо =
Else
wscript.quit

End If

отслеживать ppt. Presentations.Open True
» \ \ serverxx \ \ ppt.ppsx " class=

Ответ : Отсчет VBS вниз датирует сценарий зафиксирует учет ОБЪЯВЛЕНИЯ потребителя

Кто-то изменяло владение архива так, что оно не принадлежит к вам больше.  Вам нужно одно из admins с привилегированностями «корня» изменить его назад.