asp中调用数据库有关问题 急求解。
日期：2014-05-17 浏览次数：20944 次
asp中调用数据库问题 急求解。。。。在线等
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link rel="stylesheet" type="text/css" href="index.css"/>
<title>无标题文档</title>
<link rel="stylesheet" type="text/css" href="index.css"/>
</head>
<body>
<div id="head">
<table height="117" width="1001" cellpadding="0" cellspacing="0" background="images/yongjie_02.gif" style="background-repeat:no-repeat;">
<tr>
<td height="85" colspan="2" align="right" >
<table width="200" height="20" border="0" cellspacing="0" cellpadding="0" style="margin-top:5px; margin-right:8px; font-size:12px; margin-right:8px; margin-top:8px;">
<tr>
<td>关于我们 | 加入收藏 | 联系我们</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="36" style="background:url(images/yongjie_03.gif); background-repeat:no-repeat;" align="right">
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from Ameav_Navigation where ViewFlag and NavType=0 order by Sequence asc"
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
%>
<table border="0" cellpadding="0" cellspacing="0" class="elecenter" id="navlist">
<tr>
<%
do while not rs.eof
%>
<%
if rs.AbsolutePosition=rs.RecordCount then
%>
<td><a href="<%=rs("NavUrl")%>" <%if pagename=""&rs("NavName")&"" then Response.Write("class=""pageon""") end if%>><%=rs("NavName")%></a></td>
<%
else
%>
<td><a href="<%=rs("NavUrl")%>" <%if pagename=""&rs("NavName")&"" then Response.Write("class=""pageon""") end if%>><%=rs("NavName")%></a></td>
<td class="navline"></td>
<%
end if
%>
<%
rs.movenext
loop
%>
</tr>
</table>
<%
end if
rs.close
set rs=nothing
%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="304" colspan="2" valign="top">
<img src="images/yongjie_04.gif" />
</td>
</tr>
</table>
</div>
</body>
</html>
------解决方案--------------------
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%>
都指定js 了为啥还用vbs
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link rel="stylesheet" type="text/css" href="index.css"/>
<title>无标题文档</title>
<link rel="stylesheet" type="text/css" href="index.css"/>
</head>
<body>
<div id="head">
<table height="117" width="1001" cellpadding="0" cellspacing="0" background="images/yongjie_02.gif" style="background-repeat:no-repeat;">
<tr>
<td height="85" colspan="2" align="right" >
<table width="200" height="20" border="0" cellspacing="0" cellpadding="0" style="margin-top:5px; margin-right:8px; font-size:12px; margin-right:8px; margin-top:8px;">
<tr>
<td>关于我们 | 加入收藏 | 联系我们</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="36" style="background:url(images/yongjie_03.gif); background-repeat:no-repeat;" align="right">
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from Ameav_Navigation where ViewFlag and NavType=0 order by Sequence asc"
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
%>
<table border="0" cellpadding="0" cellspacing="0" class="elecenter" id="navlist">
<tr>
<%
do while not rs.eof
%>
<%
if rs.AbsolutePosition=rs.RecordCount then
%>
<td><a href="<%=rs("NavUrl")%>" <%if pagename=""&rs("NavName")&"" then Response.Write("class=""pageon""") end if%>><%=rs("NavName")%></a></td>
<%
else
%>
<td><a href="<%=rs("NavUrl")%>" <%if pagename=""&rs("NavName")&"" then Response.Write("class=""pageon""") end if%>><%=rs("NavName")%></a></td>
<td class="navline"></td>
<%
end if
%>
<%
rs.movenext
loop
%>
</tr>
</table>
<%
end if
rs.close
set rs=nothing
%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="304" colspan="2" valign="top">
<img src="images/yongjie_04.gif" />
</td>
</tr>
</table>
</div>
</body>
</html>
------解决方案--------------------
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%>
都指定js 了为啥还用vbs
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
