<% 'http://aeepay.com
Dim AspToDllObject
Set AspToDllObject = Server.CreateObject("HAOZHIFU.Class30")
AspToDllObject.AspClassInit SYStem_url,SiteName,TitleAD,sqlip,sqlname,sqluid,sqlpwd,radiobutton,dltc,dltc1,dltc2,dltc3,dltc4,dltc5,dltc6,dltc7,dltc8,dltc9,dltc10,dltc11,dltc12,dltc13,serviceqq,sh,Set_Usr_kconn,Set_Usr_kconn2
Set AspToDllObject = Nothing%>