Windows XP SP3 Registry Tweaks & Services

[pcjames]

Hi All, Not really sure if this is the right place to post this for there is no dedicated "AUTOIT" section (wished there was one), but here it goes.

This is a collection of Tweaks & Services from all over converted to a Autoit script and since I'm not the brightest cookie in the cookie barrel, I'd like to get some input from all of you msfn members if there are any mistakes and/or Tweaks Services I should add or should not use.

I know I can use .reg files and slipstream these into my XP cd but the reason for going with Autoit is that I repair computers for the general public, so I may not install tweaks on some computers and depending on what my customer wants I can have my Autoit scripts already set up to run what I want with one click after XP install.

EDIT: I have combined all the tweaks together and added/removed a few and also included services for XP Home. In the Tweaks I've added the default values from a WinXP Home fresh install as well as what options are available for each tweak (if I know it).

This is for Windows XP SP3 32 Bit

Version: v0.1 Dated: 6-15-2009

WinXP_Services_Tweaks.zip

Please be warned... This is a work in progress!

Thanks in advanced for any and all input and help!

Edited June 16, 2009 by pcjames

[pcjames]

After testing this on another fresh install I have a few problems that I've noticed so far and could use someones help trying to figure these out.

1. This one is displaying :53,00,65,00, etc

; Enable Quick Launch
;   Defaults: This Value is present by default - "0c,00,00,00,08,00,00,00,01,00,00,00,00,00,00,00,aa,4f,28,68,48,6a,d0,11,8c,78,00,c0,4f,d9,18,b4
,0c,03,00,00,60,0d,00,00,00,00,00,00,1e,00,00,00,00,00,00,00,00,00,00,00,1e,00,00,00,00,00,00,00,01,0
0,00,00"
    RegWrite("HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop", "TaskbarWinXP", "REG_BINARY", "0c,00,00,00,08,00,00,00,02,00,00,00,00,00,00,00,b0,e2,2b,d8,64,57,d0,11,a9,6e,00,c0,4f,d7,05,a2
,22,00,1c,00,0a,01,00,00,1a,00,00,00,01,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,4c,00,00,00,01,1
4,02,00,00,00,00,00,c0,00,00,00,00,00,00,46,83,00,00,00,10,00,00,00,a0,b0,48,5e,89,8d,bd,01,00,d8,9e,
e4,2a,8d,bd,01,00,45,fe,5e,89,8d,bd,01,00,00,00,00,00,00,00,00,01,00,00,00,00,00,00,00,00,00,00,00,00
,00,00,00,13,01,14,00,1f,0f,e0,4f,d0,20,ea,3a,69,10,a2,d8,08,00,2b,30,30,9d,19,00,23,44,3a,5c,00,00,0
0,00,00,00,00,00,00,00,00,00,00,00,00,00,00,cd,97,15,00,31,00,00,00,00,00,af,24,5c,b9,10,80,57,69,6e,
6e,74,00,00,20,00,31,00,00,00,00,00,af,24,a3,b9,10,00,50,72,6f,66,69,6c,65,73,00,50,52,4f,46,49,4c,45
,53,00,19,00,31,00,00,00,00,00,c1,24,08,92,10,00,69,65,35,30,30,2e,30,30,30,00,00,28,00,31,00,00,00,0
0,00,c1,24,08,92,10,00,41,70,70,6c,69,63,61,74,69,6f,6e,20,44,61,74,61,00,41,50,50,4c,49,43,7e,31,00,
21,00,31,00,00,00,00,00,c5,22,9d,91,10,00,4d,69,63,72,6f,73,6f,66,74,00,4d,49,43,52,4f,53,7e,31,00,29
,00,31,00,00,00,00,00,d3,22,32,a6,10,00,49,6e,74,65,72,6e,65,74,20,45,78,70,6c,6f,72,65,72,00,49,4e,5
4,45,52,4e,7e,31,00,24,00,31,00,00,00,00,00,db,22,76,ba,10,00,51,75,69,63,6b,20,4c,61,75,6e,63,68,00,
51,55,49,43,4b,4c,7e,31,00,00,00,8d,00,00,00,1c,00,00,00,01,00,00,00,1c,00,00,00,36,00,00,00,0d,f0,ad
,ba,8c,00,00,00,1a,00,00,00,03,00,00,00,e7,18,2d,23,10,00,00,00,49,45,35,30,30,5f,58,31,43,00,43,3a,5
c,57,49,4e,4e,54,5c,50,72,6f,66,69,6c,65,73,5c,49,45,35,30,30,2e,30,30,30,5c,41,70,70,6c,69,63,61,74,
69,6f,6e,20,44,61,74,61,5c,4d,69,63,72,6f,73,6f,66,74,5c,49,6e,74,65,72,6e,65,74,20,45,78,70,6c,6f,72
,65,72,5c,51,75,69,63,6b,20,4c,61,75,6e,63,68,00,00,10,00,00,00,05,00,00,a0,1a,00,00,00,a3,00,00,00,0
0,00,00,00,08,00,00,00,02,00,00,00,cc,00,00,00,01,00,00,00,03,00,00,00,4a,00,00,00,01,00,00,00,40,00,
32,00,e6,01,00,00,c4,24,15,9f,20,00,4c,61,75,6e,63,68,20,49,6e,74,65,72,6e,65,74,20,45,78,70,6c,6f,72
,65,72,20,42,72,6f,77,73,65,72,2e,6c,6e,6b,00,4c,41,55,4e,43,48,7e,32,2e,4c,4e,4b,00,00,00,40,00,00,0
0,02,00,00,00,36,00,32,00,48,02,00,00,c4,24,15,9f,20,00,4c,61,75,6e,63,68,20,4f,75,74,6c,6f,6f,6b,20,
45,78,70,72,65,73,73,2e,6c,6e,6b,00,4c,41,55,4e,43,48,7e,31,2e,4c,4e,4b,00,00,00,36,00,00,00,00,00,00
,00,2c,00,32,00,51,00,00,00,ec,22,46,39,20,00,53,68,6f,77,20,44,65,73,6b,74,6f,70,2e,73,63,66,00,53,4
8,4f,57,44,45,7e,31,2e,53,43,46,00,00,00,52,00,00,00,e0,00,00,00,00,00,00,00,16,00,00,00,00,00,00,00,
00,00,00,00,16,00,00,00,00,00,00,00,01,00,00,00,01,00,00,00,aa,4f,28,68,48,6a,d0,11,8c,78,00,c0,4f,d9
,18,b4,37,02,00,00,e0,00,00,00,00,00,00,00,16,00,00,00,00,00,00,00,00,00,00,00,16,00,00,00,00,00,00,0
0,01,00,00,00")

[pcjames]

OK it seems the Quick Launch tweak won't work while logged into a user account but can be added during T13 but of coarse that's not what I'm trying to do... So I've came up with a workaround that suits my needs and that's by using autoit code

$hWin = _OpenTaskBarProperties()
_ChangeTaskBarProperties($hWin, "GroupSimilarTaskbarButtons", 0)
Sleep(500)
_ChangeTaskBarProperties($hWin, "ShowQuickLaunch", 1)

Func _OpenTaskBarProperties()
	Local $sWinTitle = "[CLASS:#32770; TITLE:Taskbar and Start Menu Properties]"
	Local $obj_Shell = ObjCreate("Shell.Application")
	$obj_Shell.TrayProperties
	WinWait($sWinTitle)
	Return WinGetHandle($sWinTitle)
EndFunc

Func _ChangeTaskBarProperties($hWND, $sProp, $f_Check)
	Local $sCtrlID

; Set the command string
	Local $sCmnd = "UnCheck"
	If $f_Check Then $sCmnd = "Check"

; Pick the button to change
	Switch $sProp

		Case "GroupSimilarTaskbarButtons"
			Local $sCtrlID = "[CLASS:Button; INSTANCE:4]"

		Case "ShowQuickLaunch"
			Local $sCtrlID = "[CLASS:Button; INSTANCE:5]"

	EndSwitch

; Make the change
	ControlCommand($hWND, "", $sCtrlID, $sCmnd)
EndFunc

; Apply changes and close
WinActivate("Taskbar and Start Menu Properties","")
ControlClick("Taskbar and Start Menu Properties", "", "[ID:1]", "Left", "1")

I'll include this in the next update v0.2

Edit: I forgot to add... this code will also Disable "Group Similar Taskbar Buttons" also it's able to do more so you can use it to fit your needs.

Edited June 16, 2009 by pcjames

[Geej]

Alternatively, if you already logon to user desktop, and wants to enable quick launch, try

;Toggle Quick Launch state. Requires mouse connection to work
$MousePos=MouseGetPos ( ); get current position
$X=$MousePos[0]
$Y=$MousePos[1]
MouseClick ( "primary" ,@DesktopWidth-10,@DesktopHeight-10,1, 1 ); click once near system clock
send ("+{F10}"); Bring up context menu
send ("{T}{Q}"); Toggle Quick Launch
mouseclick ("primary",$X,$Y,1,1); rtn to previous mouse position

[Geej]

Open Network Connections thru My Computers

; Display Network Connections to MY Computer
RegWrite('HKCR\CLSID\{20D04FE0-3AEA-1069-A2D8-08002B30309D}\shell\Network Connections', '', 'Reg_sz', '')
RegWrite('HKCR\CLSID\{20D04FE0-3AEA-1069-A2D8-08002B30309D}\shell\Network Connections\Command', '', 'Reg_sz', 'Explorer ::{7007ACC7-3202-11D1-AAD2-00805FC1270E}')