<html>
<head>
<meta NAME="GENERATOR" Content="Microsoft Developer Studio">
<title>Document Title</title>
</head>
<body>
<p align="right"> <big> <a href="default.html"> Go Back </a>
</big></p>
<p><big>Comment:</big> Reference to Class DemoCreateObject with
parameters, and access its properties and Methods </p>
<br>
<%
Set objinfo =Server.CreateObject("DemoCreateObject","LiuEr","China",23,9033.22)
Response.Write "<p> Default proerties is : <big>"
response.write "<p> Name = " + objinfo.name
response.write "<p> Address = " + objinfo.address
response.write "<p> Age = " + cstr(objinfo.age)
response.write "<p> Salary = " + cstr(objinfo.salary) + " </big>"
%>
<p> Invoke its repeatmessage method, the result is : </p>
<p> <big> <%= objinfo.repeatmessage(6)
%> </big></p>
</body>
</html>
|