access数据库转成sql2000后网页速度极慢
不报错,但是网页进度条基本不动,用access数据库却很快这是我主页的代码请高手忙帮看看根本原因在哪主键索引我都设了<%sql="selecttop10*fromqian...
不报错,但是网页进度条基本不动,用access数据库却很快
这是我主页的代码 请高手忙帮看看 根本原因在哪
主键索引我都设了
<%
sql="select top 10 * from qianshou where BigClassName='通知通报' order by id desc"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
%>
<table width="415" border="0" cellpadding="0" cellspacing="0">
<%
if not rs.eof then
do while not rs.eof%>
<tr>
<td width="9"><div align=center><img src="images/main_4_icon.gif" border=0 /></div></td>
<td width="335"><a href="qsnews.asp?id=<%=rs("id")%>"><%=leftT(rs("title"),40)%></a></td>
<TD width="36"><a href="orders.asp?id=<%=rs("id")%>" class="qs">签收</a></TD>
<td width="35"><div align="right" class="date_c"><%=rs("intime")%></div></td>
</tr>
<%
rs.movenext
loop
end if
%>
<%
sql="select * from gonggao where d_data >= #"&date()&"# order by d_id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
%>
<a href="gonggao.asp?ID=<%=rs("d_id")%>" target="_blank"><%=leftT(rs("title"),80)%></a><br />
</marquee> </td>
</tr>
<%
rs.movenext
loop
end if
%>
我都是用的这样的语言进行操作的
我已经改成这样了
<td colspan="2" height="70"><marquee onMouseOver="this.stop()" onMouseOut="this.start()" scrollamount="1" scrolldelay="100" direction="up" width="180" height="70">
<%
set rs2=server.createobject("adodb.recordset")
sql="select * from gonggao"
rs2.open sql2,conn,1,1
if not rs2.eof then
do while not rs2.eof
%>
<a href="gonggao.asp?ID=<%=rs2("d_id")%>" target="_blank"><%=leftT(rs2("title"),80)%></a><br />
<%
rs2.movenext
loop
end if
rs2.close
set rs2=nothing
%>
</marquee> </td>
公告就是过不去 公告里面没有任何内容
网页中有好多这样 过不去的地方 展开
这是我主页的代码 请高手忙帮看看 根本原因在哪
主键索引我都设了
<%
sql="select top 10 * from qianshou where BigClassName='通知通报' order by id desc"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
%>
<table width="415" border="0" cellpadding="0" cellspacing="0">
<%
if not rs.eof then
do while not rs.eof%>
<tr>
<td width="9"><div align=center><img src="images/main_4_icon.gif" border=0 /></div></td>
<td width="335"><a href="qsnews.asp?id=<%=rs("id")%>"><%=leftT(rs("title"),40)%></a></td>
<TD width="36"><a href="orders.asp?id=<%=rs("id")%>" class="qs">签收</a></TD>
<td width="35"><div align="right" class="date_c"><%=rs("intime")%></div></td>
</tr>
<%
rs.movenext
loop
end if
%>
<%
sql="select * from gonggao where d_data >= #"&date()&"# order by d_id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
%>
<a href="gonggao.asp?ID=<%=rs("d_id")%>" target="_blank"><%=leftT(rs("title"),80)%></a><br />
</marquee> </td>
</tr>
<%
rs.movenext
loop
end if
%>
我都是用的这样的语言进行操作的
我已经改成这样了
<td colspan="2" height="70"><marquee onMouseOver="this.stop()" onMouseOut="this.start()" scrollamount="1" scrolldelay="100" direction="up" width="180" height="70">
<%
set rs2=server.createobject("adodb.recordset")
sql="select * from gonggao"
rs2.open sql2,conn,1,1
if not rs2.eof then
do while not rs2.eof
%>
<a href="gonggao.asp?ID=<%=rs2("d_id")%>" target="_blank"><%=leftT(rs2("title"),80)%></a><br />
<%
rs2.movenext
loop
end if
rs2.close
set rs2=nothing
%>
</marquee> </td>
公告就是过不去 公告里面没有任何内容
网页中有好多这样 过不去的地方 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |