作者:[转载]  文章来源:http://www.alixixi.com/  更新时间:2005-12-13
系统环境:
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用户名,本例:user1
oracle主机字符串:oradb

tnsnames.ora文件中

oradb =
 (description =
  (address_list =
   (address = (protocol = tcp)(host = 192.1.1.1)(port = 1521))
  )
  (connect_data =
   (service_name = oradb)
  )
 )


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的麻烦,并提高效率。

<
网友评论
相关搜索
阿里西西Baidu.com搜索