VBScript - User Account Usage ( Least used accts, most frequently used accts)

I need a VBScript to report on user acct usage (URGENTLY..)

It -must- report on the following two things (anything additional + relevant is cool)

 - Most frequently used account
 - Least frequently used


I've attached the following code, dont know if it will work because I cant test. It's as far as I got without being completely stumped.

500 Points and a BIG AWESOME THANK YOU to anyone that helps in advance.. I have to hand this in in about .. 9 hours so I hope someone can finish my code
'To check the login time and disable the account
Dim dDate, oUser, oObject, oGroup
Dim iFlags, iDiff, iResult
dim arrweeks()
Const UF_ACCOUNTDISABLE = &H0002
 
'Point to group containing users to check
Set oGroup = GetObject("WinNT://MyDomain/Domain Users")
'Enable error trapping
 
On error resume Next
 
'for each user object in the group...
For each oObject in oGroup.Members
x = x + 1
  'ensure the user isn't a computer account!
  If (oObject.Class="User") And _
  (InStr(oObject.Name, "$") = 0) Then
     'retrieve the user object
     Set oUser = GetoObject(oObject.ADsPath)
     'get the last login Date from the domain
     'and strip off the time portion
     '(just need the date)
     dDate = oUser.get("LastLogin")
     dDate = Left(dDate,8)
     dDate = CDate(dDate)
 
     'calculate how long ago that was in weeks
     iDiff = DateDiff("ww", dDate, Now)
 
     'store into an array
 
     arrweeks(x) = idiff
     arrusername(x) = oObject.Name
 
     End If
  End If
Next
 
Do until strcount = 1
y = y + 1
	If arrusername = "" then
	strcount = 1
	else
	msgbox "account name" & vbtab & arrusername(y) & vbcrlf & _
		"how long since last login (weeks)" & vbtab & arrweeks(y) "
	End If
Loop

Open in new window

dshockerAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

chandru_solCommented:
Hi,

Do you want to know the last login details?

If you have 2003 domain we can pull the lastlogin details to see who are the users that are not logged in before x days.

regards
Chandru
0
MorDrakkaCommented:
Hi,

Can't you do things the other way around ? So for example list all users that haven't logged in for say 20 weeks:

dsquery user ou=users,ou=nl,dc=microsoft,dc=com -inactive 20 -limit 0

Add >>output.txt to put it into a textfile.

Regards,

M
0
dshockerAuthor Commented:
Argh I don't even know about that script, lol.

I just need it to show simply in a msgbox the LEAST used account, and the most frequently used account..

Once I get that script I can think about like, last 5 logged in accts and stuff x_O
0
Cloud Class® Course: Microsoft Azure 2017

Azure has a changed a lot since it was originally introduce by adding new services and features. Do you know everything you need to about Azure? This course will teach you about the Azure App Service, monitoring and application insights, DevOps, and Team Services.

Michael PfisterCommented:
You won't get that info from Active Directory. Its not counting the number of logons, just date and time when the user logs on.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
MorDrakkaCommented:
And that's sonly stored on the DC that processed that request. That information is not replicated.

So i suggest you play with dsquery :P

M.
0
dshockerAuthor Commented:
MPFister? Okay, then it must be locally?????
0
dshockerAuthor Commented:
Oh, sorry I misunderstood, hehe.

Ugh.


Yeah, I have no idea..

Could someone play with my code and get it to work? :S
0
SteveH_UKCommented:
MorDrakka is right in saying that it is only stored on the DC that processed the request.

Here's how I'd go about it.

1.  See if you can delimit user accounts somehow, such as membership of a group or containment in an OU.
2.  Use dsquery to search and retrieve the users and their last logon details
3.  Either output to Excel or use script
4.  Sort on the basis of logon date/time
5.  Trim to the ones you want
0
SteveH_UKCommented:
Forgot to mention that you need to repeat the search for each DC in each site accessible to the user.  If you are a large organisation then that will be a lot of searching, but if you are small it will be pretty simple.
0
Computer101Commented:
Forced accept.

Computer101
Community Support Moderator
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Windows Networking

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.