Code: |
set oSH = CreateObject("WScript.Shell")
' Für Strg-Alt-N oSH.SendKeys "^%n" |
Code: |
set oSH = CreateObject("WScript.Shell")
' Für Strg-Alt-D oSH.SendKeys "^%d" |
Code: |
@Echo Off
rem Script 1 wird zu Script 3 copy /Y 1.vbs 3.vbs rem Script 3 wird ausgeführt 3.vbs rem Script 2 wird zu Script 1 del 1.vbs ren 2.vbs 1.vbs rem Script 3 wird zu Script 2 copy /Y 3.vbs 2.vbs |
Longshine hat folgendes geschrieben: |
aha, und wie kann man von "-day" auf "-night" umschalten? "gammatool.exe -night" würde ja nicht gehen, weil gammatool doch schon gestartet ist. |
Code: |
dim fs, checkfile, oSH
set fs=createobject("scripting.filesystemobject") set oSH = CreateObject("WScript.Shell") checkfile="gamma.chk" if fs.FileExists (checkfile) = true then oSH.SendKeys "^%d" fs.DeleteFile checkfile,true else oSH.SendKeys "^%n" fs.CreateTextFile checkfile,true end if |