检查的这两个函数或方法。依照我的经验,你在DLL里尽量用函数接口,少用SUB。因为函数有返回值,对容错来说更容易从DLL的外部获取错误信息。例如,在DLL中:
Public Function AspClassInit(byref obj as object)
on error GoTo errHandler
'做你要的.....
,.............
AspClassInit="S_OK"
exit Function
errHandler:
AspClassInit="错误:"& err.Description
End Function
这样,当你在页面调用的时候,可以很容易知道里面出了什么问题:
<%
dim o,err_msg
o=server.CreateObject("xxx.xx")
err_msg= o.AspClassInit()
if err_msg<>"S_OK" then responsee.write(err_msg)
%>