020-29133788
    资 讯
    您的位置:首页 >> 资 讯 >> 软件应用 >> 编程开发 >> 正文
    ASP资料库连结

    点击:   发布日期:2013-05-26

    本文来自 www.020fix.com

    ACCESS 相对目录下的连接语法 】
    我有一个叫 link.mdb 的ACCESS资料库,以下为连结资料库语法,前提资料库必须在与ASP网页同一个目录下!
    【复制步骤一】

    <%  
      Set conn = Server.CreateObject("ADODB.Connection")
      DBPath = Server.MapPath("link.mdb")
      conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
      Set rs = Server.CreateObject("ADODB.Recordset")
      SortSql = "Select * From main Where " & Sql & " order by PubId Desc"
      rs.Open SortSql, conn, 3,3
    %>


    Set conn = Server.CreateObject("ADODB.Connection") '开新一个连结物件
    DBPath = Server.MapPath("link.mdb") '← 资料库名称
    conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath '直接开启对应路径
    Set rs = Server.CreateObject("ADODB.Recordset") '开启资料库物件,预备操作
    SortSql = "Select * From main Where " & Sql & " order by PubId Desc" '← 中间 " & Sql & " 表示将栏位指定给变数,可以指定资料库栏位开启,此行为SQL查询语法
    rs.Open SortSql, conn, 3,3 '开启资料库
    以上资料库开启,页面要运用只要指定 SQL 及 rs 二个变数即可!SQL 变数需用到 Request.QueryString !
    以上资料库使用 ACCESS 2000

    【网友补充说明】
    doraemon2112 于 2003-02-09 01:28:05 补充说明:

    资料库有许多不同的类型,在ASP中,较常用的是Access。对于不同类型的资料库诸如MS SQL Server、Oracle等,我们需要用各自的连结语法来产生对不同资料库的连接。

    在自己的电脑,我们可以使用DSN(Data Source Name)来连接。但在一些免费空间,我们则须用DSN-less的方式连接资料库,我们要在ASP中列出驱动程式名称及资料库位置。

    上述文章便是一个使用DSN-less的方式。连接Access有两个方法,上述是旧版,新版的程式码如下:

    <%
    Set objDBconn=Server.Createobject("ADODB.connection")'→建立一个与资料库连接的物件,名称为objDBconn
    objDBconn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("资料库路径.mdb")'→使用新版驱动程式开启它
    '假设资料库内有资料表 users
    strSQL="select * from users"'→设置Structured Query Language字句
    '使用连接元件objDBconn的方法之一Execute执行资料库指令,并将资料传回objRS资料集中
    Set objRS=objDBconn.execute(strSQL)
    %>
    你己设置好资料库连接及资料集了。

    如果只是为了要存取资料库,可以考虑用ADOR,比较不耗伺服机的资源。
    【范例:】
    <%
    Set rs = Server.CreateObject("ADOR.Recordset")
    DBPath = Server.MapPath("link.mdb")
    SortSql = "Select * From main Where " & Sql & " order by PubId Desc"
    rs.Open SortSql, "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath, 3,3
    %>