如何在HTML应用程序中异步运行脚本?

时间:2016-04-05 07:10:14

标签: html asynchronous vbscript hta

我使用vbscript创建了这个简单的html应用程序。

<html>
  <head>
    <title>Example</title>
<script type="text/vbscript" src="scr1.vbs"></script>
<script type="text/vbscript" src="scr2.vbs"></script>
  </head>
  <body>
    <p>Example</P>
    <button onClick="scr1">scr1</button>
    <button onClick="Scr2()">scr1</button>
    </body>
</html>

现在,script1和2都需要很多时间才能完成。当其中一个脚本正在运行时,应用程序挂起。我有什么方法可以做异步。

vbscripts与此类似。

Set fso = CreateObject("Scripting.FileSystemObject")
For Each oFile In fso.GetFolder(sFolder).Files
  If LCase(fso.GetExtensionName(oFile.Name)) = "txt" Then 
    set oFile = fso.OpenTextFile(oFile)
        Do While oFile.AtEndOfStream <> True
            TextLine = TextLine & oFile.ReadAll
        Loop
  End if
Next

Set regEx_ = new regExp
With regEx_
    .Global = True
    .MultiLine = True
    .IgnoreCase = True
    .Pattern = "pattern 1"
    TextLine = regEx_.replace(TextLine, "mmrk$&")
    .Pattern = "pattern 2"
    TextLine = regEx_.replace(TextLine, "mmrk$&")
    'and 100 more such complex regex replaces
End With

set Temp = fso.CreateTextFile(TempFile, True)
    Temp.Write TextLine
    Temp.Close
Set Temp = Nothing

这里是否有任何范围使它成为异步?

1 个答案:

答案 0 :(得分:0)

要运行脚本异步,您需要在脚本中指定的异步:

<script src="demo_async.js" async></script> 

以下是有关此主题的一些信息: https://css-tricks.com/async-attribute-scripts-bottom/