cdgl.asp

本系统采用B/S架构

<%
'********************************************************************************
Dim obja2dcdgl
Set obja2dcdgl = Server.CreateObject("cjcl.a2dcdgl")
obja2dcdgl.I_init
Set obja2dcdgl = Nothing
Sub OnTransactionAbort()
End Sub
'********************************************************************************
%>