TH
просто табличку зафигарить, в ад профиле писать или ещё как то
Size: a a a
2020 November 03
[
просто табличку зафигарить, в ад профиле писать или ещё как то
У нас в 1с мат. Ценности Основные средства и товары малой стоимости
j
просто табличку зафигарить, в ад профиле писать или ещё как то
в ад норм тема
TH
понял
j
но так обычно порядковый номер назначают и держут списком при выдаче - на кого какая техника
П
но так обычно порядковый номер назначают и держут списком при выдаче - на кого какая техника
Выдачи для пидоров
[
Закрепи на ад мак и ид устройства, разъебал- уволен, чтоб только с него мог работать
j
понял
но если нихуя нет, то есть хинт как круто можно собрать всю инфу при логоне юзверя
j
3. VBS скрипты:
AdInfo-Logon:
Dim adsinfo, ThisComp, oUser
Set adsinfo = CreateObject("adsysteminfo")
Set ThisComp = GetObject("LDAP://" & adsinfo.ComputerName)
Set oUser = GetObject("LDAP://" & adsinfo.UserName)
Thiscomp.put "Department", "Logged on: " + oUser.cn + " " + CStr(Now)
ThisComp.Setinfo
oUser.put "Department", "Logged on: " + ThisComp.cn + " " + CStr(Now)
oUser.Setinfo
wscript.quit
AdInfo-Logoff:
Dim adsinfo, ThisComp, oUser
Set adsinfo = CreateObject("adsysteminfo")
Set ThisComp = GetObject("LDAP://" & adsinfo.ComputerName)
Set oUser = GetObject("LDAP://" & adsinfo.UserName)
Thiscomp.put "Department", "Logged off: " + oUser.cn + " " + CStr(Now)
ThisComp.Setinfo
oUser.put "Department", "Logged off: " + ThisComp.cn + " " + CStr(Now)
oUser.Setinfo
wscript.quit
TH
но если нихуя нет, то есть хинт как круто можно собрать всю инфу при логоне юзверя
та понял
j
тип того
TH
та то понятно
TH
инфа есть
TH
осталось только где то ее записать
s
у кого как реализована ответсвенность за технику?
Модель + серийник
s
Акт о передаче ТМЦ
j
осталось только где то ее записать
ну вот в ад как варик конечно
TH
ооок