看是否行:
driver_name="Provider=MSDAORA.1;Password=another;User ID=kjcg;Data Source=kjcgdb;Persist Security Info=True"
set cn = server.CreateObject("adodb.connection")
cn.open driver_name
driver_name="Provider=MSDAORA.1;Password=another;User ID=kjcg;Data Source=kjcgdb;Persist Security Info=True"
set cn = server.CreateObject("adodb.connection")
cn.open driver_name
没理由会这样的
怎么报错的 贴出来看看set con=server.createobject("ADODB.Connection")
dns="Provider=OraOLEDB.Oracle.1;Persist Security Info=True;User ID=system;Password=manager;Data Source=etsd"
con.Open "ETSD","system","manager"
sql="select I.item from ITEM I where item='0000-0000-01'"
SET rs=con.Execute(sql)
---------------------------------------------------------------------------------dim con,rs,driver_name
driver_name="Provider=MSDAORA.1;Password=manager;User ID=system;Data Source=ETSD;Persist Security Info=True"
set con = server.CreateObject("adodb.connection")
con.open driver_name
set rs=server.CreateObject("adodb.recordset")
rs.open "select I.item from ITEM I where item='0000-0000-01'",con,3,1
do while not rs.eof
response.write rs(0)
rs.movenext
loop