Asp中数据库的操作(DLL)隐藏密码的问题
我在用下面的方法编成了动态连接库(Win Nt 4.0 VB6.0)
Public Function OpenSh() As ADODB.Connection
Dim ShConn As ADODB.Connection
Dim ShConnStr As String
Set ShConn = CreateObject("ADODB.Connection")
ShConnStr = "DSN=Sh;Database=Sh;UID=1;PWD=1;"
ShConn.Open ShConnStr
OpenSh = ShConn
End Function
Public Function CloseSh(ShConn As ADODB.Connection)
ShConn.Close
Set ShConn = Nothing
End Function
编译后在服务器端进行了注册
在Asp中如下调用
<%
Dim Conn,C
Set Conn=Server.CreateObject("ADoWater.DataBase")---5
C=Conn.OpenShop() ---------6
Conn.CloseShop(C)
Conn=nothing
%>
出现如下错误提示
AdoWater error '800a01a8'
Object required
/eshop/News/default.asp, line 6
请问大虾这是为什么?