Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.
I'm obviously just learning vbs and don't full understand what I've put together or whether or not it will do what is needed which is:
Const ADS_UF_DONT_EXPIRE_PASSWD = &h10000 strComputer = "." Set colAccounts = GetObject("WinNT://" & strComputer & "") Set objUser = colAccounts.Create("user", "TestUser") objUser.SetPassword "password" objPasswordExpirationFlag = ADS_UF_DONT_EXPIRE_PASSWD objUser.Put "userFlags", objPasswordExpirationFlag objUser.SetInfo Set objGroup = GetObject("WinNT://" & strComputer & "/Administrators,group") objGroup.Add(ObjUser.ADsPath) set objGroup = Nothing
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Inserting a datasheet query into the body of an email using VBA?||4||53|
|Windows 7 PRO PC as a Terminal Server/Remote connection???||4||54|
|Outlook 2010 prompts for credentials when trying to setup outlook in windows 7||5||44|
|How can I install Windows 7 on a Lenovo Ideacentre 300 series desktop?||41||70|