我如何使用window_onload从html应用程序中打开文件

Question

我在</head>和<body>之间的hta应用程序中有此脚本。

它确实起作用：它会调整大小并打开wav文件。 但是在打开wav文件之前，我希望它加载一种类似于广告弹出窗口的文件，如果您愿意的话，它将作为另一个hta窗口打开。 在播放.wav文件之前，如何添加必要的代码行以使其打开并显示ad.hta？

<script language="VBScript">
Sub Window_OnLoad
Dim width,height
width=470
height=400
self.ResizeTo width,height
Set objVoice = CreateObject("SAPI.SpVoice")
Set objFile = CreateObject("SAPI.SpFileStream.1")
objFile.Open "111(2).wav"
objVoice.Speakstream objFile
Set objVoice = CreateObject("SAPI.SpVoice")
Set objFile = CreateObject("SAPI.SpFileStream.1")
objFile.Open "11537.wav"
objVoice.Speakstream objFile
End Sub
</script>

我已经试过了：

Const NORMAL_WINDOW = 1
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "notepad.exe", "test.txt", , , NORMAL_WINDOW

把它放在

self.ResizeTo width,height

结果操作按以下顺序进行：

程序打开

错误继续运行脚本显示

文本文件打开

音频播放

但是该程序之后将无法执行其应做的工作。 我的文字转语音功能中断。

Answer 1

我发现我必须使用

Const NORMAL_WINDOW = 1
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "notepad.exe", "test.txt", , , NORMAL_WINDOW

工作正常

我如何使用window_onload从html应用程序中打开文件

问题描述

1 个解决方案

解决方案1
0 2014-01-29 18:54:22

我如何使用window_onload从html应用程序中打开文件

问题描述

1 个解决方案

解决方案1 0 2014-01-29 18:54:22

解决方案1
0 2014-01-29 18:54:22