|
|
![]() |
|
|
Top | #21 |
|
OSNN Junior Addict
Joined: May 2008
Location: Bronx, NY
Posts: 3
Reputation: 0
Power: 0 |
Thanks.
|
|
|
|
|
|
Top | #22 |
|
OSNN Junior Addict
Joined: May 2008
Posts: 8
Reputation: 0
Power: 50 |
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
|
|
|
|
|
|
Top | #24 |
|
OSNN Junior Addict
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
|
|
|
|
|
|
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: 4,028
Reputation: 2947
Power: 168 |
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: 47 |
Hi,
This is my first post here and thanks Vishal great tips! |
|
|
|
|
|
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 |
|
|
|
|
|
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.
_______________________________________________ |
|
|
|
|
|
Top | #30 |
|
OSNN Junior Addict
Joined: April 2010
Posts: 4
Reputation: 0
Power: 0 |
don't really see where reinventing the wheel turns out to be all that great ...
|
|
|
|
![]() |
| 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 |