ASP连接Oracle数据库的问题

[oracle_lover]

安装了Oracle的客户端；在Net8 Configuration Assistant中设置好了服务名；用Sql Plus连接正常。

在系统DSN中设置了ODBC数据源。

set conPubs=Server.CreateObject("ADODB.Connection")
问题是下面一句中，怎样加入用户名和密码？
conPubs.open "DSN=client"

conPubs.open "DSN=client;uid=userid;pwd=didadi" //这样不行
conPubs.open "DSN=client;uid=userid;password=didadi" //这样好像也不行

[lsrzm]

送给你一个更好的连接方式，直接通过oracle的ole来连接数据库，比通过Microsoft的快多了，把它放到一个文件中就行了，然后在别的文件里包含此文件就行了：
<%
on error resume next
'连接数据库
set orasession=createobject("OracleInprocServer.XOraSession")
set oradatabase=orasession.dbopendatabase("jgc","jgcuser/jfl38",0)
'出错处理
if err.number >0 then
Response.Write "<h4>asp 错误控制</h4>"
Response.Write "asp 错误来源:"&err.Source &"<br>"
Response.Write "asp 错误代码:"&err.number &"<br>"
Response.Write "asp 错误说明:"&err.Description &"<br>"
err.Clear
Response.Write "<h4>ORACLE OLE 错误控制</h4>"
Response.Write "ORACLE 错误代码"&OraSession.lastServerErr&"<br>"
Response.Write "ORACLE 错误说明"&OraSession.lastServerErrtext&"<br>"
closeDatabase
Response.end
end if
'关闭数据库
sub closeDatabase()
oradatabase.close
set orasession=nothing
end sub
%>

[伟大de虫子]

同上

[arclala]

ODBC方式：
set conn=server.createobject("adodb.connection")
conn.open "client","userid","didadi"

[逍遥小贼]

<%
set conn=server.createobject("adodb.connection")
dns="Provider=OraOLEDB.Oracle.1;Persist Security Info=True;User ID=user1;Password=pass1;Data Source=oradb"
conn.Open dns

SQL="select to_char(a,'hh24:mi:ss') from test"
set rs=conn.execute(SQL)

do while (not rs.eof)
%>
<table border=1>
<tr><td><%=rs.fields(0).value%></font></td>
</tr>
<%
rs.movenext
loop

rs.close
set rs=nothing
conn.close
set conn=nothing
%>

[oracle_lover]

谢谢lsrzm(月影飞鸿)，很快就结帐

*************再加 50 分***************

因为我还想知道：
到底怎么用下面这种方式，加入用户名和密码？
set conPubs=Server.CreateObject("ADODB.Connection")

按照
set orasession=createobject("OracleInprocServer.XOraSession")
set oradatabase=orasession.dbopendatabase("jgc","jgcuser/jfl38",0)
打开数据集，也是像下面这样吗？
set rsPubs=Server.CreateObject("ADODB.RecordSet")
rsPubs.open "table1",orasession

[TCMY]

'建立对象
indexdataconectstr="Provider=MSDAORA.1;Password=pwd;User ID=web;Data Source=web;Persist Security Info=True"
set ConnectionObject = Server.CreateObject("ADODB.Connection") '建立连接对象
ConnectionObject.Open indexdataconectstr
'Data Source=web 就是用Oracle的客户端；在Net8 Configuration Assistant中设置好了服务名

'打开数据集
set DateConnectwJ=Server.CreateObject("ADODB.Recordset")
SQLStringwJ="select * from table_naem
DateConnectwJ.Open SQLStringwJ,ConnectionObject,1

看看,合不合你的要求