DHTML Scriptlet

DHTML Scriptlet(2) </OBJECT> 

</html> 

<script language="VBScript"> 
Sub Hi_OnClick() 
test.ShowHI 
End Sub 

Sub Hello_OnClick() 
msgbox test.hello 
End Sub 

</script> 
=============================================== 
----s002_b.htm----- 

<script language="VBScript"> 

Function Public_Hello() 

Public_Hello = "Hello, World" 

End Function 

Sub Public_ShowHi() 

MsgBox "Hi" 

End Sub 

</script>