You are here

Theme changer... Has anyone even heard of one??

2 posts / 0 new
Last post
GameMakerFan
Offline
Last seen: 10 years 10 months ago
Joined: 2011-12-13 19:33
Theme changer... Has anyone even heard of one??

I don't even know if there IS an app like this, but is there something that can change the computer theme from one style to another while your drive is plugged in, and swap it back after you eject it?

I do know it would need to have something to determine what OS you use, because XP uses different theme types from the later versions of Windows. It doesn't even use the same kind of frame! I don't know much about coding, but that has to be pretty hard.

shookmon
Offline
Last seen: 7 years 5 months ago
Joined: 2007-02-21 16:26
vbs script

Here is a vbs script I wrote to handle setting the theme in Win 7, with a little work you could write a similar reverse script:


Set WshShell = WScript.CreateObject("WScript.Shell")
Dim strDesktop
strDesktop = WshShell.SpecialFolders("Desktop")

WshShell.Run "rundll32.exe %SystemRoot%\system32\shell32.dll,Control_RunDLL %SystemRoot%\system32\desk.cpl desk,@Themes /Action:OpenTheme /file:""%userprofile%\AppData\Local\Microsoft\Windows\Themes\MDS1.theme"""

Wscript.Sleep 45000
WshShell.AppActivate("Control")
WshShell.Sendkeys("%FC")

Wscript.Sleep 10000
WSHShell.AppActivate("Program")

WshShell.Sendkeys("+{F10}")
WshShell.Sendkeys("n")

Michael D. Shook

Log in or register to post comments