When the User Logon Name is entered, the Pre-Windows 2000 Logon Name is
auto populated with whatever is being entered. Is there a way to auto
change these two fields to uppercase?

I created a policy for this to kickoff a script but it didn't seems to
fly. Does anyone has any idea or better ways to do this?

Any help will be very much appreciated.


Set objRe = New RegExp
objRe.Pattern = "^[a-z0-9][A-Z0-9]*$"
'objRe.Pattern = "[\W_]"
Main = True

If objRE.Test(Varset.Get("In.Properties.sAMAccountNam e")) Then
'All fine
Set InputSamAccountName =
GetObject(VarSet.Get("In.Properties.sAMAccountName "))
Set objFSO = CreateObject("Scripting.FileSystemObject")
UpperSAMAccountName = UCase(InputSamAccountName)
If (UpperSAMAccountName <> InputSamAccountName) Then
Set objUser = GetObject(VarSet.Get("In.User"))
objUser.sAMAccountName = UpperSAMAccountName
Main = True
End IF
End If


yeoyanfei's Profile: https://forums.netiq.com/member.php?userid=8267
View this thread: https://forums.netiq.com/showthread.php?t=51927