I want to delete old profile automatically from document and settings more
than 10 days , Old profile should be deleted automatically,
Should i use group policy or need to run bat files,

Please tell me the steps,

"Vijay" <(E-Mail Removed)> wrote in message
news:C46CF8D3-78C8-41AA-8303-(E-Mail Removed)...
>I want to delete old profile automatically from document and settings more
> than 10 days , Old profile should be deleted automatically,
> Should i use group policy or need to run bat files,
>
> Please tell me the steps,

Here you go:
1. Copy & paste the code below into c:\Windows\DeleteFolders.vbs.
2. Unwrap any line that might have wrapped around.
3. Adjust Lines 01 and 02 to suit your environment.
4. Remove the line numbers.
5. Double-click c:\Windows\DeleteFolders.vbs. Note that the code
will prompt you before it deletes a profile folder.

[01] iAge = 10
[02] sExceptions = "Default User|Administrator|All
Users|LocalService|NetworkService"
[03] Set oFSO = CreateObject("Scripting.FileSystemObject")
[04] Set oProfiles = oFSO.GetFolder("c:\Documents and Settings")
[05]
[06] For Each oFolder In oProfiles.SubFolders
[07] If InStr(1, sExceptions, oFolder.Name, 1) = 0 Then
[08] If oFSO.FileExists(oFolder.Path & "\ntuser.dat") Then
[09] Set oFile = oFSO.GetFile(oFolder.Path & "\ntuser.dat")
[10] If DateDiff("d", oFile.DateLastModified, Now) > iAge Then
[11] iReply = MsgBox("Delete " & oFolder.Path & "?", vbYesNo)
[12] if iReply = 6 then oFSO.DeleteFolder oFolder.Path
[13] End If
[14] End If
[15] End If
[16] Next

Delprof is a Microsoft utility from the 2003 Resource Kit:

http://download.microsoft.com/downlo...27/delprof.msi

How to use the above tool (writen for Windows 2000 but will give you an
idea):

http://support.microsoft.com/kb/315411


Use the Profile Cleanup Service from Microsoft

http://download.microsoft.com/downlo...lean-Setup.msi

--
SPAMCOP User


"Vijay" <(E-Mail Removed)> wrote in message
news:C46CF8D3-78C8-41AA-8303-(E-Mail Removed)...
>I want to delete old profile automatically from document and settings more
> than 10 days , Old profile should be deleted automatically,
> Should i use group policy or need to run bat files,
>
> Please tell me the steps,

Pegasus,

If you include a MessageBox then it isn't unattended

Good ole FileSystemObject from the scrun dll. Takes me back to VB6 days -
happy times )

--
SPAMCOP User

"Pegasus [MVP]" <(E-Mail Removed)> wrote in message
news:%23yhl%(E-Mail Removed)...
>
> "Vijay" <(E-Mail Removed)> wrote in message
> news:C46CF8D3-78C8-41AA-8303-(E-Mail Removed)...
>>I want to delete old profile automatically from document and settings more
>> than 10 days , Old profile should be deleted automatically,
>> Should i use group policy or need to run bat files,
>>
>> Please tell me the steps,
>
> Here you go:
> 1. Copy & paste the code below into c:\Windows\DeleteFolders.vbs.
> 2. Unwrap any line that might have wrapped around.
> 3. Adjust Lines 01 and 02 to suit your environment.
> 4. Remove the line numbers.
> 5. Double-click c:\Windows\DeleteFolders.vbs. Note that the code
> will prompt you before it deletes a profile folder.
>
> [01] iAge = 10
> [02] sExceptions = "Default User|Administrator|All
> Users|LocalService|NetworkService"
> [03] Set oFSO = CreateObject("Scripting.FileSystemObject")
> [04] Set oProfiles = oFSO.GetFolder("c:\Documents and Settings")
> [05]
> [06] For Each oFolder In oProfiles.SubFolders
> [07] If InStr(1, sExceptions, oFolder.Name, 1) = 0 Then
> [08] If oFSO.FileExists(oFolder.Path & "\ntuser.dat") Then
> [09] Set oFile = oFSO.GetFile(oFolder.Path & "\ntuser.dat")
> [10] If DateDiff("d", oFile.DateLastModified, Now) > iAge Then
> [11] iReply = MsgBox("Delete " & oFolder.Path & "?", vbYesNo)
> [12] if iReply = 6 then oFSO.DeleteFolder oFolder.Path
> [13] End If
> [14] End If
> [15] End If
> [16] Next
>
>

"SPAMCOP User" <spamcop_user@no_mail.haha> wrote in message
news:(E-Mail Removed)...
> Pegasus,
>
> If you include a MessageBox then it isn't unattended
>
> Good ole FileSystemObject from the scrun dll. Takes me back to VB6 days -
> happy times )
>
> --
> SPAMCOP User

I know but I'm very reluctant to post a solution that deletes folders
without user confirmation. It would be quite easy to remove the user prompt
but then your "delprof" suggestion may be a more elegant solution.