Here is a vbs script that I use to quickly remove student profiles from
a pc it works rather well. Substitute your own profiles in the CASE
statement that you want to keep. Call it what you want with a .vbs
extension and run it on your lab pcs.
-------------------------------
On Error Resume Next
Dim obtainfolder, PathFolder, strPath, x, strFolder()
Set fso = CreateObject("Scripting.FileSystemObject")
strPath = "C:\Documents and Settings\"
Set f = fso.GetFolder(strPath)
x=0
intResult = MsgBox("Are you sure you want to clear all profiles?",
vbYesNo + vbQuestion, "Warning")
If intResult = vbYes Then
For Each fldrItem in f.SubFolders
fldrName = fldrItem.name
If Right(strPath,1) <> "\" Then
PathFolder = strPath & "\" & fldrName
Else
PathFolder = strPath & fldrName
End If
Select Case fldrName
Case "Administrator", "All Users", "Default User", "LocalService",
"NetworkService":
Case "Administrator.HCSD"
Case "richardson_t.HCSD"
Case "richardson_t"
Case "tech1"
Case "tech1.HCSD"
Case "student"
Case "student.HCSD"
Case Else:
ReDim Preserve strFolder(x)
strFolder(x) = PathFolder
x=x+1
set obtainfolder = fso.GetFolder(PathFolder)
obtainfolder.Delete true
End Select
Next
for x = 0 to ubound(strFolder)
strMsg=strMsg & vbCrLf & strFolder(x)
next
msgbox "Profiles Deleted:" & vbCrLf & strMsg
Set fso = Nothing
Set fc = Nothing
End If
From: [email protected]
[mailto:[email protected]] On Behalf Of Mitch Mueller
Sent: Thursday, July 16, 2009 1:44 PM
To: [email protected]
Subject: RE: [info-tech] User Profiles
Ok. I will have to take a look at it again. I thought we just turned
off roaming profiles but I might look into that. So does your staff
save everything to their my documents on their local machine or to their
personal drives?
From: [email protected]
[mailto:[email protected]] On Behalf Of Dan Davis
Sent: Thursday, July 16, 2009 1:27 PM
To: [email protected]
Subject: RE: [info-tech] User Profiles
I use roaming profiles for staff, not students. This is handled via our
district AD servers. I also delete the roaming profiles off of the local
computers for students when they log out via group policies which are in
place.
Dan
Dan Davis
Network Administrator
Spirit Lake Comm. School District
(712) 336-3707 ext. 1300
[email protected]
From: Mitch Mueller [mailto:[email protected]]
Sent: Thursday, July 16, 2009 1:27 PM
To: [email protected]
Subject: RE: [info-tech] User Profiles
Ok. So would it be better to use roaming profiles or not?
From: [email protected]
[mailto:[email protected]] On Behalf Of Dan Davis
Sent: Thursday, July 16, 2009 1:20 PM
To: [email protected]
Subject: RE: [info-tech] User Profiles
If you are not using roaming profiles from the server, then each staff /
student who logs into a computer will get a newly created profile on the
local machine, unless they have one from before. This can take up quite
a bit of hard drive space over time. When someone logs into a computer,
the first check is for a server (roaming) profile, then second is the
local computer, and then finally one is created locally if needed.
Dan Davis
Network Administrator
Spirit Lake Comm. School District
(712) 336-3707 ext. 1300
[email protected]
From: Mitch Mueller [mailto:[email protected]]
Sent: Thursday, July 16, 2009 1:18 PM
To: [email protected]
Subject: [info-tech] User Profiles
We are having problems with our user profiles updating here. We are
running Windows XP SP3 and the servers are server 2003. I aren't using
roaming profiles so I'm not sure if it is not suppose to update. Just a
question. If you have any information of what might be going on please
let me know asap.
Thanks
Mitch Mueller
Emmetsburg CSD
