魔法布有cd:Dreamwaver于ACCESS数据库连接的具体设置步骤是什么??

来源:百度文库 编辑:高考问答 时间:2024/05/09 10:34:04
比如要把ACCESS中的数据关联到DREAMWAVER中的表格中,希望知道的人能说详细点,谢谢了~~

一般是有一个文件专门用来连接数据库的,文件的内容大致如下,它一般命名conn.asp。嘿嘿,你参考一下吧。
<%
dim startime,conn,connstr,db;
startime=timer()

on error resume next
connstr="DBQ="+server.mappath("你的数据库.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
if err then
err.clear
end if
end if
%>

看代码吧,看不懂qq联系我,我的qq:3332842
<%
on error resume next
set conn=server.createobject("adodb.connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("admin/#)alsdjfklsadjfldksajf.mdb")
set rs=server.createobject("adodb.recordset")

keyword=server.HTMLEncode(replace(request("keyword"),"'","‘"))
stype=server.HTMLEncode(replace(request("stype"),"'","‘"))
if stype="0" then stypex="proname"
if stype="1" then stypex="worker"
if stype="" then stypex="proname"
strsql="select * from product where protype='"&protypex&"' and "&stypex&" like '%"&keyword&"%' order by datetimenow desc"
strpage="&protype="&protypex&"&stype="&stype&"&keyword="&keyword
%>
<table border="0" align="center" cellpadding="0" cellspacing="0">
<%for i=1 to 4%>
<tr>
<%for j=1 to 4
if rs.eof or rs.bof then exit for%>
<td width="135" height="210" align="center"><table width="103" height="128" border="0" cellpadding="3" cellspacing="1" bgcolor="714930">
<tr>
<td align="center" bgcolor="#FFFFFF"><a href="pro_view.asp?id=<%=rs("id")%>" target="_blank"><img src="admin/pro_imgs/<%=rs("imgurl")%>" <%if rs("length")>rs("width") then response.write "height=120"
if rs("width")>rs("length") then response.write "width=100"
if rs("length")=rs("width") then response.write "height=120 width=100"%> border="0"></a></td>
</tr>
</table>
《<a href="pro_view.asp?id=<%=rs("id")%>" title="<%=rs("proname")%>" target="_blank">
</a><a href="pro_view.asp?id=<%=rs("id")%>" title="<%=rs("proname")%>" target="_blank">
<%if len(rs("proname"))>8 then response.write left(rs("proname"),6)&"..." else response.write rs("proname")%>
</a><a href="pro_view.asp?id=<%=rs("id")%>" title="<%=rs("proname")%>" target="_blank"> </a>》<br>
<%if rs("protype")="zihua" then response.write "作者:"&rtrim(rs("worker"))&"<br>"%>
尺寸:
<%response.write rtrim(rs("length"))&"×"&rtrim(rs("width"))%>
(cm) <br>
价格:
<%if rs("pricex")<>"待定" then response.write rs("pricex")&"元" else response.write rs("pricex")%></td>
<%rs.movenext
next%>
</tr>
<%next%>
</table>