源代码 <div class="title-b" name="sliding" id="sliding">
<ul class="touch"><li class="on"><a href="/list.asp?px=Hits" target=_blank><font color="CC3300">更多>></font></a></li></ul>
<h3>热门信息</a></h3>
</div>
<div>
<ul class="dig">
<%
set rdsInfo1 = Server.CreateObject("ADODB.Recordset")
sqlInfo1 = "Select top 10 infokey,tj,state,infoclass,infoadd,topic,jg,pic,color,hits From Dat_Information Where State = 1 order by hits desc,infokey desc"
rdsInfo1.Open sqlInfo1,Conn,1,1
%>
<% i=1
do while not rdsInfo1.EOF
xxlx3=rdsInfo1("InfoClass")
strTopic1 = left(rdsInfo1("Topic"),20)
strjg=rdsInfo1("jg")
pic=rdsInfo1("pic")
strcolor=rdsInfo1("color")
%>
<li><a href="View_Info.asp?Id=<% = rdsInfo1("InfoKey")%>" target="_blank" title="<%=rdsInfo1("Topic")%>"><% = strTopic1%></a><strong><a href="View_Info.asp?Id=<% = rdsInfo1("InfoKey")%>" target="_blank"><% = rdsInfo1("hits")%></a></strong></li>
<%if i mod 10 = 0 then %>
</ul>
<%
end if
rdsInfo1.MoveNext
i=i+1
loop
rdsInfo1.Close
set rdsInfo1 = nothing
%>
</div>按点击数显示排序,但是显示的是所有的信息,有什么方法让其显示为近30天的数据呢?谢谢
<ul class="touch"><li class="on"><a href="/list.asp?px=Hits" target=_blank><font color="CC3300">更多>></font></a></li></ul>
<h3>热门信息</a></h3>
</div>
<div>
<ul class="dig">
<%
set rdsInfo1 = Server.CreateObject("ADODB.Recordset")
sqlInfo1 = "Select top 10 infokey,tj,state,infoclass,infoadd,topic,jg,pic,color,hits From Dat_Information Where State = 1 order by hits desc,infokey desc"
rdsInfo1.Open sqlInfo1,Conn,1,1
%>
<% i=1
do while not rdsInfo1.EOF
xxlx3=rdsInfo1("InfoClass")
strTopic1 = left(rdsInfo1("Topic"),20)
strjg=rdsInfo1("jg")
pic=rdsInfo1("pic")
strcolor=rdsInfo1("color")
%>
<li><a href="View_Info.asp?Id=<% = rdsInfo1("InfoKey")%>" target="_blank" title="<%=rdsInfo1("Topic")%>"><% = strTopic1%></a><strong><a href="View_Info.asp?Id=<% = rdsInfo1("InfoKey")%>" target="_blank"><% = rdsInfo1("hits")%></a></strong></li>
<%if i mod 10 = 0 then %>
</ul>
<%
end if
rdsInfo1.MoveNext
i=i+1
loop
rdsInfo1.Close
set rdsInfo1 = nothing
%>
</div>按点击数显示排序,但是显示的是所有的信息,有什么方法让其显示为近30天的数据呢?谢谢
解决方案 »
- 事务(进程 ID 54)与另一个进程被死锁在 锁资源上,并且已被选作死锁牺牲品。请重新运行该事务
- petshop4.0数据库
- 关于zDialog.js这个弹出层插件弹出的时候,父窗体移动的问题
- c#上传图片时,产生缩略图,如果缩略图和上传的图片在同一目录不会出错,如果不在同一目录,则会出现"GDI+ 中发生一般性错误"
- 关于WIN FORM程序 POST数据到一个页面的问题
- 求一条有效的正则表达试~~
- 为什么我设置的cookie截止期无效?
- 想在GridView中 用FileUpload 控件 每次当编辑的时候就报错误,“指定的转换无效。”
- 新手问题:关于怎么把在.aspx里的一个dropdownlist值传到.cs里面?
- 新手问题!
- jquery中,怎样将事件当成参数传递到方法中?
- 问个白痴点的问题,如何 在一个页面类中 定义另一个页面类,用命名空间吗?
select.... from ... where ... and datepart(dd,youdatefield) bewteen dateadd(dd,-15,getdate()) and dateadd(dd,15,getdate())希望这个对你有用
and datepart(yy,youdatefield)=datepart(yy,getdate()) and datepart(mm,youdatefield)=datepart(mm,getdate()) and datepart(dd,youdatefield) between
dateadd(dd,-15,getdate()) and dateadd(dd,15,getdate())
Microsoft VBScript 编译器错误 (0x800A0409)
未结束的字符串常量
/index.asp, line 205, column 260
sqlInfo1 = "Select top 10 infokey,tj,state,infoclass,infoadd,topic,jg,pic,color,hits From Dat_Information Where State = 1 and datepart(yy,CreateTime)=datepart(yy,getdate()) and datepart(mm,CreateTime)=datepart(mm,getdate()) and datepart(dd,CreateTime) between
谢谢csdn的各位朋友热心帮助,小弟谢谢你们