Jump to content

What Services can I disable?


kartel

Recommended Posts

I want to disable all non-needed services.

I want to be able to:

Surf the net

Use yahoo and msn messenger

Play games like FEAR ect.

Use my defrag

Get messages about firewall ect

Check for updates manually

Keep Aero and Windows Firewall

Keep my computer as quick as possible without getting errors

I don't want to:

Share files

Network or Remote manage anything

No printers or Fax's or Scanners

Remote assistance'

TCIP v6

Tunnels

Thanks

Edited by kartel
Link to comment
Share on other sites


Yes I seen that topic, I need a custom list that matches my criteria

How do you think everyone else is figuring out their own Services? They are doing trial-and-error. That's the point of the guide, to be of reference.

Besides if you want to play games with optimal FPS, stick with XP. There's an article on Tom's Hardware that shows games running slower on Vista.

Link to comment
Share on other sites

  • 2 months later...

Ok, I have a working list of sevices I disabled and everything has been good for months, and also the same goes for RTM or RC2.

If you have no printers, scanners or share files or remote stuff, you can safely match services with mine with no ill effects.

If anyone see's a problem, please let me know.

:thumbup

vista2007107xd2.gif

vista2007108cn6.gif

vista2007109tw7.gif

vista2007110wf9.gif

Link to comment
Share on other sites

Here is the list of services that I run on Vista Ultimate, I have the printer , updare service running.

Here is the VBS Script that I used to list the Services.

strComputer = "." 
Dim Cnt, ColItem, ObjItem, OutFile, Ts, Var1, Var2
Var1 = Chr(160) & Chr(187) & Chr(160)
Dim Act :Set Act = CreateObject("WScript.Shell")
Dim Fso :Set Fso = CreateObject("Scripting.FileSystemObject")
Dim Wmi :Set Wmi = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
OutFile = Act.ExpandEnvironmentStrings("%UserProfile%\Desktop\Service.txt")
Set Ts = Fso.CreateTextFile(OutFile)
Set ColItem = Wmi.ExecQuery("SELECT * FROM Win32_Service",,48)
For Each ObjItem in ColItem
Cnt = Cnt + 1
If Cnt > 99 Then
Cnt = Cnt
ElseIf Cnt = 99 Then
Cnt = "0" & Cnt
ElseIf Cnt > 9 Then
Cnt = "0" & Cnt
ElseIf Cnt = 9 Then
Cnt = "00" & Cnt
ElseIf Cnt < 9 Then
Cnt = "00" & Cnt
End If
Var2 = Chr(160) & Chr(171) & " ---------- " & Cnt & " ---------- " & Chr(187)
Ts.WriteLine Var2 & vbCrlf & _
" Caption " & Var1 & objItem.Caption & vbCrlf & _
" Service Name " & Var1 & ObjItem.Name & vbCrlf & _
" Display Name " & Var1 & ObjItem.DisplayName & vbCrlf & _
" Service State" & Var1 & ObjItem.State & vbCrlf & _
" Path Name " & Var1 & ObjItem.PathName & vbCrlf & _
" Start Mode " & Var1 & ObjItem.StartMode & vbCrlf
Next
Ts.Close()
Set Var1 = Fso.GetFile(OutFile)
Act.Run("Notepad.exe " & Var1.Path),1,True
Var2 = MsgBox("Did You Want To Keep This File" & vbCrLf &_
Var1.Path, 4132,"Keep Or Delete")
If Var2 = 7 Then Var1.Delete() End If

Edited by gunsmokingman
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...