Any ideas? I received the above error when I run the login script as anyone that doesnt have administrative rights to the network.
The section that returns the error is below. I can’t post the entire script here, but if you email me: thamilton at tuskyvalley.k12.oh.us, I can email you a copy of the script.
Thanks,
Troy
sUserPath = “LDAP://” & objSysInfo.Username
Set objUser = GetObject(sUserPath)
sUser = objNetwork.UserName
For Each sGroup in objUser.MemberOf
sGroupPath = “LDAP://” & sGroup
Set objGroup = GetObject (sGroupPath)
sGroupName = objGroup.CN
Select Case sGroupName
Case “Class of 2006”
AlreadyConnected=False
For iCounter = 0 to CheckDrive.Count – 1 Step 2
If CheckDrive.Item(iCounter) = sHomeDrive Then AlreadyConnected = True
Next
If AlreadyConnected = True then
objNetwork.RemoveNetworkDrive shomeDrive
objNetwork.MapNetworkDrive “H:”, sHomePath & “2006\” & sUser
Else
objNetwork.MapNetworkDrive “H:”, sHomePath & “2006\” & sUser
End If