[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] VBS脚本如何在一个宿主中调用另一个宿主里的类?

1.vbs是这样
  1. class class1
  2. private aa
  3. property let let1(a)
  4. aa = a
  5. end property
  6. property get get1()
  7. get1 = aa
  8. end property
  9. sub sub1
  10. msgbox get1
  11. end sub
  12. end class
复制代码
2.vbs是这样
  1. <script language="VBScript" src="1.vbs">
  2. dim a1
  3. set a1 = new class1
  4. a1.let1 = 10
  5. a1.sub1
复制代码
想问问为何运行2.vbs会报错??

回复 2# broly


    原来如此 谢谢我知道了!

TOP

<script language="VBScript" src="1.vbs">
这样个是网页的调用方法,在WSH解析下是不可以的。
可以这样:
  1. Sub Include(sInstFile)
  2.     Dim FSO, f, s
  3.     Set FSO = CreateObject("Scripting.FileSystemObject")
  4.     Set f = FSO.OpenTextFile(sInstFile)
  5.     s = f.ReadAll
  6.     f.Close
  7.     ExecuteGlobal s
  8. End Sub
  9. Include "d:\1.vbs"
  10. dim a1
  11. set a1 = new class1
  12. a1.let1 = 10
  13. a1.sub1
复制代码
1

评分人数

---学无止境---

TOP

返回列表