Question

我用vbscript编写了一个脚本，该脚本应在PC引导时打开Internet Explorer窗口（播放背景音乐）（我将文件放置在shell：startup中），然后在12:30，然后应关闭该标签并打开一个以同样的方式进行更新，最后在19:00关闭。两个选项卡将按预期方式打开，但不会关闭，并且两个音频源彼此重叠。该脚本不能基于杀死IE进程而必须使用IE选项卡，因为人们正在使用该计算机，并且他们必须能够在脚本运行时手动停止音频控件，手动关闭选项卡并使用IE。

Dim time, WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run """c:\program files\internet explorer\iexplore.exe"" http://www.radioitalia.it/player?a=p""",2
time = Now()
hm = Minute(time) + 100 * Hour(time)
While hm < 1230 
    WScript.Sleep(2)
Wend
For Each w In CreateObject("Shell.Application").Windows 
    If InStr(1, w.LocationURL, "radioitalia.it", 1) Then _
        w.Quit()
Next 'w
WshShell.Run """c:\program files\internet explorer\iexplore.exe"" https://www.deejay.it/radio/?refresh_ce&p=a""",2
time = Now()
hm = Minute(time) + 100 * Hour(time)
While hm < 1900 
    WScript.Sleep(2)
Wend
For Each w In CreateObject("Shell.Application").Windows 
    If InStr(1, w.LocationURL, "deejay.it", 1) Then _
      w.Quit()
Next 'w

VBScript计划的URL打开失败

0 个答案: