vbscript - 一定量のループの後にバッチファイルなどのファイルを開始する方法は?

Question

これは私のスクリプトです

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
wscript.sleep 1800000
do
    if colCDROMs.Count >=1 then
        For i = 0 to colCDROMs.Count - 1
            colCDROMs.Item(i).Eject
        Next
        For i = 0 to colCDROMs.Count - 1
            colCDROMs.Item(i).Eject
        Next
    End if
    wscript.sleep 600000
loop

起動してから 30 分後と 10 分ごとに CD トレイを排出するようにします。知りたいのは、約 3 回ループした後に特定のテキスト ファイルを開く方法です。

Answer 1

その価値のために...これによりfile、CDドロワーが3回目に開くたびにテキストファイルが開きます。必要に応じて、カウントをゼロに戻すことができます...

Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
wscript.sleep 1800000
count = 0
do
    if colCDROMs.Count >=1 then
        count = count + 1
        For i = 0 to colCDROMs.Count - 1
            colCDROMs.Item(i).Eject
        Next
        For i = 0 to colCDROMs.Count - 1
            colCDROMs.Item(i).Eject
        Next
    End if
    If count >= 3 Then
      file = "c:\path\to\my\file.txt"
      CreateObject("WScript.Shell").Run "notepad.exe """ & file & """"
    end if
    wscript.sleep 600000
loop