我使用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
这里是否有任何范围使它成为异步?
答案 0 :(得分:0)
要运行脚本异步,您需要在脚本中指定的异步:
<script src="demo_async.js" async></script>
以下是有关此主题的一些信息: https://css-tricks.com/async-attribute-scripts-bottom/