ASP代码的对象化

9"><%=ors("wfname")%></a></td>
<td bgcolor="#ffffff" height="19"><%=session("usr")("name")%> </td>
<td bgcolor="#ffffff" height="19"><%=ors("exetime")%> </td>
<td bgcolor="#ffffff" height="19"> </td>
<td bgcolor="#ffffff" height="19"><%=glbfunc.getcurzt(ors("id").value,activeconnection)%></td>
<td bgcolor="#ffffff" height="19"><p align="left"><a href="../pubexetab/pubexetab.asp?act=view&tab_id=<%=ors("tab_id")%>&id=<%=ors("rec_id")%>"><img src="/uploadfile/201306/17/BF135138653.gif" border="0" alt="详细" width="16" height="16"></a> <a href="javascript：newin(''wfimage.asp?act=list&id=<%=ors("wf_id")%>&bz=1&step_id=<%=next_id%>'',true,false,false,false,true);"><img src="/uploadfile/201306/17/95135138904.gif" border="0" alt="流程追踪" width="16" height="16"></a> </p></td><%
end if
%></tr><%
ors.movenext
loop
%></table>
</center>
<%
end sub


end class
''****************************************
''* 类结束
''****************************************

''****************************************
''asp页面开始
''****************************************
''输出标准html头
glbfunc.writehead
dim owebworkflowlog
set owebworkflowlog = new clswebworkflowlog
set owebworkflowlog.activeconnection = glbfunc.getadoconnection
owebworkflowlog.main
glbfunc.writetail()
%>
可以添加更多的方法，这样这一个类就能完成以前多个asp文件的功能。访问的时候，在 .asp之后加上参数（要访问哪个函数）即可区分出来。