Question

asp如何获取access数据库的数据？？请高手指教

asp如何获取access数据库的数据？？请高手指教！！！
我的数据库的相关连接是：
MenuClass---ClassName Readme LinkUrl
关于我们 关于我们 Aboutus.asp?Title=企业简介
新闻资讯 新闻资讯 Conews.asp
产品展示 产品展示 Product.asp
在线咨询 在线咨询 Feedback.asp
联系方式 联系方式 Aboutus.asp?Title=联系我们

请问我想用ASP代码在网站上顺序排列成：
关于我们 | 新闻资讯 | 产品展示 | 在线咨询 | 联系方式

如何实现这样的ASP代码。谢谢
兄弟们，
我的数据库是123.mdb，进入后选择了MenuClass这个，进入后就出现以下列表了，下面的就是数据库表
id ClassName Readme LinkUrl
1 关于我们 关于我们 Aboutus.asp?Title=企业简介
2 新闻资讯 新闻资讯 Conews.asp
3 产品展示 产品展示 Product.asp
4 在线咨询 在线咨询 Feedback.asp
5 联系方式 联系方式 Aboutus.asp?Title=联系我们

Answer 1

参考下面：

添加数据：
<%
set rs=server.createobject("adodb.recordset")
sql="select*from tablename"　　'tablename为数据中表的名称
rs.open sql,conn,1,1
rs.addnew
rs("data1")="new1"
rs("data2")="new2"
rs("data3")="new3"
……
rs("datan")="newn"
rs.update
rs.close
conn.close
set rs=nothing
set sql=nothing
%>

删除数据：
<%
set rs=server.createobject("adodb.recordset")
sql="select*from tablename where del=del"　'第二个del为你想要删除的数据
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "数据不存在"
else
rs.delete
response.write "数据已经删除"
end if
%>

数据查询：
<%
set rs=server.createobject("adodb.recordset")
sql="select*from tablename where data=data"　'第二个del为你想要查询的数据,也可为多个，用“，”号分开
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "数据不存在"
else
rs.delete
response.write rs("data")　'如果有多个相同的数据，这可用for ……next 循环语句
end if
%>

数据显示：
<%
set rs=server.createobject("adodb.recordset")
sql="select*from tablename"　　
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "数据库中没有数据"
else
while not rs.eof
response.write rs("data1")　
response.write rs("data2")
response.write rs("data3")
……
response.write rs("datan")
rs.movenext
wend
end if%>

Answer 2

这个太简单了！具体的数据库连接的方法就不说了，把数据的连接写在一个CONN.ASPX

<!--#include file="conn.aspx"--> '加载数据连接的ASP文件
sql="select * from 数据表的名称“
rs=conn.execute(sql1)
while rs.eof
str=str & rs("ClassName") & "|"
rs.movenext
end while
response.write(str)
输出地接过就是 关于我们 | 新闻资讯 | 产品展示 | 在线咨询 | 联系方式|
如果不要最后一个 ”|“ 的话，在输出之前加上这个代码：
str=left(str,len(str)-1) 再输出 response.write(str)

Answer 3

<%
set webInfoRS = server.CreateObject("adodb.recordset")
sql = "select * from lhwl_Config"
webInfoRS.open sql,conn,1,1
if not(webInfoRS.bof and webInfoRS.eof) then
SiteTitle = webInfoRS("webTitle")
SiteKeywords = webInfoRS("webMetaKeywords")
SiteDescription = webInfoRS("webMetaDescription")
phone = webInfoRS("phone")
address = webInfoRS("address")
email = webInfoRS("email")
aboutText = webInfoRS("aboutText")
aboutImage = webInfoRS("aboutImage")
webDomain = webInfoRS("webDomain")
end if
webInfoRS.close
set webInfoRS = nothing
%>
这是一个例子，你把你数据库表发下，要不没法按实际给你写，你也可以照葫芦画瓢，很简单的

Answer 4

在main表中增加一个字段
这个字段中记录它对应的img的id
例如1,2,3,4..等等图片id之间用逗号搁开
读出记录的时候用程序处理一下就可以

Answer 5

<%
set webInfoRS = server.CreateObject("adodb.recordset")
sql = "select * from lhwl_Config"
webInfoRS.open sql,conn,1,1
if not(webInfoRS.bof and webInfoRS.eof) then
SiteTitle = webInfoRS("webTitle")
SiteKeywords = webInfoRS("webMetaKeywords")
SiteDescription = webInfoRS("webMetaDescription")
phone = webInfoRS("phone")
address = webInfoRS("address")
email = webInfoRS("email")
aboutText = webInfoRS("aboutText")
aboutImage = webInfoRS("aboutImage")
webDomain = webInfoRS("webDomain")
end if
webInfoRS.close
set webInfoRS = nothing
%>

然后新建立个字段做个排序，呵呵，找个源码参考一下就行，很简单。