编程教程
你的位置: 中国个人站长站 -- 网络编程 -- ASP教程 -- 教程正文 跟我学做留言本(三)
推荐位

跟我学做留言本(三)

中国个人站长站 ASP教程 点击数: 更新时间:2007-8-24 14:31:56
;/option>"
else
response.write "<option >" &i&"</option>"
end if
next
%>
</select>

<%
if page=totalpage then
response.write ("【下页】【尾页】")
else
response.write ("【<a href=index.asp?page=" & page+1 & str & ">下页</a>】")
response.write ("【<a href=index.asp?page=" & totalpage & str& ">尾页</a>】")
end if%>
</td>
</form>
</tr>
</tbody>
</table>
<br>
<%
for i=1 to perpage
if not rs.eof then
%>
<TABLE cellSpacing=1 cellPadding=3 width=650 bgColor=#000000>
<TBODY>
<TR bgColor=#ffffff>
<TD class=table001 vAlign=top width=120 rowSpan=2>
<CENTER>
<TABLE class=jnfont7>
<FONT color=#ffffff><%=rs("user_name")%></FONT> <TBODY></TBODY>
</TABLE>
<IMG src="<%=rs("user_face")%>" border=0 width="82" height="90"> <BR>
来自- <%=rs("user_from")%>
</CENTER>
</TD>
<TD class=table002 style="WORD-BREAK: break-all" vAlign=top width=530
height=105>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border="0">
<TBODY>
<TR>
<TD width=26><IMG height=24 src="images/post.gif" width=24></TD>
<TD>留言内容:
<%if rs("user_email")<>"" then%>
<A title="给<%=rs("user_name")%>发信" href="mailto:<%=rs("user_email")%>">
<IMG height=16 src="images/email.gif" width=16 border=0>信箱</A>
<%end if%>
<%if rs("user_http")<>"" then%>
<A title="访问<%=rs("user_name")%>的主页" href=<%=rs("user_http")%> target=_blank >
<img height=16 src="images/homepage.gif"
width=16 border=0>主页</a>
<%end if%>
<%if rs("user_oicq")<>"" then%>
<A title="<%=rs("user_name")%>的QQ号码:
<%=rs("user_oicq")%>"
href="http://search.tencent.com/cgi-bin/friend/user_show_info?ln=<%=rs("user_oicq")%>"
target=_blank>
<IMG height=16 src="images/oicq.gif" width=16 border=0><%=rs("user_oicq")%></A>
<%end if%>
<IMG height=15 alt="<%=rs("user_ip")%>" src="images/ip.gif" width=16>
<%=rs("user_ip")%> </TD>
<TD width=80 align="center">第 <%=i+(page-1)*perpage%> 条 <a href="#top" title=回顶部>∧</a></TD>
</TR>
</TBODY>
</TABLE>
<HR SIZE=1>
<%=rs("user_ly")%> </TD>
</TR>
<TR class=table001>
<TD height=13 align="right">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<%if session("lybmanage")<>"" then
response.write "<a href='index.asp?action=delete&id="&rs("user_id")&"'>

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] 下一页

教程录入:swh    责任编辑:swh 
个人站长站与你风雨同舟!
本站所提供的资源均来源于互联网,如有侵权行为,请与本站管理员联系,我们会第一时间删除!
·如果您发现《跟我学做留言本(三)》文章有错误,也请通知我们修改!
联系邮箱chinageren#126.com,谢谢支持!
站内搜索:
广告服务 | 友情链接 | 联系我们 | 免责声明 | 用户留言 | 网站导航
版权所有:中国个人站长站 2007-2008 未经授权禁止复制或建立镜像 客服QQ号:112731235
copyright © 2007-2008 www.ChinaGeRen.com online services. all rights reserved. 苏ICP备05000059号