这是我的连接字符串:
<%
Dim objOraSession,objOraDB
Dim strDbUser,strDbPwd,Conn
Call ConnectDB()
Sub ConnectDB()
'连接数据库
On Error Resume Next
strDbUser = "ynw" '连接用户名
strDbPwd = "ynw" '用户密码
Conn ="Provider=MSDAORA.1;uid=ynw; pwd=ynw;Data Source=JHEMR;persist security info=true" '连接字符串
Set objOraSession = Server.CreateObject("OracleInProcServer.XOraSession")
Set objOraDB = objOraSession.OpenDatabase(Conn,ynw & "/" & ynw,0)
End Sub
Sub EndDB()
Set objOraDB = Nothing
Set objOraSession = Nothing
End Sub
%>
以下是我的源代码:
<%
set rs=conn.execute("MEDREC.WTBL")
%>
运行后报错:
Microsoft VBScript 运行时错误 错误 '800a01a8'
缺少对象: 'Provider=MSDAORA.1;u'
/ssdzpb.asp,行 292
请大侠们帮忙看看错在哪?感谢感谢!