broly

<script language="VBScript" src="1.vbs">
这样个是网页的调用方法，在WSH解析下是不可以的。
可以这样：

Sub Include(sInstFile) 
    Dim FSO, f, s 
    Set FSO = CreateObject("Scripting.FileSystemObject") 
    Set f = FSO.OpenTextFile(sInstFile) 
    s = f.ReadAll 
    f.Close
    ExecuteGlobal s 
End Sub

Include "d:\1.vbs"
dim a1
set a1 = new class1
a1.let1 = 10
a1.sub1
复制代码