winactivate.vbs
changeset 3 cce8365a9d50
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/winactivate.vbs	Sun Jan 31 02:58:12 2010 +0900
     1.3 @@ -0,0 +1,7 @@
     1.4 +If WScript.Arguments.Count <> 1 then
     1.5 +   WScript.quit
     1.6 +End If
     1.7 +
     1.8 +Dim objWsh
     1.9 +Set objWsh = WScript.CreateObject("WScript.Shell")
    1.10 +objWsh.AppActivate(WScript.Arguments.item(0))