showsoft_body.asp

一个很COOL的按钮FLASH,满不错的!

end if%>
<tr bgcolor="#ffffff" align="right">
<td colspan="4" >第 <%=currentpage%> 页，共 <%=totalpages%>&nbsp;页,&nbsp;计&nbsp;<%=totalremark%> 条评论, |
<%
i=1
for i=1 to totalpages
if i=currentpage then
%>
<%=i%>
<%else%>
<a href="showsoft.asp?soft_id=<%=request.querystring("soft_id")%>&page=<%=i%>"><%=i%></a>
<%end if
next%>|&nbsp;
</td>
</tr>
</table>
<table cellspacing=1 cellpadding=0 width="100%" align=center border=0>
<tr>
<td width="100%" height="5"></td>
</tr>
</table>
<table width="98%" cellspacing="1" align="center" cellpadding="6" class="chinese" border=1 style="border-collapse: collapse; border: 1px solid #aaaaaa" bordercolor="#f1f1f1" bgcolor=#ffffff>
<form name="addremark" method="POST" action="<%=MM_editAction%>">
<tr >
<td bgcolor="#f3f3f3" colspan="2" style="border-collapse: collapse; border: 1px solid #aaaaaa" bordercolor="#f1f1f1">发表评论：</td>
</tr>
<tr>
<td height="13" width="17%">您的称呼-</td>
<td height="13" width="83%"> <input type="text" name="remarker" class="input" size="30" maxlength="30" style="border:1px dotted #cccccc; ">
最多30个字符</td>
</tr>
<tr>
<td width="17%" valign="top">您的意见-<br>
<br> </td>
<td width="83%"> <textarea name="remark" cols="60" rows="6" style="border:1px dotted #cccccc; background-image: url('images/textbg.gif')"></textarea>
<br>
最多225字符 </td>
</tr>
<tr bgcolor="#f3f3f3">
<td colspan="2"> <div align="center">
<input type="submit" name="Submit2" value="确定发表" class="input" onClick="YY_checkform('addremark','remarker','#q','0','称呼必须填写！','remark','1','1','评论内容必须填写！');return document.MM_returnValue">
<input type="reset" name="reset" value="取消重写" class="input">
<input type="hidden" name="soft_id" value="<%=request.querystring("soft_id")%>">
</div></td>
</tr>
<input type="hidden" name="MM_insert" value="true">
</form>
</table>
<br>
</td>
<td width="1" background="images/dotlinev.gif"></td>
<td width="227" align="center" valign="top"><table width="208" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="40" align="right" background="images/znss.gif"><br>
<strong></strong>&nbsp;&nbsp;&nbsp;</td>
</tr>
</table>
<table width="208" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td height="6" background="images/lefttablo_03.gif"></td>
</tr>
<tr>
<td align="center" height="66" class="chinese" background="images/lefttablo_03.gif"><table width="90%" border="0" cellspacing="0" cellpadding="0" align="center">
<form name="form1" method="post" action="">
<tr>
<td align="center" class="chinese"> <select name="select" class="input">
<option value="soft_name" selected>&nbsp;&nbsp;软件名称</option>
<option value="soft_desc">&nbsp;&nbsp;软件描述</option>
</select> <br><input name="keyword2" type="text" class="input" size="14" maxlength="50">
<br> <input type="submit" name="Submit22" value="搜索" class="input">
</td>
</tr>
</form>
</table></td>
</tr>
<tr>
<td valign="bottom"><img src="images/lefttablo_05.gif"></td>
</tr>
</table>
<%
sql1="SELECT top " &topsoftnum& " soft_dcount,soft_rcount,soft_id,soft_name,soft_joindate FROM soft  ORDER BY soft_dcount DESC"
sql2="SELECT top " &newsoft& " soft_id,soft_name,soft_joindate,soft_dcount,soft_rcount FROM soft order by soft_joindate DESC"
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,1,1
set rs2=server.createobject("adodb.recordset")
rs2.open sql2,conn,1,1
if request.querystring("class_id")<>"" or request.querystring("cat_id")<>"" or request.querystring("soft_id")<>"" then
if request.querystring("class_id")="" and request.querystring("cat_id")<>"" then
sql3="SELECT top "&self_topsoftnum&" soft_id,soft_name,soft_joindate,soft_dcount,soft_rcount FROM soft WHERE soft_classid= " &request.querystring("cat_id")& " order by soft_dcount DESC"
elseif request.querystring("class_id")<>"" then
sql3="SELECT top "&self_topsoftnum&" soft_id,soft_name,soft_joindate,soft_dcount,soft_rcount FROM soft WHERE soft_classid= " &request.querystring("class_id")& " order by soft_dcount DESC"
elseif request.querystring("soft_id")<>"" then
sql3="SELECT top "&self_topsoftnum&" soft_id,soft_name,soft_joindate,soft_dcount,soft_rcount FROM soft WHERE soft_classid= " &rs("soft_classid")& " order by soft_dcount DESC"
end if
set rs3=server.createobject("adodb.recordset")
rs3.open sql3,conn,1,1
%>
<table width="208" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="40" align="right" background="images/blxz.gif"><br>
<%=self_topsoftnum%>&nbsp;&nbsp;&nbsp;</td>
</tr>
</table>
<table width="208" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td height="6" background="images/lefttablo_03.gif"></td>
</tr>
<tr>
<td align="center" height="66" class="chinese" background="images/lefttablo_03.gif"><table width="86%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<%do while not rs3.eof%>
<tr>
<td class="chinese">·<a href="showsoft.asp?soft_id=<%=rs3("soft_id")%>" ><%=rs3("soft_name")%></a>&nbsp;&nbsp;<font color="#66CC33"><%=rs3("soft_dcount")%></font>/<font color="#66CC33"><%=rs3("soft_rcount")%></font></td>
</tr>
<%rs3.movenext
loop
if rs3.eof and rs3.bof then%>
<tr>
<td align="center" class="chinese">目前还没有软件程序！</td>
</tr>
<%end if%>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td valign="bottom"><img src="images/lefttablo_05.gif"></td>
</tr>
</table>
<br>
<%
rs3.close
set rs3=nothing
end if
%>
<table width="208" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="40" align="right" background="images/rjxz.gif"><br>
 <%=topsoftnum%>&nbsp;&nbsp;&nbsp;</td>
</tr>
</table>
<table width="208" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td height="6" background="images/lefttablo_03.gif"></td>
</tr>
<tr>
<td align="center" height="66" class="chinese" background="images/lefttablo_03.gif"><table width="86%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td > <table width="100%" border="0" cellspacing="0" cellpadding="0">
<%do while not rs1.eof%>
<tr >
<td class="chinese">·<a href="showsoft.asp?soft_id=<%=rs1("soft_id")%>" ><%=rs1("soft_name")%></a>&nbsp;&nbsp;<font color="#66CC33"><%=rs1("soft_dcount")%></font>/<font color="#66CC33"><%=rs1("soft_rcount")%></font></td>
</tr>
<%rs1.movenext
loop
if rs1.eof and rs1.bof then%>
<tr>
<td align="center" class="chinese">目前还没有软件程序！</td>
</tr>
<%end if%>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td valign="bottom"><img src="images/lefttablo_05.gif"></td>
</tr>
</table>
<br>
<table width="208" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="40" align="right" background="images/rjgx.gif"><br>
 <%=newsoft%>&nbsp;&nbsp;&nbsp;</td>
</tr>
</table>
<table width="208" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td height="6" background="images/lefttablo_03.gif"></td>
</tr>
<tr>
<td align="center" height="66" class="chinese" background="images/lefttablo_03.gif"><table width="86%" border="0" cellspacing="1" cellpadding="0">
<tr>
<td> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<%do while not rs2.eof%>
<tr>
<td class="chinese">·<a href="showsoft.asp?soft_id=<%=rs2("soft_id")%>" ><%=rs2("soft_name")%></a>&nbsp;&nbsp;<font color="#66CC33"><%=rs2("soft_dcount")%></font>/<font color="#66CC33"><%=rs2("soft_rcount")%></font></td>
</tr>
<%rs2.movenext
loop
if rs2.eof and rs2.bof then%>
<tr>
<td align="center" class="chinese">目前还没有软件程序！</td>
</tr>
<%end if%>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td valign="bottom"><img src="images/lefttablo_05.gif"></td>
</tr>
</table>
<IFRAME name="models" marginWidth=0 marginHeight=0 src="about:blank" frameBorder=0 width=0 height=0 scrolling=no framespacing=0></IFRAME>
<%
rs1.close
set rs1=nothing
rs2.close
set rs2=nothing
%>
<br>
</td>
</tr>
<tr>
<td colspan="3" background="images/dotlineh.gif" height="1"></td>
</tr>
</table>
<%
rs.close
set rs=nothing
end sub%>