WSH でこれどう書くの？

外部コマンドを呼び出す

var WshShell = WScript.CreateObject("Wscript.Shell");
WshShell.Run('"c:\\Program Files\\Internet Explorer\\IEXPLORE.EXE" http://www.microsoft.com/');

JScript (JavaScript) で InputBox() を使う

（というか、これ私の知り合いのサイトだった…）

//input.wsf
<job id="input">
  <script language="VBScript">
  'InputBoxを出して入力を返す関数の定義
  function vbinput(strprompt)
    vbinput = InputBox(strprompt)
  end function
  </script>
  
  <script language="JavaScript">
  //上で定義した関数を使う
  var str = vbinput("なんか入力してね");
  if( typeof(str) == "undefined" ) {
    WScript.Echo("キャンセルが押されました。");
  } else {
    WScript.Echo("input is " + str);
  }
  </script>
</job>

ショートカットを作る

// 参照したサンプルでは次のように objFs が定義されていて、
//	<object id="objFs" progid="Scripting.FileSystemObject" />
// こういう書き方がされている
//	str = objFs.BuildPath(oShell.SpecialFolders("Desktop"),aryDat(0) & ".lnk"))

var oShell    = CreateObject("WScript.Shell");
var oShortcut = oShell.CreateShortcut("hoge.lnk");

oShortcut.Description = "コメント";
oShortcut.TargetPath  = "c:\\hoge\\hoge.exe"
oShortcut.Hotkey = "Ctrl+Alt+J";
oShortcut.WorkingDirectory=oShell.SpecialFolders("MyDocuments");
oShortcut.Save;

© DENNOU GEDOU GAKKAI, N. D. D. 2006/05/29 11:38 JST