Loading...
  所在位置:论坛首页 -> ┈┋电脑网络技术区┋┈ -> Asp/Asp.Net技术 -> 另类: asp不用DSN访问数据库
标题:另类: asp不用DSN访问数据库收藏 编辑 删除 楼主 | 上一篇 下一篇
小糊涂神
等级:社区游民
权限:管理员
积分:0
金钱:4469
声望:0
经验:0
发帖数:2141
注册:未知
资料 短消息2006-6-25 16:23:37
  一个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"
  
有肚量去容忍那些无法改变的事情
有勇气去改变那些可以改变的事情
有智慧去区别上述二类事

2006-6-25 16:23:37 顶部
第1页 共页 共0个回复     <<    >>    
 快速回复
  • 支持UBB,HTML标签

  • 高级回复

  • 操作选项:评分 加精 解精 奖惩 设专题 设公告 解公告 固顶 总固顶 解固顶 结帖 解结帖 锁帖 解锁 移帖 删帖
      首页 | 购买指南 | 商业版本 | 虚拟主机 | 特色介绍 | 下载中心 | 支付方式
    Copyright 2004-2008 BBSGood.com Powered By: BBSGood.Speed Version 5.0
      咨询电话:0575-85513832、0575-85513825(传真)、7*24小时咨询服务:13606552007 不良信息举报中心 浙ICP备05029817号
      业务QQ:38958768、客服QQ1:415896239、客服QQ2:343896043、MSN:jccsxx@hotmail.com