Glenn, Look at the 18th charachter in the string. It is a 2. I would have thought your Quick Launch toolbar is disabled. But looking at the length of the string, I would say it is enabled. These are the values under the registry key HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop when I disable the Quick Launch Toolbar (and log off and log on again)
Code:
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop]
"TaskbarWinXP"=hex:0c,00,00,00,08,00,00,00,02,00,00,00,00,00,00,00,aa,4f,28,68,\
48,6a,d0,11,8c,78,00,c0,4f,d9,18,b4,e5,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,00,00,00,01,00,\
00,00,8b,8a,0d,54,3f,1c,32,4e,81,32,53,0f,6a,50,20,90,1d,00,00,00,60,05,00,\
00,00,00,00,00,1c,00,00,00,00,00,00,00,00,00,00,00,1c,00,00,00,00,00,00,00,\
01,00,00,00
"Toolbars"=hex:11,00,00,00,00,00,00,00
"Upgrade"=dword:00000001
Registered: 2005-01-17
Posts: 1894
Loc: Hilversum, The Netherlands
Originally Posted By: NTDOC
Yes, but they say the same thing about having to kill explorer shell which is not good.
Quote:
I found out that if you try this while Explorer is running the settings are overwritten on Windows shutdown. Kill the explorer process to prevent this.
Thats not true, I tested this script and it works perfectly you see if enable and disable quicklaunch 4 times without killing the explorer process. I think im losing my KiX religion
Registered: 2003-01-28
Posts: 4396
Loc: New Jersey
Originally Posted By: Witto
Glenn, Look at the 18th charachter in the string. It is a 2.
Yes, but the 18th character is not extracted by Right($BigString, 1)!!!
What I was pointing out was that I got much more data in the string than you first indicated, so Right(string, 1) may not work, but SubStr($String, 18, 1) might.
Also, when I ran RegMon on the Vista Business system, the registry updated immediately when I enabled or disabled QL, yet the value from Vista Ultimate did not change between tests.
Glenn
_________________________ Actually I am a Rocket Scientist!
I have looked at the value for TaskbarWinXP under the RegKey HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop on different computers for different users where the QL Toolbar is disabled.
At first logon to a computer, when the Userprofile is created, there is no RegKey Desktop under Streams
I have been collecting more values for TaskBarWinXP and have to review the previous script. For all these values, the QuickLaunch Taskbar was disabled:
; -- QL: Enable Quick Launch Toolbar ; Check if OS is Windows XP If @DOS = "5.1" ; $TaskbarWinXP = ReadValue('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop','TaskbarWinXP') $TaskbarWinXP = ReadValue('HKEY_USERS\'+@SID+'\Software\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop','TaskbarWinXP') ; Check if Quick Launch Toolbar is disabled If ; Check if RegName TaskbarWinXP exists @ERROR<>0 Or ; Check if the Value for TaskbarWinXP is at least 248 chars long Len($TaskbarWinXP)<=248 ; ? "Disabled" Shell '"%ComSpec%" /C "'+@LSERVER+'\NETLOGON\toggleql.exe" 1' ; Else ; ? "Enabled" EndIf EndIf
Registered: 2005-01-17
Posts: 1894
Loc: Hilversum, The Netherlands
I finally found a way in KiX to be able to enable and disable the QuickLaunch bar. However it doesn't return the state, I spend hours figuring this out and finally had to resort to an external DLL that let's you make DLL Calls, I hope Ruud will incorporate this into KiX.
Registered: 2005-01-17
Posts: 1894
Loc: Hilversum, The Netherlands
The readme.txt included in the zip explains the I, F and R switches. Basically I google'd alot to see what how it is done in C/C++ and in AutoIT. Keep comparing and you'll find out which switches you need.
I posted the link to the AutoIT script earlier in this thread that does the same thing as mine. I basically translated that.
this VB script toggels the "quick launch" setting.
Code:
Option Explicit
Dim ShellObject
Set ShellObject=WScript.CreateObject("WScript.Shell")
ShellObject.Run("rundll32.exe shell32.dll,Options_RunDLL 1")
WScript.Sleep 200
ShellObject.AppActivate "Taskbar and Start Menu Properties"
ShellObject.SendKeys "%Q"
WScript.Sleep 200
ShellObject.AppActivate "Taskbar and Start Menu Properties"
ShellObject.Sendkeys"%A"
WScript.Sleep 200
ShellObject.AppActivate "Taskbar and Start Menu Properties"
ShellObject.Sendkeys"{ENTER}"