[英]how do i open a file from a html application using window_onload
我在</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
結果操作按以下順序進行:
程序打開
錯誤繼續運行腳本顯示
文本文件打開
音頻播放
但是該程序之后將無法執行其應做的工作。 我的文字轉語音功能中斷。
我發現我必須使用
Const NORMAL_WINDOW = 1
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "notepad.exe", "test.txt", , , NORMAL_WINDOW
工作正常
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.