从外部脚本文件加载子程序

Load Subroutines From External Script File

我想把我的子程序放在一个外部文件中。当我按下帮助按钮时,它会弹出错误。即使在启动时它也会显示错误。如果我将 scripts.vbs 的内容放在 HTA 中,它们就可以正常工作。

代码如下:

scripts.vbs 文件的内容:

Sub Window_Onload
  Msgbox "welcome"
end sub

Sub Help
  MsgBox "This is an example of progressbar in HTA written by Fredledingue.",,MyTitle
End Sub

HTA 文件的内容:

<script type="text/vbscript" src="scripts.vbs">
</script>

<body bgcolor="GreenYellow">
<input id="BtnHelp" type="button" value="Help" onclick="Help">

只要 HTA 和 VBScript 文件位于同一文件夹中,就可以像这样导入脚本文件。您需要确保 <script> 标签已关闭:

<script type="text/vbscript" src="scripts.vbs"><b></script></b>

如果您仍然遇到错误,则需要显示它们(完整的错误消息,包括错误编号和引发错误的行)。

话虽如此,我建议不要从 HTA 外部化代码,因为它会降低移动性。独立的 HTA 可以很容易地复制到任何你喜欢的地方。需要将多个文件放在一起对此有负面影响。