<package>
<?component error="true"?>
<component id="JS">
<registration 
    progid="JSComponent.Person"
    description="Person Object">
</registration>
<public>
    <property name="Name" />
    <property name="Age" />
    <method name="sayHello" />
    <method name="init">
        <parameter name="name" />
        <parameter name="age" />
    </method>
</public>
<script language="JScript">
var Name,Age;
function init(name,age){
    Name=name;
    Age=age;
}
function sayHello(){
    return "hello, world";
}
</script>
</component>
</package>
复制代码

Sub Test()
    Dim objP As ScriptletTypeLib.JS
    CallByName objP, "init", VbMethod, "Tom", 32
    Out.Output objP.Name
    Out.Output objP.sayHello()
End Sub
复制代码