Forum Home
Press F1
 
Thread ID: 31212 2003-03-15 07:49:00 Toggle Desktop Icons shortcut? -=JM=- (16) Press F1
Post ID Timestamp Content User
128304 2007-01-12 22:57:00 That sounds pretty good although not as simple as having your apps and selected folders accessible on a show/hide mouse over bar. winmacguy (3367)
128305 2007-01-12 23:00:00 I am not sure if this is any help or if you need Flash to run it or if it works like I think it should it but check it out anyhow
jrgraphix.net
winmacguy (3367)
128306 2007-01-12 23:49:00 ' HideIcons shortcut
' Save this code as HideIcons.vbs

Const HKEY_CURRENT_USER = & H80000001
strComputer = "."
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Explorer \Advanced"
strValueName = "HideIcons"
oReg.GetDWORDValue HKEY_CURRENT_USER,strKeyPath,strValueName,dwValue
' Wscript.Echo "Current HideIcon setting: " & dwValue
Select Case dwValue
Case 1
' Wscript.Echo "is 1"
oReg.SetDWORDValue HKEY_CURRENT_USER,strKeyPath,strValueName,"0"
Case 0
oReg.SetDWORDValue HKEY_CURRENT_USER,strKeyPath,strValueName,"1"
End Select

' Create explorer command file to toggle desktop window
Set oFSO = CreateObject("Scripting.FileSystemObject")
sSCFFile= oFSO.BuildPath(oFSO.GetSpecialFolder(2), oFSO.GetTempName & ".scf")
With oFSO.CreateTextFile(sSCFFile, True)
.WriteLine("[Shell]")
.WriteLine("Command=2")
.WriteLine("[Taskbar]")
.WriteLine("Command=ToggleDesktop")
.Close
End With

' Toggle desktop and send F5 (refresh)
With CreateObject("WScript.Shell")
.Run """" & sSCFFile & """"
WScript.Sleep 100
.Sendkeys "^{F5}"
End With
' Delete explorer command file
oFSO.DeleteFile sSCFFile
Rytech (3366)
128307 2007-01-13 17:59:00 There seems to be a problem using sendkeys to refresh the desktop using ctrl+F5 Rytech (3366)
128308 2007-03-31 18:01:00 [edit: spam removed] hollerhot (3368)
128309 2007-03-31 18:11:00 i've used gregs method for years .....stuff all the icons into a folder then drag that folder to the quick launch bar with a right clik and 'move here'...very simple and one clik access.... drcspy (146)
128310 2007-06-06 09:01:00 heres another good way:
1. right click the Taskbar/Toolbars/New Toolbar...
2. then just go My Computer/Local Disk/Documents and Settings/<username>/Desktop.
3. have a look at what u end up with.
it kicks ass
tails4 (3369)
1 2