vbs的事件在ASP环境下的应用实例代码

<
类topicmodel
公共OnView
公共功能负载（ID）
如果不是（isevent（OnView））然后
OnView（1）
最后如果
端功能
功能isevent（事件）
isevent = IsEmpty（事件）
端功能
类的结束
Sub UpdateViewCounter（值）
响应。写入（添加值）
端子
昏暗的主题：主题=新topicmodel集
集topic.onview = getref（updateviewcounter ）
主题：加载（1）
%>
我几乎忘记了getref功能看起来好今天。
写一个可以应用于你自己项目的有趣的简单例子
但的VBS事件最实用的好处是，可以动态调用过程或函数。