另類:ASP不用DSN訪問資料庫

來源:互聯網
上載者:User
訪問|資料|資料庫 一個DSN串連需要伺服器的系統管理員在伺服器上用控制台中的ODBC工具設定一個DSN,或者使用一個第三方的伺服器組件,讓你的ASP指令碼在需要時通過修改註冊表建立DSN.

一個DSN串連通常需要的參數有:DSN名,使用者名稱,口令,例如我們用使用者名稱"student",口令"magic",通過DSN"student"建立串連:

1. set conntemp=server.createobject("adodb.connection")
2. conntemp.open "DSN=Student; uid=student; pwd=magic"
3. set rstemp=conntemp.execute("select * from authors")

如果我們沒有DSN,該怎麼做呢?

但是我們知道檔案名稱(比如,Access,Paradox,FoxPro的資料庫)或者資料來源名(例如,SQLserver的資料庫).這裡有一個方法,我們不要DSN就可以訪問資料庫.注意,你必須知道實際的檔案路徑!比如: "C:\thatserver\account17\nwind.mdb".

幸好,方法 server.mappath 可以返回伺服器上的地址.

1. set conntemp=server.createobject("adodb.connection")

2. cnpath="DBQ=" & server.mappath("yourtable.mdb")

3. conntemp.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath

4. set rstemp=conntemp.execute("select * from authors")

<HTML><HEAD>

<TITLE>nwind.asp</TITLE>

<body bgcolor="#FFFFFF"></HEAD>
<%

set conntemp=server.createobject("adodb.connection")
' 不用DSN建立串連

DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "

DSNtemp=dsntemp & "DBQ=" & server.mappath("nwind.mdb")

conntemp.Open DSNtemp

' 不用DSN建立串連
set rstemp=conntemp.execute("select * from customers where country='germany'")

howmanyfields=rstemp.fields.count -1

%>
<table border=1>

<tr>
<% 'Put Headings On The Table of Field Names

for i=0 to howmanyfields %>
<td><b><%=rstemp(i).name %></B></TD>
<% next %>
</tr>
<% ' Now lets grab all the records

do while not rstemp.eof %>
<tr>
<% for i = 0 to howmanyfields%>
<td valign=top><%=rstemp(i)%></td>
<% next %>
</tr>
<% rstemp.movenext

loop

rstemp.close

set rstemp=nothing

conntemp.close

set conntemp=nothing %>
</table>

</BODY>

</HTML>

下面是典型的DRIVER參數值:
{Microsoft Access Driver (*.mdb)}
driver=SQL Server; server=127.0.0.1
^ SQLServer的IP地址

不通過資料來源訪問SQL和ACCESS
Using SQL Server 6.5:
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver=SQL Server; server=server_name; uid=your_UID; pwd=your_PW; database=your_database;"

Using Access:
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=c:\www\db\guestbook.mdb"



相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

Learn more >

11.11 Big Sale for Cloud

Get Unbeatable Offers with up to 90% Off,Oct.24-Nov.13 (UTC+8)

Get It Now >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。