登录注册
☦ 上海交通大学论坛 > 数据库 > 浏览当前帖子 手机版 关闭左侧栏
ASP 中通过OLEDB访问 Oracle 的代码
【返回本版】  【发表帖子】  【回复帖子】 浏览量  4546      回帖数 0
maomiawang    等级  ☆

楼主 发表于  2011/8/22 10:54:51    编 辑   


系统环境：  

1、操作系统：Windows 2000 
2、数据库：　Oracle 8i R2 (8.1.6) for NT 企业版 
3、安装路径：C:\ORACLE 

访问方法：  

1、连入SQL*Plus 
以system/manager用户登录， 
SQL> conn system/manager 

创建新的用户：如user1/pass1，赋予connect,resource权限。 
SQL> grant connect,resource to user1 identified by pass1; 

SQL> conn user1/pass1 
SQL> create table test(a date); 


Oracle数据库的实例名，本例：oradb，一般Oracle默认安装为ORCL 
Oracle用户名，本例：user1 


2、在IIS默认WWW目录下创建test.asp，用notebook编辑，输入以下代码 
<% 
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="insert into test(a) values(sysdate)" 
set rs=conn.execute(SQL) 

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

<% 
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 
%> 



3、打开一个浏览器窗口，输入以下地址来查看运行结果，可以通过不断的 
按F5键来刷新显示结果 
http://localhost/test.asp 

总结： 
利用以上代码，可以省去创建ODBC的麻烦  
1
☺ 表情
所有内容均为会员自愿发表,并不代表本站立场.
论坛帮助 会员认证删帖申请 联系我们