发信人: hater()
整理人: qcrsoft(2003-10-24 10:20:05), 站内信件
|
【 在 syeffy 的大作中提到:】
:关于ASP中的类,没有人研究么?告诉我个简单的入门知识就可以了啊啊。我应该如何定义呢?谢谢。
:......
这是我写的一个例子,很容易明白的
<%
'*************************************************
' COMMENT: 在ASP中使用Class
' AUTHOR : Hater 2001-2-13
' INPUT :
' MODIFY LIST:
'*************************************************
Class testClass
Private Sub Class_Initialize()
Response.Write "Class初始化<br>"
End Sub
Private Sub Class_Terminate()
Response.Write "Class结束<br>"
End Sub
Public Sub SubTest(strString)
Response.Write strString
End Sub
Public Function FunTest(intTestValue)
FunTest = intTestValue * 10
End Function
End Class
Dim objTestClass,I
Set objTestClass = New testClass
objTestClass.SubTest("你好!<br>")
I = objTestClass.FunTest(10)
Response.Write "10*10=" & I & "<br>"
%>
----
想和你去吹吹风的Hater
|
|