asp怎么连接access数据库

asp怎么连接access数据库,第1张

asp连接access数据库的方法:

1、设置数据库连接方式:

set dbconnection=Server.CreateObject("ADODB.Connection")

DBPath = Server.MapPath("customer.mdb")

dbconnection.Open "provider=microsoft.jet.oledb.4.0data source="&dbpath

SQL="select * from auth where id='" &user_id &"'"

SET uplist=dbconnection.EXECUTE(SQL)

2、设置连接数据库

DBPath = Server.MapPath("customer.mdb")

set session("rs")=Server.CreateObject("ADODB.Recordset")

' rs=Server.CreateObject("ADODB.Recordset")

connstr="provider=microsoft.jet.oledb.4.0data source="&dbpath

SQL="select * from auth where id='" &user_id &"'"

session("rs").Open sql,connstr,1,3

3、建立odbc数据源

set conn=server.createobject("Adodb.connection")

conn.open "DSN=xxxUID=PWD=Database=customer

4、附上一个经常用的sqlserver与access通用的连接数据库代码:

<%

Const DataBaseType=1

If DataBaseType=0 then

DBPath="/jb51/news.asp"

SqlNowString = "Now()"

ystr=true

nstr=false

suiji="rnd(id)"

Else

'如果是SQL数据库,请认真修改好以下数据库选项

DataServer = "wwwjb51net" '数据库服务器IP

DataUser = "jb51net" '访问数据库用户名

DataBaseName = "jb51net" '数据库名称

DataBasePsw = "密码" '访问数据库密码

SqlNowString = "getdate()"

ystr=1

nstr=0

suiji="newid()"

End if

On Error Resume Next

If DataBaseType = 1 Then

ConnStr="driver={SQL Server}server="&dataserver&"UID="&datauser&"PWD="&databasepsw&"Database="&databasename

Else

ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=" &Server.MapPath(DBPath)

End If

Set conn = Server.CreateObject("ADODB.Connection")

conn.open ConnStr

它的各步骤及参数意义如下:

第一行程序:利用Server对象的MapPath函数,取得要打开数据库的完整的文件路径,并存储在变量DbPath中。这其中,数据库名是我们需要指定的参数,应该用我们要打开的数据库的实际名称替代。如果数据库名是直接作为常量出现,要用引号将其括起来,并且不能丢掉扩展名。例如数据库是Test.mdb,则该行程序成为:DbPath=Server.MapPath(“Test.mdb”)。

第二行程序:建立一个ADO对象集中的Connection对象,也即连接对象。这是建立数据库连接的初始步骤。执行这行程序后,Conn成为一个连接对象。

第三行程序:利用连接对象Conn的Open方法打开一个指定的数据库。因为我们要打开的是Access数据库,所以要指定ODBC驱动程序参数,表示要透过Access的ODBC驱动程序来访问数据库:driver={Microsoft

Access

Driver

(*.mdb)}。另一个参数dbq=

&

DbPath,运算后等效于dbq=Server.MapPath(数据库名)

,是利用了第一行的Server.MapPath(数据库名)函数,用来指定要打开的数据库文件。到这里,就已经打开了数据库名指定的数据库。如果数据库名是“test.mdb”,则打开Access数据库Test.mdb。在这一行里指定的参数,要严格按照格式原样写出,不能省略或改动,也没有可变参数。

方法如下:

1、首先新建一个access数据库。access的版本建议是2003年版本的,没有access可以自行下载安装。数据库的名字我们就叫db1.mdb,新建数据库表明为table_1,在表1中新建name等几个字段,并相应插入字段值。

2、用FTP工具在虚拟服务器中新建一个mytest文件夹,将该数据库上传到mytest文件夹中。

3、在mytest文件夹下,新建一个test.asp文件,该文件的内容如下:

<%

set conn=Server.CREATEOBJECT("ADODB.CONNECTION")

DBPath = Server.MapPath("db1.mdb")

conn.Open "driver={Microsoft Access Driver (*.mdb)}dbq=" &DBPath

sql="select * from table_1 order by id asc"

set rs=server.createobject("adodb.recordset")

rs.open sql,conn,1,1

do while not rs.eof

response.write(rs("name"))

rs.movenext

loop

conn.close

set rs=nothing

set conn=nothing

%>

4、然后在地址栏输入域名\mytest\test.asp,显示结果如下图。查询到的是“name"字段的值。


欢迎分享,转载请注明来源:夏雨云

原文地址:https://www.xiayuyun.com/zonghe/37161.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-02-21
下一篇2023-02-21

发表评论

登录后才能评论

评论列表(0条)

    保存