中国IT动力,最新最全的IT技术教程
最新100篇 | 推荐100篇 | 专题100篇 | 排行榜 | 搜索 | 在线API文档 | 网通镜像
首 页 | 程序开发 | 操作系统 | 软件应用 | 图形图象 | 网络应用 | 精文荟萃 | 教育认证 | 硬件维护 | 未整理篇 | 站长教程
ASP JS PHP工程 ASP.NET 网站建设 UML J2EESUN .NET VC VB VFP 网络维护 数据库 DB2 SQL2000 Oracle Mysql
服务器 Win2000 Office C DreamWeaver FireWorks Flash PhotoShop 上网宝典 CorelDraw 协议大全 网络安全 微软认证
硬件维护  CPU  主板  硬盘  内存  显卡  显示器  键盘鼠标  声卡音箱  打印机  机箱电源  BIOS  网卡  C#  Java  Delphi  vs.net2005
  当前位置:> 程序开发 > Web开发 > Asp > 数据库
不用DSN访问数据库(续)
作者:11830 时间:2001-11-08 10:56 出处:互联网 责编:chinaitpower
              摘要:不用DSN访问数据库(续)

不用DSN访问数据库

任何一个要访问数据库的ASP脚本都必须首先在服务器上打开数据库,
我们有两种方法:
.通过DSN建立连接
.不用DSN建立连接

一个DSN连接需要服务器的系统管理员在服务器上用控制面板中的ODBC
工具设置一个DSN,或者使用一个第三方的服务器组件,让你的ASP脚本
在需要时通过修改注册表建立DSN.我将提供一个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
        &nbs

关闭本页
 
首页 | 投资与合作 | 服务条款 | 隐私政策 | 收藏本站 | 设为首页 | 新用户注册 | 免责声明 | 使用帮助
Copyright ©2005-2008 chinaitpower.com All rights reserved. www.chinaitpower.com 版权所有