First post on here, so hoping that I have it right.
I have the following code (Written in VBS):
I want it to do the following:Code:' Gather required information strLUsername = net.username strLComputer = net.computername strLDate = CStr(Date) strLTime = CStr(Time) strOU = LCase(GetDN) If InStr(staff, user.Description) Then strType = "staff" Else strType = "student" End If
If First Character of the username is an integer (1-9) Then
StrType = "student"
StrType = "staff"
Thanks for any replies in advanced.