asp如何连接oracle数据库？

Question

MM_conn_STRING = "Provider=MSDAORA.1;Password=timecard;User ID=timecard;Data Source=bosind1;Persist Security Info=True"

Answer 1

我是这样写的
<%
set cn=server.createobject(adodb.connection)
cn.open "Provider=MSDAORA.1;Password=12345;User ID=jy;Data Source=jy;Persist Security Info=True"
set rs=server.createobject(adodb.recordset)
orastr="select aa1 from aa.aa1"
rs.open orastr,cn,1,1
response.write rs("aa1")
rs.close
set rs=nothing
%>
提示“set cn=server.createobject(adodb.connection)”这一行有错误

Answer 2

两处地方出错!
set cn=server.createobject("adodb.connection")set rs=server.createobject("adodb.recordset")rs.CursorType = 0
rs.CursorLocation = 3
rs.LockType = 3记录集的属性最好设置

Answer 3

Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.DbOpenDatabase("dsn","user/pwd",0)
dsn=odbc dsn,user=username,pwd=password 
Set OraDynaset = WebOraDatabase.DbCreateDynaset(sSql,0)

Answer 4

现在又提示cn.open "Provider=MSDAORA.1;Password=12345;User ID=jy;Data Source=jy;Persist Security Info=True"
有错误

Answer 5

用
set cn=server.createobject("adodb.connection")
cn.open "Provider=MSDAORA.1;Password=jy12345;User ID=sys;Data Source=jy;Persist Security Info=True"
set rs=server.createobject("adodb.recordset")
orastr="select aa1 from aa.aa1"
rs.open orastr,cn,1,1
response.write rs("aa1")
rs.close
set rs=nothing
时出现“Microsoft OLE DB Provider for Oracle (0x80004005)
/net/oracle.asp, 第 14 行”提示用
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.DbOpenDatabase("jy","system/jy12345",0)
dsn=odbc dsn,user=username,pwd=password 
sSql="select aa1 from aa.aa1"
Set OraDynaset = WebOraDatabase.DbCreateDynaset(sSql,0)
response.write rs("aa1")
时提示Set OraSession = CreateObject("OracleInProcServer.XOraSession")行的vbscript执行错误

Answer 6

aa是什么？是否用户名？Password=jy12345;User ID=sys;Data Source=jypassword=口令；user id=用户名;data source=数据库名

Answer 7

aa是表空间的名字
aa1是表空间aa中的表

Answer 8

还是不行，能把您写的例子让我look一下吗？

Answer 9

<%@LANGUAGE="VBSCRIPT"%> 
<!--#include file="Connections/conn.asp" -->
<%
set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_conn_STRING
rs.Source = "SELECT employeeno,EMPLOYEE, SBTIME, XBTIME,to_char(sbtime,'hh24:mi:ss') as sb,to_char(xbtime,'hh24:mi:ss') as xb FROM TIMECARD.RECORDS where to_char(sbtime,'yyyy-mm-dd')=to_char(sysdate,'yyyy-mm-dd') ORDER BY SBTIME "
rs.CursorType = 0
rs.CursorLocation = 3
rs.LockType = 3
rs.Open()
%>
........
.........
<%
rs.Close()
rs.activeconnection=nothing
%>

Answer 10

老兄，多谢了
不过我是实在没辙了，总是提示rs.ActiveConnection = MM_conn_STRING不对

Answer 11

rs.ActiveConnection = MM_conn_STRING当然不对这个在我的文件里已定义了，<!--#include file="Connections/conn.asp" -->
看来你还是要看看连接数据库相关书籍！

Answer 12

我已经把MM_conn_STRING变量赋值了
MM_conn_STRING="Provider=MSDAORA.1;Password=jy12345;User ID=sys;Data Source=jy;Persist Security Info=True"

Answer 13

Dim objconn
Dim rs1
set objConn=Server.Createobject("adodb.connection")
objConn.Open "odbcname","username","password"
sql="select .....from ..." '查询语句
set objrs=server.createobject("adodb.recordset")
objrs.open sql,objconn,1