留言簿-后台管理-退出

以下留言只代表网友个人观点,不代表本站观点!    立即发表留言
公告:<%=webtake%>
<% strSourceFile = Server.MapPath("Word.xml") Set objXML = Server.CreateObject("Microsoft.FreeThreadedXMLDOM") objXML.load(strSourceFile) Set objRootsite = objXML.documentElement.selectSingleNode("guestbook") %> <% '每页显示*条留言 PageSize = cint(""&num&"") '获取子节点数据(因为是从节点数从0开始的所最大子节点数要减1) AllNodesNum = objRootsite.childNodes.length - 1 '算出总页数 PageNum = AllNodesNum\PageSize + 1 PageNo = cint(Request.querystring("PageNo")) '如果是每一次获得页面则定位到每一页显示最新的留言 if PageNo="" or PageNo="0" then PageNo = 1 end if '获得起始节点 StarNodes = AllNodesNum - (PageNo - 1)*PageSize '获得结束节点 EndNodes = StarNodes - PageSize + 1 if EndNodes < 0 then EndNodes = 0 end If '判断起始节点数是否超过总的节点数 if StarNodes > AllNodesNum then '如果超过则结束节点要减去(StarNodes-AllNodesNum)的差值否则下标会超界出错 EndNodes=EndNodes-(StarNodes-AllNodesNum) StarNodes=AllNodesNum end if if EndNodes < 0 then EndNodes=0 end if while StarNodes >= EndNodes id=objRootsite.childNodes.item(StarNodes).childNodes.item(0).text name=objRootsite.childNodes.item(StarNodes).childNodes.item(1).text content=objRootsite.childNodes.item(StarNodes).childNodes.item(2).text reply=objRootsite.childNodes.item(starNodes).childNodes.item(3).text jtime=objRootsite.childNodes.item(starNodes).childNodes.item(4).text ip=objRootsite.childNodes.item(starNodes).childNodes.item(5).text ip=split(ip,".") uip=ip(0)&"."&ip(1)&"."&ip(2)&".*" %> <% StarNodes = StarNodes - 1 wend set objXML = nothing %>
<%=name%>   IP:<%=uip%>   <%=jtime%>   回复留言   删除留言
<%=content%><% if reply <> "" then response.write("
管理员回复:"&reply) end if%>
  留言<%=AllNodesNum+1%>条(每页<%=PageSize%>条) <%if pageno <> 1 then%> 首页 上一页 | <%else%> 首页 上一页 | <%end if%> <%if pageno <> pagenum then%> 下一页 尾页 <%else%> 下一页 尾页 <%end if%>
签写留言
称昵:
内容:
  • 请自觉遵守:爱国、守法、自律、真实、文明的原则
  • 尊重网上道德,遵守《全国人大常委会关于维护互联网安全的决定》及中华人民共和国其他各项有关法律法规
  • 承担一切因您的行为而直接或间接导致的民事或刑事法律责任
  • 本站管理人员有权保留或删除其管辖留言中的任意内容
  • 您在本站讨论板发表的作品,本站有权在网站内转载或引用
  • 参与本留言即表明您已经阅读并接受上述条款

Copyright © 2005 <%=weburl%> All Rights Reserved.
<%=webname%> 版权所有 Power By: 530mp3