Blue Rain
مرحبًا بك فى منتديات المطر الأزرق, Smile
إذا كنت عضوًا فى منتدانا فنرجو منك تسجيل الدخول
أما إذا كنت غير مسجل لدينا فيسرنا و يشرفنا أن تنضم لإسرة منتدانا
وشكرًا ,
I love you




 
الرئيسيةس .و .جالتسجيلدخولالتسجيل

شاطر | 
 

 طريقة مسح الحاجات اللي الغيتها من بداية التشغيل startup في msconfig

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
bestron
نائب المدير
نائب المدير


ذكر
الدوله: :
المهنه: :
الهوايه: :
المزاج: :
عدد المساهمات: : 278
نقاط التميز: : 28142
نقاط التألق: : 21


مُساهمةموضوع: طريقة مسح الحاجات اللي الغيتها من بداية التشغيل startup في msconfig   الإثنين 08 فبراير 2010, 8:31 pm



أهلاً بأعضاءنا الكرام في منتدى التألق والإبداع منتدى المطر الأزرق
كنت شرحت قبل كده في موضوعي خمس طرق لتسريع الجهاز أمر msconfig انك لو شغلت Run وكتبت msconfig تعرف تشيل حاجات من الـ startup ... طيب الحاجات اللي شيلناها فيها حاجات مش عايزينها بعد كده أبداً ليه منشيلهاش من الليست دي؟

قبل ما نبدأ خلي بالك ان الحاجات اللي هتتمسح من الليست هتروح خالص فاللي ممكن تستخدمه تاني علم عليه صح الأول وبعد ماتخلص ابقى شيله تاني .


1- اعمل ملف تكست جديد new-->notepad في أي فولدر (المعظم بيستخدموا الفولدر بتاع الملفات المؤقته temp )
2-انسخ المعلومات اللي تحت دي لملف التيكست الجديد :

اقتباس :
Set oReg = GetObject("winmgmts:!root/default:StdRegProv")
Const HKLM = &H80000002
RegKeySUF = "SOFTWAREMicrosoftShared ToolsMSConfigstartupfolder"
RegKeySUR = "SOFTWAREMicrosoftShared ToolsMSConfigstartupreg"

ResultsSUF = EnumKey(HKLM, RegKeySUF, False)
If ResultsSUF = "" Then
ResultsSUF = space(5) & "(none)"
iBtns = 0
Else
iBtns = 4
sDelPrompt = "Would you like to selectively delete any of these items?"
End If
sResults = "Disabled items in startupfolder key:" & vbcrlf & _
ResultsSUF & vbcrlf & vbcrlf

ResultsSUR = EnumKey(HKLM, RegKeySUR, False)
If ResultsSUR = "" Then
ResultsSUR = space(5) & "(none)"
If iBtns <> 4 Then iBtns = 0
Else
iBtns = 4
sDelPrompt = "Would you like to selectively delete any of these items?"
End If
sResults = sResults & "Disabled items in startupreg key:" & vbcrlf & _
ResultsSUR & vbcrlf & vbcrlf

If MsgBox(sResults & sDelPrompt, iBtns + 256) <> 6 Then Wscript.quit

EnumKey HKLM, RegKeySUF, True
EnumKey HKLM, RegKeySUR, True

Function EnumKey(Key, SubKey, bDelete)
Dim Ret()
oReg.EnumKey Key, SubKey, sKeys

On Error Resume Next

ReDim Ret(UBound(sKeys))
If Err = 13 Then Exit Function
On Error GoTo 0

For Count = 0 to UBound(sKeys)
If Not bDelete Then
'this branch used on first call
Ret(Count) = space(5) & sKeys(Count)
Else
'this branch used on deletion iteration
If MsgBox("Do you want to delete " & sKeys(Count) & "?" & vbcrlf & _
vbcrlf & "This operation cannot be undone!", 4 + 256) = 6 Then
DeleteKey HKLM, SubKey & "" & sKeys(Count)
End If
End If
Next
EnumKey = Join(Ret, vbcrlf)
End Function

Function DeleteKey(Key, SubKey)
DeleteKey = oReg.DeleteKey(Key, SubKey)
End Function

Set ws = Wscript.CreateObject("Wscript.Shell")

3- لما تيجي تحفظ الملف save as وتكتب الاسم اللي انت عايزه .vbs يعني مثلاً (cleanUpmsconfig.vbs)

ودلوقتي لما تضغط عليه بالماوس دبل كليك هيمسحلك كل الحاجات اللي انت شايل من قدامها علامة صح في الـ startup

أتمنى يكون مفيد ويساعد الأعضاء اللي اتضايقوا فعلاً من الحركة دي زيي

والسلام عليكم

الرجوع الى أعلى الصفحة اذهب الى الأسفل
Admin
EL PRINCE
EL PRINCE


ذكر
الدوله: :
المهنه: :
الهوايه: :
المزاج: :
عدد المساهمات: : 1076
نقاط التميز: : 145225
نقاط التألق: : 23


مُساهمةموضوع: رد: طريقة مسح الحاجات اللي الغيتها من بداية التشغيل startup في msconfig   الإثنين 08 فبراير 2010, 8:36 pm

راااااااااااائع
وشكرا ايها المبدع


[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]



الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://bluerain.yourme.net
 
طريقة مسح الحاجات اللي الغيتها من بداية التشغيل startup في msconfig
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
Blue Rain :: الأرشيف :: الأرشيف-
انتقل الى:  

اعوذ بالله من الشيطان الرجيم {اَللَهُ لا إِلَهَ إلا هو اَلحي ُ القَيَوم لا تأخذه سِنَةٌ ولا نوْمٌ لَّهُ مَا فيِِ السَمَاوَاتِ وَمَا في اَلأَرْضِ مَن ذَا الَّذِي يَشفَعُ عِنْدَهُ إِلاَّ بِإِذْنِهِ يَعْلَمُ مَا بَينَ أَيدِيهِمْ ِوَمَا خَلْفَهم وَلا َيُحِيطُونَ بشَيءٍ مِنْ علمِهِ إِلاَ بِمَا شَآء وَسعَ كُرْسِيُّهُ السَمَاوَاتِ وَالأَرضِ وَلاَ يَؤُدُه حِفْظُهُمَا وَهُوَ العَليُّ العَظِيمُ}

جميع الحقوق محفوظة لـBlue Rain Powered by phpBB2 ®bluerain.yourme.net حقوق الطبع والنشر©2010 - 2009