مسح بروفايل المستخدمين

السلام عليكم ....

بالنسبة للـ profiles لابد في البداية ان تستخدم اللـ roming profile وهي عملية تخزين الـ profile الخاص بالمستخدمين في سيرفير معين , ثم من خلال الـ Group Policy توجد policy اسمها Limit Profile Size موجودة تحت :

user configuration --> Administrative Templates --> System --> Logon/logoff

من خلال هذه العملية تستطيع تحديد او ضبط حجم الـ Profile.

للمزيد من المعلومات حول الـ User Profiles انقر هنا

تحياتي,

فهد الرفاعي

وهناك اداة او برنامج خاص بهذه العملية (مسح الـ user profile) في هذا الرابط

User Profile Deletion Utility (Delprof.exe)

تحياتي,

فهد الرفاعي

شكرا أخي فهد

جاري التحميل والتجربة ..

في انتظار رد عن موضوع ال Scheduel Tasks

السلام عليكم ...

هل من طريقة لتشغيل هذا البرنامج عن طريق الجروب بولسي مثلا لكي يقوم بمسح البروفايل عقب اعادة التشغيل او logoff للمستخدمين ؟؟ حيث انه CommandProgram ويحتاج لتشغيلة كتابة الأمر كما يلي

Delprof.exe uses the delprof /q /i /p /r /c:\\computer name /d:days syntax. You can use the following parameters with Delprof.exe: 

           /q: This parameter runs Delprof.exe in quiet mode. When you use this parameter, you are not prompted to confirm the deletion of each profile. 

           /i: This parameter ignores any errors that may occur. 

           /p: This parameter specifies that a message is displayed that prompts you to confirm the deletion of each profile. 

           /r: This parameter specifies that delete the roaming profile cache only. Local profiles on the machine will not be deleted. 

           /c:\\computer name: This parameter specifies the computer name on which to run Delprof.exe. 

           /d:days: This parameter specifies the number of days after which Delprof.exe considers the profiles as inactive. Profiles that have not been used for a period of time that is longer than the specified value are deleted.

السلام عليكم..

مافي احسن من الـ Command Utilities خاصة اذا كان يستخدم للـ remote clients .. انا بصراحة لم استخدم هذا البرنامج ولكن ممكن تجرب الطريقة التالية:

تنشئ ملف patch وتكتب داخله الامر delprof /q , ومن الـGroup Policy للدومين تذهب الى Computer Configuration --> Windows Settings --> Scripts (startup/shutdown) --> startup

وتضيف الملف .

او بعد انشاء الPatch تنشئ schedual task لهذا الملف وترسله لكل الاجهزة والله اعلم.

تحياتي,

فهد الرفاعي

السلام عليكم أخي فهد

هل اجد عندك خطوات انشاء الباتش ؟؟ لأن اعتقد انه يجب ان يكون هناك script ما يتم كتابته لذلك ..

بالنسبة للScheduled Task فهذا موضوع أخر انا اريد ان اطبقه على الDefragment

في انتظار مشاركات باقي الأخوة

تحياتي

السلام عليكم ..

بالنسبة لخطوات انشاء الباتش سهلة جداً , مجرد انك تنشئ ملف من الـNotepad وتكتب فيه الـcommands (كأنك بتكتبها من الـcommand prompt) وتخزن الملف بالامتداد pat.

وبالنسبة للـschedual task للـ Defragmenter وجدت هذا الـ script إن شاء الله ينفعك:

اقتباس

' ***************************************************************************************

' * Programm    : Defrag.vbs                    *

' * Version        : 2.2                            *

' * Datum        : 11.05.2003                        *

' * Copyright ® : 2003 Wolfgang Struensee                      *

' *        Weitergabe nur bei Erhalt des Copyright-Vermerkes erlaubt        *

' *VBSInclude    : keine                            *

' *                                    *

' ***************************************************************************************

Option Explicit

' variable definieren

Dim ObjFileSys, objShell, d                                                        'as object

Dim Drv, DrvLetter, DrvName                                                        'as string

Dim I, j, n                                                                        'as integer

Dim bCancel                                                                        'as boolean

' konstanten definieren

Const sPrgDe = "Disk Defragmenter"

Const sPrgEn = "Disk Defragmenter"

Const xPrgDe = "Defragmentierung abgeschlossen"

Const xPrgEn = "Defragmentation Complete"

' notwendige object definieren

Set objFileSys = CreateObject("Scripting.Filesystemobject")

Set objShell = WScript.CreateObject("WScript.Shell")

' alle vorhandenen lokalen laufwerke ermitteln

n = 0

For Each Drv In objFileSys.Drives

DrvLetter = Drv.DriveLetter & ":"

If LCase(DrvLetter) <= "f:" Then

If DriveIsReady(DrvLetter) Then

Set d = objFileSys.GetDrive(DrvLetter)

If d.DriveType = 2 Then

If LCase(DrvLetter) = "c:" Then

DrvName = Drv.VolumeName

End If

n = n + 1

End If

End If

End If

Next

bCancel = False

'hier das zu überwachende programm eintragen

objShell.Run "dfrg.msc"

Do

'warten bis Anmeldenfenster geِffnet ist

I = I + 1

WScript.Sleep 1000

Loop Until I > 300 Or objShell.AppActivate(sPrgDe) Or objShell.AppActivate(sPrgEn)

If I < 300 Then

'hier eine schleife für alle vol-id's ab lw c:

For j = 1 To n

If j = 1 Then

'Anmeldedaten

objShell.SendKeys "{TAB}{HOME}" & Left(DrvName, 1) & "{TAB}{TAB}"

objShell.SendKeys " "

Else

objShell.SendKeys "{DOWN}{TAB}{TAB}"

objShell.SendKeys " "

End If

Do

'warten bis Fenster geِffnet wird

I = I + 1

WScript.Sleep 1000

Loop Until I > 86400 Or objShell.AppActivate(xPrgDe) Or objShell.AppActivate(xPrgEn) Or objShell.AppActivate(sPrgDe) = False

objShell.SendKeys "{TAB}"

objShell.SendKeys " "

Do

'warten bis Fenster geschlossen wird

WScript.Sleep 500

Loop While objShell.AppActivate(xPrgDe) Or objShell.AppActivate(xPrgEn)

If objShell.AppActivate(sPrgDe) = False Or objShell.AppActivate(sPrgEn) = False Then

bCancel = True

Exit For

End If

Next

If bCancel = False Then

objShell.SendKeys "%{F4}"

End If

End If

' Ende des Scripts

'

' ab hier fangen die Sub's und Functions an

'

Function DriveIsReady(drv)

Dim Drive

Set Drive = objFileSys.GetDrive(drv)

DriveIsReady = Drive.IsReady

End Function

Function WshExit(errorlevel)

WScript.Quit errorlevel

End Function

وشكرا

نحياتي,

فهد الرفاعي

اسلام عليكم

أخي فهد شكرا جزيلا وسأجرب السكريبت وأخبرك بالنتيجة إن شاء الله

بالنسبة للباتش هل هذا يعني انه يجب على تحميل البرنامج اولا على كل الكلاينت ام يمكن جعله يعمل من السيرفر فقط ؟؟

وكذلك هل يجب كتابة الPath كاملا للملف ولا فقط يمكن كتابة Delprof ؟؟

UP

السلام عليكم ..

في الحالتين (تنزيل البرنامج على الكلاينت او تنزيله على السيرفر ) ستصادفك مشكلة وهي اذا نزلتها على السيرفر لازم تعمل سكيجول تاسك لكل جهاز واذا حبيت تنزلها على الكلاينت ستجد صعوبة اذا كان عددهم كبير لكن....!!!!

بما ان الملف امتداده msi فيمكن تنزيله على كل الكلاينت عن طريق الـ Group Policy وبهذه الطريقة إن شاء الله تكون انحلت..

وبالنسبة للـpath مجرد انك تعرفه في الـ autoexec.nt file اللي موجود تحت c:\windows\system32

تحياتي,

فهد الرفاعي