ASP 留言板的留言数据用什么控件显示好?怎么弄啊?还有分页。。
5个回答
展开全部
留言板上网上找个 文本编辑器什么的都行。 分页代码如下:
<%
set rs=Server.CreateObject("adodb.recordset")
sql="select * from list where types='"& types &"'" & tj2 &" order by tjtime desc"
rs.open sql,conn,1,1
k=1
Rs.pagesize=20
zsj=rs.recordcount
Total=rs.pagecount
page=int(request("page"))
If page<=1 then page=1
If request("page")="" then page=1
If page>total then page=total
Rs.absolutepage=page
For i=1 to rs.pagesize
If rs.eof then Exit for
%>
<table>
<tr>
<td align="center"><input name="aID" type="checkbox" id="aID" value="<%=rs("id")%>"></td>
<td height="21" align="center"><%=k%></td>
<td align="left"> <a href="<%=top_link & "&id=" & rs("id")%>" target="_blank"><%=sub_(rs("title"),45)%></a></td>
<td align="center"><a href="list_.asp?id=<%=rs("id")%>&types=<%=types%>">修改</a> | <a style="cursor:hand;" onClick="location='?Action=tj&id=<%=rs("id")%>&types=<%=types%>'">推荐</a> | <a style="cursor:hand;" onClick="if(confirm('确定删除?')){location='?Action=Delete&id=<%=rs("id")%>&types=<%=types%>'}">删除</a></td></tr>
<%
Rs.movenext
k=k+1
Next
rs.close
%>
</table>
<table width="90%" border="0" cellspacing="0" cellpadding="0"><tr><td height="33" align="center" valign="middle">
第<%=page%>/<%=total%>页
<%if page>1 then%><a href="?Page=1&types=<%=types%>&ss_title=<%=ss_title%>"><%end if%>首页</a>
<%if page>1 then%><a href="?Page=<%=page-1%>&types=<%=types%>&ss_title=<%=ss_title%>"><%end if%>上一页</a>
<%if page<>total then%><a href="?Page=<%=page+1%>&types=<%=types%>&ss_title=<%=ss_title%>"><%end if%>下一页</a>
<%if page<>total then%><a href="?Page=<%=total%>&types=<%=types%>&ss_title=<%=ss_title%>"><%end if%>尾页</a>
共<font color="#FF0000"><%=zsj%></font>条信息
</td></tr></table>
<%
set rs=Server.CreateObject("adodb.recordset")
sql="select * from list where types='"& types &"'" & tj2 &" order by tjtime desc"
rs.open sql,conn,1,1
k=1
Rs.pagesize=20
zsj=rs.recordcount
Total=rs.pagecount
page=int(request("page"))
If page<=1 then page=1
If request("page")="" then page=1
If page>total then page=total
Rs.absolutepage=page
For i=1 to rs.pagesize
If rs.eof then Exit for
%>
<table>
<tr>
<td align="center"><input name="aID" type="checkbox" id="aID" value="<%=rs("id")%>"></td>
<td height="21" align="center"><%=k%></td>
<td align="left"> <a href="<%=top_link & "&id=" & rs("id")%>" target="_blank"><%=sub_(rs("title"),45)%></a></td>
<td align="center"><a href="list_.asp?id=<%=rs("id")%>&types=<%=types%>">修改</a> | <a style="cursor:hand;" onClick="location='?Action=tj&id=<%=rs("id")%>&types=<%=types%>'">推荐</a> | <a style="cursor:hand;" onClick="if(confirm('确定删除?')){location='?Action=Delete&id=<%=rs("id")%>&types=<%=types%>'}">删除</a></td></tr>
<%
Rs.movenext
k=k+1
Next
rs.close
%>
</table>
<table width="90%" border="0" cellspacing="0" cellpadding="0"><tr><td height="33" align="center" valign="middle">
第<%=page%>/<%=total%>页
<%if page>1 then%><a href="?Page=1&types=<%=types%>&ss_title=<%=ss_title%>"><%end if%>首页</a>
<%if page>1 then%><a href="?Page=<%=page-1%>&types=<%=types%>&ss_title=<%=ss_title%>"><%end if%>上一页</a>
<%if page<>total then%><a href="?Page=<%=page+1%>&types=<%=types%>&ss_title=<%=ss_title%>"><%end if%>下一页</a>
<%if page<>total then%><a href="?Page=<%=total%>&types=<%=types%>&ss_title=<%=ss_title%>"><%end if%>尾页</a>
共<font color="#FF0000"><%=zsj%></font>条信息
</td></tr></table>
展开全部
有时间能解决你的题目
ASP 留言板 我们可以根据本要求提供一份相当于学生水平的代码
为获取帮助,你需要告诉我们合法的Email地址。
您可以凭借Baiduhi联系我们
6 | ES:\\6E5E9F04B66D74AA33F281E82410A501
5 | 交易提醒:预付定金有风险
7 |
1 | 北京易软个人软件
5 | 全职软件开发团队
6 | 十年信誉铸成品质
1 | 速度专业积累效率
5 | 开发MIS系统更有优惠
ASP 留言板 我们可以根据本要求提供一份相当于学生水平的代码
为获取帮助,你需要告诉我们合法的Email地址。
您可以凭借Baiduhi联系我们
6 | ES:\\6E5E9F04B66D74AA33F281E82410A501
5 | 交易提醒:预付定金有风险
7 |
1 | 北京易软个人软件
5 | 全职软件开发团队
6 | 十年信誉铸成品质
1 | 速度专业积累效率
5 | 开发MIS系统更有优惠
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
就html代码输出就行了
用现成的分页控件,网上找
用现成的分页控件,网上找
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
xml
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询