html页面中如何连接access数据库

html页面中如何连接access数据库,第1张

你必须在DW里面把网页存为ASP或者PHP才可以采用动态数据库更新数据 要把站点修改一下 然后

在dreamwave用代码或者在面板里面的数据库创建连接

ASP代码是<%%

dim conn

dim db

db="admin/database/Enterprisemdb" //你的文件路径下面的数据库,具体你自己替换

set conn=ServerCreateObject("adodbconnection")

connprovider="Microsoftjetoledb40;Data source=" & ServerMapPath(db)

connopen

sub CloseConn()

connclose

set conn=nothing

end sub

%>%>

创建好连接后创建记录集和SQL COMMAND对象就可以连接上了

<%

dim rs,sql

set rs=serverCreateObject("adodbrecordset")

sql="select from wo where 表格里面的字段='"&indexAD_ID&"' "//我是你的数据库里德表格名称 自己在数据库里面建好

rsopen sql,conn,1,1

%>

然后你只要在那个位置输入<%indexAD_id%>就可以了 只要连接数据库成功之后 其他就很方便 不过这要有点ADO基础 你好好找找资料试验下吧

常用数据库语句

1SELECT 语句:命令数据库引擎从数据库里返回信息,作为一组记录。

2INSERT INTO 语句:添加一个或多个记录至一个表。

3UPDATE 语句:创建更新查询来改变基于特定准则的指定表中的字段值。

4DELETE 语句:创建一个删除查询把记录从 FROM 子句列出并符合 WHERE 子句的一个或更多的表中清除。

5EXECUTE 语句:用于激活 PROCEDURE(过程)

用 ASP 来做一个自己的通讯录练练手吧……

一、建立数据库:

用 Microsoft Access 建立一个名为 datamdb 的空数据库,使用设计器创建一个新表。输入以下几个字段:

字段名称数据类型说明其它

ID 自动编号数据标识字段大小:长整型 新值:递增 索引:有(无重复)

username文本姓名缺省值

usermail文本E-mail 缺省值

view数字查看次数字段大小:长整型 默认值:0 索引:无

indate 时间日期加入时间缺省值

保存为 datamdb 文件,为了便于说明,只是做了一个比较简单的库。

二、连接数据库

方法1:

Set conn = ServerCreateObject("ADODBConnection")

connOpen "driver={Microsoft Access Driver (mdb)};dbq="&ServerMapPath("datamdb")

方法2:

Set conn = ServerCreateObject("ADODBConnection")

connOpen "Provider=MicrosoftJetOLEDB40;Data Source="&ServerMapPath("datamdb")

注意:一个页面中,只要连接一次就可以了,数据库使用完后要及时关闭连接。

connClose

Set conn = Nothing

三、添加新记录到数据库

Set conn = ServerCreateObject("ADODBConnection")

connOpen "driver={Microsoft Access Driver (mdb)};dbq="&ServerMapPath("datamdb")

username = "风云突变"

usermail = "ec0705liujuan@163com"

indate = Now()

sql = "insert into data (username,usermail,indata) values('"&username&"','"&usermail&"','"&indate&"')"

connExecute(sql)

connClose

Set conn = Nothing

说明:建立数据库连接;通过表单获取姓名、E-mail 字符串,Now()获取当前时间日期;使用 insert into 语句添加新记录;connExecute 来执行;最后关闭。

四、选择数据库里的记录

1选择所有记录的字段(按记录倒序排序):sql = "select from data order by ID desc"

2选择所有记录的姓名和E-mail字段(不排序):sql = "select username,usermail from data"

3选择姓名为“风云突变”的所有记录:sql = "select from data where username='"风云突变"'"

4选择使用 163 信箱的所有记录(按查看次数排序):sql = "select from data where usermail like '%"@163com"%' order by view desc"

5选择最新的10个记录:sql = "select top 10 from data order by ID desc"

SQL 语句已经知道了,不过在Web应用时,还得创建一个 RecordSet 对象得到记录集,才能把从数据库里取出的值应用在网页上,如果现在将所有的记录显示在网页上就这样:

Set conn = ServerCreateObject("ADODBConnection")

connOpen "driver={Microsoft Access Driver (mdb)};dbq="&ServerMapPath("datamdb")

sql = "select from data"

Set rs = ServerCreateObject("ADODBRecordSet")

rsOpen sql,conn,1,1

Do While Not rsEof

ResponseWrite "<p>姓名:"& rs("username") &" E-mail:"& rs("usermail") &" 查看:"& rs("view") &"次 "& rs("indate") &"加入</p>"

rsMoveNext

Loop

rsClose

Set rs = Nothing

connClose

Set conn = Nothing

说明:建立数据库连接;创建 rs 得到记录集;循环显示记录,rsEof 表示记录末,rsMoveNext 表示移到下一个记录;最后关闭。

五、修改(更新)数据库记录

修改记录的E-mail:

Set conn = ServerCreateObject("ADODBConnection")

connOpen "driver={Microsoft Access Driver (mdb)};dbq="&ServerMapPath("datamdb")

ID = 1

usermail = "ec0705liujuan@163com"

sql = "update data set usermail='"&usermail&"' where ID="&CInt(ID)

connExecute(sql)

connClose

Set conn = Nothing

说明:建立数据库连接;获取记录ID、新 E-mail 字符串;使用 update 语句修改记录;connExecute 来执行;最后关闭。

如果使记录的查看值加1,则:sql = "update data set view=view+1 where ID="&CInt(ID)

六、删除数据库记录

删除某一条记录:

Set conn = ServerCreateObject("ADODBConnection")

connOpen "driver={Microsoft Access Driver (mdb)};dbq="&ServerMapPath("datamdb")

ID = 1

sql = "delete from data where ID="&CInt(ID)

connExecute(sql)

connClose

Set conn = Nothing

说明:建立数据库连接;获取记录ID;使用 delete 语句删除记录;connExecute 来执行;最后关闭。

删除多条记录为:sql = "delete from data where ID in (ID1,ID2,ID3)"

删除所有记录为:sql = "delete from data"

这可不是一两句话讲得清的

首先用access创建mdb数据库,然后在控制面板里创建数据源(也可以制作无源asp联接),再到网页编辑软件里创建数据联接之后你才可以制作表单,创建下拉菜单查询

asp的。

dim conn,rs,sql,i,connstr

connstr="dbq=" & serverMapPath("mdb/bookshopmdb")

& ";driver={microsoft access driver (mdb)};"

'前两句为一行代码

set conn=serverCreateObject("adodbconnection")

connOpen connstr

set rs=serverCreateObject("adodbrecordset")

sql="select from book order by id desc"

rsOpen sql,conn,1,1

'rsMovePrevious

以上就是关于html页面中如何连接access数据库全部的内容,包括:html页面中如何连接access数据库、动态网页连数据库access的详细过程、用Frontpage编辑网页,调用access数据库等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/sjk/9707441.html

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

发表评论

登录后才能评论

评论列表(0条)

保存