一个DSN连接需要服务器的系统管理员在服务器上用控制面板中的ODBC工具设置一个DSN,或者使用一个第三方的服务器组件,让你的ASP脚本在需要时通过修改注册表建立DSN.

　　一个DSN连接通常需要的参数有DSN名,用户名,口令,例如我们用用户名student,口令magic,通过DSNstudent建立连接
　　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就可以访问数据库.注意,你必须知道实际的文件路径!比如 Cthatserveraccount17nwind.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)

　　HTMLHEAD

　　TITLEnwind.aspTITLE

　　body bgcolor=#FFFFFFHEAD
　　%

　　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 %
　　tdb%=rstemp(i).name %BTD
　　% 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=cwwwdbguestbook.mdb

 
作者：csbq