VB5PWR.ASP
<HTML>
<HEAD>
<TITLE>Testing VB5Pwr</TITLE>
</HEAD>
<H1>Testing VB5Pwr</H1>
<% Set myobj = Server.CreateObject("IISSample.VB5Power") %>
myProperty Value = <%= myobj.myProperty %><BR>
<% newvalue = "Power" %>
Set myProperty to <%= newvalue %>
<% myobj.myProperty = newvalue %><BR>
myProperty Value is now: <%= myobj.myProperty %><BR>
<% mystring = "My String" %>
Call myMethod with <%= mystring %>: <%= myobj.myMethod(mystring) %><BR>
MyPowerMethod returns: <% myobj.myPowerMethod() %><BR>
MyPowerProperty returns: <%= myobj.myPowerProperty %><br>
</HTML>