|
|
![]() |
|
|
Top | #21 |
|
OSNN One Post Wonder
Joined: May 2008
Location: Bronx, NY
Posts: 3
Reputation: 0
Power: 0 |
Very Useful. I've already applied them and I see a huge improvement. I new to this site and hope to contribute as much as a can in addition from learn from you guys.
Thanks.
|
|
|
|
|
|
Top | #22 |
|
OSNN Junior Addict
Joined: May 2008
Posts: 9
Reputation: 0
Power: 23 |
thanks dude. previously i had installed xp with sp3 , amit version, and when an app hung, the process would automatically end. this reg modification would surely save my time when apps hang.
|
|
|
|
|
|
Top | #23 |
|
OSNN One Post Wonder
Joined: May 2008
Posts: 1
Reputation: 0
Power: 0 |
Thanks for the great tutorial! i've performed all the tweaks and my computer shuts down and wakes up in record time! I just couldn't believe it's the same OS
|
|
|
|
|
|
Last edited by fitz; May 11th, 2008 at 5:51am. Reason: added warning and set the script with the code tags | Top | #24 |
|
OSNN One Post Wonder
Joined: May 2008
Posts: 2
Reputation: 0
Power: 0 |
mod note: The script below will disable the services listed and should be run at your own risk. Disabling some of the services may break your system or result in a decreased functionality of your system.
I hope this helps someone, I've used it so much to help home users. This is a script to disable a lot of services that common home users won't need. This is only for those people who have one pc that doesn't need to be networked to other pcs. To use, copy all information between the "--"'s and paste into notepad. Save the file as "turn off services.vbs" and then double-click the file to run it. Give it a minute or two, then reboot. You should see the benefits quickly. CAUTION: Run with care. I accept no responsibility for any problems. To enable any service that was turned off, click start/run/services.msc Any service that was needed, right click on it and choose "automatic" instead of disabled. Code:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'Alerter'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'FastUserSwitchingcompatibility'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'helpsvc'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'policyagent'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'Remoteregistry'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'seclogon'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'lanmanserver'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'Alerter'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'lmhosts'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'tapisvr'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'tlntsvr'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'termservice'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'w32time'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'lanmanworkstation'")
For Each objService in colServiceList
If objService.State = "Running" Then
objService.StopService()
Wscript.Sleep 5000
End If
errReturnCode = objService.ChangeStartMode("Disabled")
Next
|
|
|
|
|
|
Last edited by fitz; July 27th, 2008 at 9:21pm. Reason: signature removed | Top | #25 |
|
MTRX
Joined: July 2008
Location: austin texas
Posts: 1
Reputation: 0
Power: 0 |
groovy, i knew most of those, but you got me on one that ive been itching to know, the no low disk space check, thanx man. 8D
|
|
|
|
|
|
Top | #26 |
|
XPista7eopard*ix
Joined: April 2004
Location: Chicagoland
Posts: 3,919
Reputation: 2599
Power: 136 |
Hi MTRX.. your first post was approved but i did remove your signature as it violates the signature guidelines on the forum.
Please take a moment to read the Signature Guidelines which states the following restrictions on Sigatures:
|
|
|
|
|
|
|
|
|
Top | #27 |
|
OSNN Junior Addict
Joined: July 2008
Posts: 6
Reputation: 0
Power: 20 |
Hi,
This is my first post here and thanks Vishal great tips! |
|
|
|
|
|
Last edited by fitz; October 6th, 2008 at 3:03pm. | Top | #28 |
|
OSNN Junior Addict
Joined: September 2008
Posts: 2
Reputation: 0
Power: 0 |
thanks for the tutorial in which u have explained... thanks for all
_______________________________________________ Anthony |
|
|
|
|
|
Last edited by fitz; October 6th, 2008 at 3:04pm. | Top | #29 |
|
OSNN Junior Addict
Joined: October 2008
Posts: 2
Reputation: 0
Power: 0 |
Thank you for providing great tutorial to make windows fast. After following some of the rules , Windows XP is working very fast.
_______________________________________________ |
|
|
|
![]() |
| Bookmarks |
| Thread Tools | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| MASTER TUTORIAL: Make Your Windows VISTA Super Fast | Vishal Gupta | Windows Desktop Systems | 42 | March 20th, 2008 10:09am |
| Who wants this Super FAST Mini?? | ming | Green Room | 2 | April 10th, 2004 2:30pm |
| Super-fast user switch powertoy and guest account | Powerchordpunk | Windows Desktop Systems | 1 | July 4th, 2003 2:29am |
| super fast MP3 | canadian_divx | Windows Desktop Systems | 5 | May 18th, 2003 10:47pm |
| Super Fast User Switching | yoda | Windows Desktop Systems | 11 | June 4th, 2002 5:40pm |
![]() |