tizen.moe

tizen.moe

サクッとプログラムした気になる (1)

VBScriptitunesを操作する

前提

Windows環境前提です。VBScriptなので。

  1. 右クリック→「新規作成」→「テキスト文書」
  2. 拡張子をtxt → vbsに変更
  3. メモ帳でも秀丸でも良いので開く

"超"基本

  • コメントは ' (#とか//とか /* */ は全部NG)
  • 関数は Function or Subではじめる
    • 戻り値は Function だけ(?) 関数名に値を入れると戻り値になる

再生

Sub playTrack()
    Dim iTunesApp

    set iTunesApp = CreateObject("iTunes.Application")
    iTunesApp.Play
End Sub

playTrack

vbsをダブルクリックすると(起動していない場合はitunesが起動して)再生がはじまります。簡単。だけど、コレが出来て何なの?感がなきにしもあらず、、、

おまけ

vbsを作った要領で拡張子をbatにする。

cscript test.vbs
pause

↑な感じにしてbatをダブルクリックするとvbsがbat経由で起動する。エラーメッセージとか表示されるのでちょっとだけ便利。