⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 admin_guestbook.aspx

📁 ASP_NET程序设计教程 源代码 冶金工业出版社 肖金秀 冯沃辉　陈少涌
💻 ASPX
字号:
🔍 
<% @ Import Namespace="Packaging" %>
<% @ Import Namespace="System.Data" %>
<% @ Import Namespace="System.Xml" %>
<% @ Register TagPrefix="pb" TagName="Header" Src="header.ascx" %>
<% @ Register TagPrefix="pb" TagName="Footer" Src="footer.ascx" %>
<% @ Register TagPrefix="pb" TagName="Login" Src="login.ascx" %>
<% @ Register TagPrefix="pb" TagName="admin" Src="admin.ascx" %>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<title>Dot.Net管理区！</title>
<script language="JavaScript">
<!--
function openwin(url,w,h) {
	window.open(url,"","top=50,left=150,height="+h+",width="+w+",toolbar=0,location=0,directories=0,menubar=0,scrollbars=0,resizable=yes,status=0");
}
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
<link rel="stylesheet" type="text/css" href="pack.css">
</head>

<body topmargin="6" leftmargin="0" bgcolor="#eaeaea">

<form runat="server">

<pb:Header id="Header" runat="server" />

<div align="center">
<table border="0" cellpadding="0" cellspacing="1" bgColor="#006699" width="750" height="125">
	<tr><td width="25%" valign="top" background="images/bd.gif" rowspan="2" height="125">
	<pb:admin id="admin" runat="server" />
	<pb:Login id="login" runat="server" />
	</td>
	<td width="50%" valign="top" bgcolor="#FFFFFF" align="center">
	<table border="0" cellpadding="0" cellspacing="0" width="100%">
		<tr><td width="100%" height="67"><font color="#FF0000">留言簿管理</font><br>
		<img border="0" src="images/line.gif" width="400" height="12"></td></tr>
	</table>
<asp:label id="mes" runat="server" />
<asp:Repeater id="guestbook" runat="server" visible="true">
	<HeaderTemplate>
	<table border="0" cellpadding="0" cellspacing="0" width="100%">
		<tr><td width="100%" height="15" align="center">
		<table border="0" cellpadding="0" cellspacing="0" width="93%" >
	</HeaderTemplate>
	<ItemTemplate>
			<tr><td width="100%" background="images/bar2.gif" height="20">&nbsp;
			<font color="#FFFFFF"><b><%# DataBinder.Eval(Container.DataItem, "GuestTitle") %></b></font> &nbsp; 
			<a href=# onClick="openwin('admin_deleteguest.aspx?id=<%# DataBinder.Eval(Container.DataItem, "GuestId") %>',100,50)">删除</a></td></tr>
			<tr><td width="100%"><%# DataBinder.Eval(Container.DataItem, "GuestContent") %></td></tr>
			<tr><td width="100%">
			<p align="right"><a href="mailto:
			<%# DataBinder.Eval(Container.DataItem, "GuestEmail") %>">
			<%# DataBinder.Eval(Container.DataItem, "GuestName") %> </a>发表于
			<%# DataBinder.Eval(Container.DataItem, "GuestTime") %><br>
			来自: <%# DataBinder.Eval(Container.DataItem, "GuestIP") %></td></tr>
	</ItemTemplate>
	<FooterTemplate>
		</table>
		</td></tr>
	</table>
	</FooterTemplate>
</asp:Repeater>

	<table border="0" cellpadding="0" cellspacing="0" width="100%">
		<tr><td width="100%" align="center">&nbsp;<br>
		<input type="hidden" id="pagenow" runat="server" value="1">
		<asp:LinkButton id="toFirst" text="转到第一页" runat="server" onClick="toFirst_OnClick" />&nbsp;
		<asp:LinkButton id="prepage" text="上一页" runat="server" onClick="prepage_OnClick" />&nbsp;
		<asp:LinkButton id="nextpage" text="下一页" runat="server" onClick="nextpage_OnClick" /></td></tr>
	</table>
	</td>
	<td width="25%" valign="top" background="images/db.gif" align="right" rowspan="2" height="125">&nbsp;
	</td></tr>
	<tr><td width="50%" valign="bottom" bgcolor="#FFFFFF" height="80" align="right">
	<img border="0" src="images/pen.gif" width="400" height="80"><br>&nbsp;</td></tr>
</table>
</div>

<pb:Footer id="footer" runat="server" />

</form>

</body>

</html>

<script language="VB" runat="server">

	Dim PageSize As Integer
	Dim CurP As Integer
	Dim TotalPage As Integer

	Sub Page_Load(Sender As Object, e As EventArgs)

		If Not Request.IsAuthenticated Then
			Response.Redirect("login.aspx")
		End If

		Dim CounterXml As String=ConfigurationSettings.AppSettings("CounterXml")
		Dim objXml As XMLDocument=New XMLDocument()
		objXml.Load(CounterXml)
		Dim objRootSite As XMLNode
		objRootSite=objXml.documentElement.SelectSingleNode("admin")
		Dim j As Integer
		Dim flag As Boolean=false
		For j=0 To objRootSite.ChildNodes.Count-1
			If objRootSite.ChildNodes.Item(j).InnerText=Context.User.Identity.Name Then
				flag=true
			End If
		Next
		If Not flag Then
			Response.Redirect("admin.aspx")
		End If

		PageSize=10
		CurP=CInt(pagenow.value)
		RefreshGuest
	End Sub

	Sub toFirst_OnClick(Sender As Object, e As EventArgs)
		CurP=1
		pagenow.value="1"
		RefreshGuest
	End Sub

	Sub prepage_OnClick(Sender As Object, e As EventArgs)
		If CurP>1 Then
			CurP-=1
		Else
			CurP=1
		End If
		pagenow.value=CurP.ToString()
		RefreshGuest
	End Sub

	Sub nextpage_OnClick(Sender As Object, e As EventArgs)
		If CurP<TotalPage Then
			CurP+=1
		Else
			CurP=TotalPage
		End If
		pagenow.value=CurP.ToString()
		RefreshGuest
	End Sub

	Sub RefreshGuest
		Dim MyGuest As GuestDB=New GuestDB()

		Dim MyDV As DataView=MyGuest.GetGuest1(CurP,PageSize,TotalPage)
		guestbook.DataSource=MyDV
		guestbook.DataBind()

		If CurP=1 Then
			prepage.Visible=false
			toFirst.Visible=false
		Else
			prepage.Visible=true
			toFirst.Visible=true
		End If
		If CurP=TotalPage Then
			nextpage.Visible=false
		Else
			nextpage.Visible=true
		End If
	End Sub

</script>
<style>
td {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	font-size : 10pt;
}
.whiteB {
	color: white;
	font-weight : bold;
}
input {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	font-size : 10pt;
}
td.bar {
	color: green; font-weight: bold;
}
a.whiteLink:link {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	font-weight : bold;
	color : white;
	text-decoration : none;
}
a.whiteLink:visited {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	font-weight : bold;
	color : white;
	text-decoration : none;
}
a.whiteLink:hover {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	font-weight : bold;
	color : white;
	text-decoration : none;
}
a.barLink:link {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	color : #CCFF99;
	text-decoration : none;
}
a.barLink:visited {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	color : #CCFF99;
	text-decoration : none;
}
a.barLink:hover {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	color : #CCFF99;
	text-decoration : underline;
}
a.author:link {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	color : black;
	text-decoration : none;
}
a.author:visited {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	color : black;
	text-decoration : none;
}
a.author:hover {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	color : black;
	text-decoration : underline;
}
</style>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -