asp不用DSN访问数据库的方法

时间：2021-04-16

　　一个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"

声明：本页内容来源网络，仅供用户参考；我单位不保证亦不表示资料全面及准确无误，也不保证亦不表示这些资料为最新信息，如因任何原因，本网内容或者用户因倚赖本网内容造成任何损失或损害，我单位将不会负任何法律责任。如涉及版权问题，请提交至online#300.cn邮箱联系删除。

相关文章