系統(tǒng)環(huán)境：
1、操作系統(tǒng)：Windows 2000
2、數(shù)據(jù)庫(kù)：　Oracle 8i R2 (8.1.6) for NT 企業(yè)版
3、安裝路徑：C:\ORACLE

訪(fǎng)問(wèn)方法：

1、連入SQL*Plus
以system/manager用戶(hù)登錄，
SQL> conn system/manager

創(chuàng)建新的用戶(hù)：如user1/pass1，賦予connect,resource權(quán)限。
SQL> grant connect,resource to user1 identified by pass1;

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


Oracle數(shù)據(jù)庫(kù)的實(shí)例名，本例：oradb
Oracle用戶(hù)名，本例：user1
Oracle主機(jī)字符串：oradb

tnsnames.ora文件中

ORADB =
　(DESCRIPTION =
　　(ADDRESS_LIST =
　　　(ADDRESS = (PROTOCOL = TCP)(HOST = 192.1.1.1)(PORT = 1521))
　　)
　　(CONNECT_DATA =
　　　(SERVICE_NAME = oradb)
　　)
　)


2、在IIS默認(rèn)WWW目錄下創(chuàng)建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、打開(kāi)一個(gè)瀏覽器窗口，輸入以下地址來(lái)查看運(yùn)行結(jié)果，可以通過(guò)不斷的按F5鍵來(lái)刷新顯示結(jié)果
http://localhost/test.asp



總結(jié)：
利用以上代碼，可以省去創(chuàng)建ODBC的麻煩，并提高效率。