+ Post New Thread
Results 1 to 10 of 10
Scripts Thread, Vbscript reset a single domain user's password in Coding and Web Development; Hi guys and gals. I'm sure that somewhere on this site is the solution i'm looking for but i've looked ...
  1. #1

    Join Date
    Aug 2006
    Location
    Notts
    Posts
    38
    Thank Post
    0
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    Vbscript reset a single domain user's password

    Hi guys and gals. I'm sure that somewhere on this site is the solution i'm looking for but i've looked and can't find anything. Anyway...

    As part of an updated Intranet system i am designing and administrative portal for carrying out simple domain user tasks without the need for the AD console.

    The two things i wan't to do is:
    >reset a single user's password - providing the script with the OU, username and new password.
    >Enable or disable a users account (if required) - once again providing the script with the user's OU and username

    if required our entire domain name is:

    bramcote.www.bramcotepark.notts.sch.uk

    Many Thanks - any questions ask away.

  2. #2
    mark's Avatar
    Join Date
    Jun 2005
    Posts
    3,966
    Thank Post
    248
    Thanked 49 Times in 45 Posts
    Blog Entries
    2
    Rep Power
    46

    Re: Vbscript reset a single domain user's password

    What about this: http://www.edugeek.net/index.php?nam...&p=26384#26384

    Irazmus/Plexar: - self service password reset

  3. #3

    Ric_'s Avatar
    Join Date
    Jun 2005
    Location
    London
    Posts
    7,599
    Thank Post
    109
    Thanked 765 Times in 596 Posts
    Rep Power
    181

    Re: Vbscript reset a single domain user's password

    @mark: I must have searched for 20mins trying to find that link!!!

  4. #4
    mark's Avatar
    Join Date
    Jun 2005
    Posts
    3,966
    Thank Post
    248
    Thanked 49 Times in 45 Posts
    Blog Entries
    2
    Rep Power
    46

    Re: Vbscript reset a single domain user's password

    Yes - needs to go on ChrisH's home grown tools sticky

  5. #5

    Join Date
    Aug 2006
    Location
    Notts
    Posts
    38
    Thank Post
    0
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    Re: Vbscript reset a single domain user's password

    Thanks for the responses. Just got back from a lovely time in Florida, but now back into the slog of web programming ready for when the little darlings start back on tuesday.

    I've had a look at the files and scripts suggested, boy they're very complex but im reading through and picking bits up. Hopefully will have a working example ready one day if i ever get over the fear of accidentally resetting every password in the Domain / OU :silent:

    Thanks

  6. #6

    plexer's Avatar
    Join Date
    Dec 2005
    Location
    Norfolk
    Posts
    13,661
    Thank Post
    658
    Thanked 1,624 Times in 1,453 Posts
    Rep Power
    422

    Re: Vbscript reset a single domain user's password

    There's a configuration file with all the bits you need to alter to get self service password reset to work and that's about all you have to do apart from setting it up as a website.

    If you have any specific issues let us know.

    Ben

  7. #7

    webman's Avatar
    Join Date
    Nov 2005
    Location
    North East England
    Posts
    8,406
    Thank Post
    639
    Thanked 961 Times in 661 Posts
    Blog Entries
    2
    Rep Power
    324

    Re: Vbscript reset a single domain user's password

    Hi Ryan, I've got a similar thing on our Intranet. You also have a PM

  8. #8

    Join Date
    Jun 2009
    Posts
    2
    Thank Post
    0
    Thanked 0 Times in 0 Posts
    Rep Power
    0

    Generate PW Reset Specific User Account and Email Password to any user...

    This script is a great script for Public access computer that need to abide by CALEA laws. Basicly it is a Password of the day script. It will generate a password reset a specified user to that password and email a group or individual "The password of the Day" You either must run this on a system that has rights to change passwords or run with an account that does. Use task scheduler to run this at whatever time you would like.

    ================================================
    ================================================

    Option Explicit
    Dim objUser, objEmail
    Dim strPassword
    Dim intAccValue, strPwd1, strPwd2, strPwd3, StrPW

    'Generate Password
    strPwd1 = GeneratePassword("ABCDEFGHJKLMNPQRSTUVWXYZ", 3)
    strPwd2 = GeneratePassword("abcdefghijkmnpqrstuvwxyz", 4)
    strPwd3 = GeneratePassword("123456789", 1)

    Function GeneratePassword(strCharacters, intLength)
    Randomize
    Dim strS, intI
    For intI = 1 To intLength
    strS = strS + Mid(strCharacters, Int(Rnd() * Len(strCharacters))+1, 1)
    Next
    GeneratePassword=strS

    End Function

    StrPW = strPwd1 & strPwd2 & strPwd3

    'Set account to Reset

    Set objUser = GetObject("LDAP://CN=USER,OU=USERS,DC=YOUR,DC=Domain")

    'Set Account Attributes
    intAccValue = 544

    objUser.SetPassword(StrPW)
    objUser.SetInfo

    objUser.Put "userAccountControl", intAccValue
    objUser.SetInfo

    'Send email Settings are configured for NON-SMTP service computer

    Set objEmail = CreateObject("CDO.Message")

    objEmail.From = "test@test.com"
    objEmail.To = "test@test.com"
    objEmail.Subject = "Password of the Day"
    objEmail.Textbody = "Todays password is " &StrPW&". "
    objEmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
    objEmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
    "smtp.wcu.edu"
    objEmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
    objEmail.Configuration.Fields.Update
    objEmail.Send

    ================================================== ===
    ================================================== ===

  9. #9

    mac_shinobi's Avatar
    Join Date
    Aug 2005
    Posts
    9,781
    Thank Post
    3,288
    Thanked 1,054 Times in 975 Posts
    Rep Power
    365
    Was just about to suggest the password reset tool from WiseSoft - Resources for IT Professionals ( registration is free ) and once logged in you can easily download and install it and as long as the user(s) have delegated rights to reset passwords then it should work fine.

  10. #10

    maniac's Avatar
    Join Date
    Feb 2007
    Location
    Kent
    Posts
    3,067
    Thank Post
    209
    Thanked 430 Times in 310 Posts
    Rep Power
    144
    If your usernames meet the required pattern, you can use my easy password reset tool - there's no setting up to do, just needs .NET installed and the 'account manager' priviledge to be allocated to the user in Active Directory.

    (Unfortunitely development has ground to a hault on account of the fact I managed to loose the source code!)

    Easy Password Reset Software

    Mike.

SHARE:
+ Post New Thread

Similar Threads

  1. Self Service Password Reset
    By plexer in forum EduGeek Self Service Password Reset
    Replies: 273
    Last Post: 5th November 2013, 06:51 PM
  2. apc powerchute buisness ed reset password
    By russdev in forum Windows
    Replies: 7
    Last Post: 8th November 2011, 12:35 PM
  3. bulk password reset
    By Jonny_sims in forum Windows
    Replies: 10
    Last Post: 26th September 2011, 10:12 PM
  4. Make a script run for SINGLE domain user
    By philtomo-25 in forum How do you do....it?
    Replies: 5
    Last Post: 15th November 2007, 09:21 PM
  5. Masking the password on inputbox vbscript
    By spc-rocket in forum Coding
    Replies: 20
    Last Post: 9th March 2007, 09:42 AM

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •