asp连接数据库出现乱码
代码如下<%'连接数据库setconn=server.CreateObject("ADODB.Connection")DBpath=server.MapPath("dy2...
代码如下
<%
'连接数据库
set conn=server.CreateObject("ADODB.Connection")
DBpath=server.MapPath("dy2.mdb")
conn.open"driver={Microsoft Access Driver(*.mdb)};DBQ="&DBpath
%>
<table width="700" border="0" cellpadding="0" cellspacing="0">
<%
'定义一个SQL命令串
strSQL="select ID,dymc,lv,nameyy from films"
set rs=conn.execute(strSQL)'执行SQL语句得到记录集
'将与表格的形式在页面显示检索出的数据
while not rs.eof
%>
<tr>
<td height="21" width="45"><a href="aa.asp?id=<%=rs("ID")%>"><%=rs("dymc")%></a></td>
<td><%=rs.fields("lv").value%></td>
<td><%=rs.fields("nameyy").value%></td>
</tr>
<%
'移向下一条记录
rs.moveNext
Wend
conn.close'关闭连接
set conn=nothing
%>
</table> 展开
<%
'连接数据库
set conn=server.CreateObject("ADODB.Connection")
DBpath=server.MapPath("dy2.mdb")
conn.open"driver={Microsoft Access Driver(*.mdb)};DBQ="&DBpath
%>
<table width="700" border="0" cellpadding="0" cellspacing="0">
<%
'定义一个SQL命令串
strSQL="select ID,dymc,lv,nameyy from films"
set rs=conn.execute(strSQL)'执行SQL语句得到记录集
'将与表格的形式在页面显示检索出的数据
while not rs.eof
%>
<tr>
<td height="21" width="45"><a href="aa.asp?id=<%=rs("ID")%>"><%=rs("dymc")%></a></td>
<td><%=rs.fields("lv").value%></td>
<td><%=rs.fields("nameyy").value%></td>
</tr>
<%
'移向下一条记录
rs.moveNext
Wend
conn.close'关闭连接
set conn=nothing
%>
</table> 展开
3个回答
展开全部
你可以试试这样 稍作了改动:
<%
'连接数据库
set conn=server.CreateObject("ADODB.Connection")
DBpath=server.MapPath("dy2.mdb")
conn.open"driver={microsoft access driver (*.mdb)};dbq="&DBpath
%>
<table width="700" border="0" cellpadding="0" cellspacing="0">
<%
'定义一个SQL命令串
strSQL="select ID,dymc,lv,nameyy from films"
set rs=server.createobject("adodb.recordset")'执行SQL语句得到记录集
'将与表格的形式在页面显示检索出的数据
rs.open strSQL,conn,1,1
if not rs.eof then
do while not rs.eof
%>
<tr>
<td height="21" width="45"><a href="aa.asp?id=<%=rs("ID")%>"><%=rs("dymc")%></a></td>
<td><%=rs.fields("lv").value%></td>
<td><%=rs.fields("nameyy").value%></td>
</tr>
<%
'移向下一条记录
rs.moveNext
loop
else
%>
<tr>
<td>数据库中无记录!</td>
</tr>
<%
conn.close'关闭连接
set conn=nothing
end if
%>
</table>
希望能帮到你
<%
'连接数据库
set conn=server.CreateObject("ADODB.Connection")
DBpath=server.MapPath("dy2.mdb")
conn.open"driver={microsoft access driver (*.mdb)};dbq="&DBpath
%>
<table width="700" border="0" cellpadding="0" cellspacing="0">
<%
'定义一个SQL命令串
strSQL="select ID,dymc,lv,nameyy from films"
set rs=server.createobject("adodb.recordset")'执行SQL语句得到记录集
'将与表格的形式在页面显示检索出的数据
rs.open strSQL,conn,1,1
if not rs.eof then
do while not rs.eof
%>
<tr>
<td height="21" width="45"><a href="aa.asp?id=<%=rs("ID")%>"><%=rs("dymc")%></a></td>
<td><%=rs.fields("lv").value%></td>
<td><%=rs.fields("nameyy").value%></td>
</tr>
<%
'移向下一条记录
rs.moveNext
loop
else
%>
<tr>
<td>数据库中无记录!</td>
</tr>
<%
conn.close'关闭连接
set conn=nothing
end if
%>
</table>
希望能帮到你
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用DW做的时候,文件没有处理好!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你在浏览器中单击右键,更改下编码,如果更改后可以正常显示,那么就是你网页源码头部的编码错了,GBK和UTF对换下…
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询