Jump to content

Sommerville

Member
  • Posts

    1
  • Joined

  • Last visited

  • Donations

    0.00 USD 
  • Country

    Australia

Everything posted by Sommerville

  1. Hi All, I'm working on an unattended SOE build for my company. I've done this before for XP and got lots of useful info from this site. Issue: How to select " Auto Arrange " for DESKTOP ICONS in W7 using a script or reg patch Question: How are other people getting this to work for their W7/W2K8 installs? How I got to work in XP: I used a VBS script to get this working in Windows XP which looked like this. I've tried to reuse by reintroducing the "Show Desktop.scf" file into the Windows 7 build and also tried to use WINDOWS+D to show desktop however neither step works when I actually script it. Dim Act, AppData, Fso, SD Set Act = CreateObject("WScript.Shell") Set Fso = CreateObject("Scripting.FileSystemObject") SD = Act.ExpandEnvironmentStrings("%Systemdrive%") AppData = Act.ExpandEnvironmentStrings("%Appdata%") AppData = AppData & "\Microsoft\Internet Explorer\Quick Launch\Show Desktop.scf" Act.Run(Chr(34) & AppData & Chr(34)) WScript.Sleep 1500 Act.sendkeys "{F5}" WScript.Sleep 800 Act.sendkeys "+{F10}" WScript.Sleep 100 Act.sendkeys "I" WScript.Sleep 100 Act.sendkeys "A" WScript.Sleep 500 Act.sendkeys "+{F10}" WScript.Sleep 500 Act.sendkeys "%+{TAB}" WScript.Sleep 500 Act.sendkeys "%+{TAB}" THANKS FOR YOUR HELP / SUPPORT Alan.
×
×
  • Create New...