Question : Supprimer les profils d'utilisateur basés sur l'âge du dossier de ntuser.dat.

Hé des gens, j'essaye de supprimer de vieux profils d'utilisateur basés sur l'âge du dossier de ntuser.dat.  La chose bizarre est que ceci est fait dans un environnement de botte de pré-exécution de Windows 7.  utilisation WDS du

We de déployer nos images.  Quand nous avons une machine de Windows Xp qui est prête à être émigrée à Windows 7 nous avoir une image particulière de botte qui une fois choisie des bottes au pxe des fenêtres 7, crée automatiquement un groupe de chemises, déplace une certaine substance autour, yadda de yadda de yadda, et elle serait grande si elle pourrait également regarder C:\documents et la chemise d'arrangements et identifier tous les profils d'utilisateur avec des dossiers de ntuser.dat plus anciens que ....... oh disent 60 jours et suppriment ces vieux profils.  Je ne peux pas employer le delprof, celui ne travaillerai pas dans W7pxe.  Des idées ?  Remercie folks. class= de

Réponse : Supprimer les profils d'utilisateur basés sur l'âge du dossier de ntuser.dat.

Ceci devrait faire le tour.  Me faire savoir ce que vous pensez.
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
22 :
23 :
24 :
25 :
26 :
27 :

intMaxAge = 60

'Créer les objets
Placer l'objShell = le CreateObject (« WScript.Shell »)
Placer l'objFSO = le CreateObject (« Scripting.FileSystemObject »)

'Obtenir les chemins spéciaux de chemise
strAllUserProfile = objShell.ExpandEnvironmentStrings (« %ALLUSERSPROFILE%")

Placer SkipProfilesArray = CreateObject (« Scripting.Dictionary »)
SkipProfilesArray.Add « administrateur », « administrateur »
SkipProfilesArray.Add « tous les utilisateurs », « tous les utilisateurs »
SkipProfilesArray.Add « utilisateur de défaut », « utilisateur de défaut »
SkipProfilesArray.Add « LocalService », « LocalService »
SkipProfilesArray.Add « NetworkService », « NetworkService »

strAllProfiles = objFSO.GetParentFolderName (strAllUserProfile)
Placer les objProfiles = l'objFSO.GetFolder (les strAllProfiles)

Pour chacun strUserProfile dans objProfiles.SubFolders
	Sinon SkipProfilesArray.Exists (strUserProfile.Name) puis
	Placer l'objDAT = l'objFSO.GetFile (strUserProfile et « \ NTUSER.DAT »)
		Si DateDiff (« D », objDAT.DateLastModified, maintenant ()) > intMaxAge alors
			objFSO.DeleteFolder strUserProfile
		Finir si
	Finir si
Après
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
    •
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
    •
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
    •
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
    •
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
    •
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
    •
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
    •
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
    •
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
    •
  •  Winzip 12 issues de secours du travail ?
    •
     
    programming4us programming4us