asp 不同的点击数怎样显示不同的图片?如下代码
<tablewidth="175"border="0"cellspacing="0"cellpadding="0"><%setrs_hy=server.createobj...
<table width="175" border="0" cellspacing="0" cellpadding="0">
<%
set rs_hy=server.createobject("adodb.recordset")
sqlhy="select top 3 * from Dat_Member where State=0 and CompanyName<>'' and MemberType=2 and mb='1' order by showcount desc"
rs_hy.open sqlhy,conn,1,1
do while not rs_hy.eof%>
<tr style="font-size: 14px">
<td width="113" style="font-size: 14px">
<img src="images/no1.gif"> <a target="_blank" href="hy/company1.asp?cid=<%=rs_hy("MemberKey")%>"><%=leftt(rs_hy("CompanyName"),40)%></a>
</td>
<% rs_hy.movenext
loop
rs_hy.close
set rs_hy=nothing
%></tr>
</table>
这段代码是显示点击排行的前三条信息.showcount是数据库中记录的点击数.怎样在点击数达到100显示1个星星图片,200显示两个,300..... 500以上显示5个星星图片.谢谢高手指教!
vaticinator 的方法是每增加100点击量加一个星星.我的要示是大于500的点击量最多也是5个星. arrbo 的方法提示错误:
错误类型:
Microsoft VBScript 编译器错误 (0x800A03F9)
缺少 'Then'
/gqxx/list1.asp, line 501, column 51
if rs_hy("showcount")>99 and rs_hy("showcount")<500 展开
<%
set rs_hy=server.createobject("adodb.recordset")
sqlhy="select top 3 * from Dat_Member where State=0 and CompanyName<>'' and MemberType=2 and mb='1' order by showcount desc"
rs_hy.open sqlhy,conn,1,1
do while not rs_hy.eof%>
<tr style="font-size: 14px">
<td width="113" style="font-size: 14px">
<img src="images/no1.gif"> <a target="_blank" href="hy/company1.asp?cid=<%=rs_hy("MemberKey")%>"><%=leftt(rs_hy("CompanyName"),40)%></a>
</td>
<% rs_hy.movenext
loop
rs_hy.close
set rs_hy=nothing
%></tr>
</table>
这段代码是显示点击排行的前三条信息.showcount是数据库中记录的点击数.怎样在点击数达到100显示1个星星图片,200显示两个,300..... 500以上显示5个星星图片.谢谢高手指教!
vaticinator 的方法是每增加100点击量加一个星星.我的要示是大于500的点击量最多也是5个星. arrbo 的方法提示错误:
错误类型:
Microsoft VBScript 编译器错误 (0x800A03F9)
缺少 'Then'
/gqxx/list1.asp, line 501, column 51
if rs_hy("showcount")>99 and rs_hy("showcount")<500 展开
2个回答
展开全部
Select case(rs("showcount")\100 )
Case 0 star=0
Case 1 star=1
Case 2 star=2
Case 3 star=3
Case 4 star=4
Case Else star=5
End Select
if star > 0 then
for i=1 to star
response.Write("★")
next
end if
Case 0 star=0
Case 1 star=1
Case 2 star=2
Case 3 star=3
Case 4 star=4
Case Else star=5
End Select
if star > 0 then
for i=1 to star
response.Write("★")
next
end if
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询