Jump to content

Sommerville

Member
  • Posts

    1
  • Joined

  • Last visited

  • Donations

    0.00 USD 
  • Country

    Australia

About Sommerville

Profile Information

  • OS
    Windows 7 x86

Sommerville's Achievements

0

Reputation

  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...