Set obj = CreateObject("MyCom.MyAPI")
obj.MsgBox( "こんにちは !" )

<JOB>
<OBJECT id="obj" progid="MyCom.MyAPI" />

<SCRIPT language=VBScript>

	obj.MsgBox( "こんにちは !" )

</SCRIPT>
</JOB>