ipaccess.aspx

来自「LiteBlaster 是一款基于 .NET Framework 原创的 ASP」· ASPX 代码 · 共 130 行

ASPX
130 行
字号 
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="utf-8" Inherits="Auway.LiteBlaster.Pages.Admin_IPAccess" %>
<%@ Import Namespace="Auway.LiteBlaster.Core" %>
<%@ Import Namespace="Auway.LiteBlaster.Enumerations" %>
<%@ Import Namespace="Auway.LiteBlaster.Exceptions" %>
<%@ Import Namespace="Auway.LiteBlaster.Extensions" %>
<%@ Import Namespace="Auway.LiteBlaster.Forum" %>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html><!-- InstanceBegin template="/Templates/admin_main.dwt.aspx" codeOutsideHTMLIsLocked="false" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!-- InstanceBeginEditable name="doctitle" -->
<title>论坛后台管理系统</title>
<!-- InstanceEndEditable -->
<link rel="stylesheet" type="text/css" href="../Skins/Styles/main.css" />
<link rel="stylesheet" type="text/css" href="../Skins/Styles/itemList.css" />
<style type="text/css">
	.input_text{
		border:#999FFF 1px solid;
		width:90%;
	}
	.input_text_sml{
		border:#999FFF 1px solid;
		width:45%;
	}
	.input_select{
		width:60%;
	}
</style>
<script language="javascript" type="text/javascript" src="../Lib/sarissa.js"></script>
<script language="javascript" type="text/javascript" src="../Lib/ajax.js"></script>
<script language="javascript" type="text/javascript" src="../Lib/x/x_core.js"></script>
<script language="javascript" type="text/javascript" src="../Lib/x/x_event.js"></script>
<script language="javascript" type="text/javascript" src="../Lib/main.js"></script>
<script runat="server">
	Private Sub CheckIsAdmin()
		Try
			UserInfo.GetCurrentUser().CheckIsAdmin()
		Catch ex As Exception
			ShowError(ex.Message)
		End Try
	End Sub
	Private Sub CheckIsSuperMaster()
		Try
			UserInfo.GetCurrentUser().CheckIsSuperMaster()
		Catch ex As Exception
			ShowError(ex.Message)
		End Try
	End Sub
	Private Sub ShowError(ByVal ErrorMsg As String)
		Response.Clear()
		Response.Redirect("Error.aspx?msg=" & SharedLib.UrlEncode(ErrorMsg), True)
	End Sub
</script>
<!-- InstanceBeginEditable name="head" -->
<script language="javascript" type="text/javascript" src="../Lib/Admin/ipAccess.js"></script>

<script runat="server">
	Sub Page_Load()
		CheckIsAdmin()
	End Sub
</script>
<!-- InstanceEndEditable -->
</head>

<body>
	<div id="BodyFrame" align="left">
		<div id="BodyFrameInner">
			<!-- InstanceBeginEditable name="Container" -->
			<table class="ListBody" align="center"><tbody><tr><td>
				<table class="ListTable">
					<tbody>
						<tr>
							<td class="ListHeader" width="15%">
								IP
							</td>
							<td class="ListHeader" width="15%">
								用户名
							</td>
							<td class="ListHeader" width="20%">
								访问规则
							</td>
							<td class="ListHeader" width="40%">
								失效时间
							</td>
							<td class="ListHeader">
								操作
							</td>
						</tr>
					</tbody>
					<tbody>
						<tr>
							<td colspan="5" class="ListItemsTd ListItemsTd_style3 txtcenter">
								用户名留空代表全站用户
							</td>
						</tr>
					</tbody>
					<tbody>
						<tr>
							<td class="ListItemsTd ListItemsTd_style2 txtcenter">
								<input id="IPAccessIP" type="text" class="input_text" />
							</td>
							<td class="ListItemsTd ListItemsTd_style1 txtcenter">
								<input id="IPAccessUserName" type="text" class="input_text" />
							</td>
							<td class="ListItemsTd ListItemsTd_style2 txtcenter">
								<select id="IPAccessAccessType" class="input_select">
									<option value="0">可信任</option>
									<option value="1">绑定</option>
									<option value="2">拒绝</option>
								</select>
							</td>
							<td class="ListItemsTd ListItemsTd_style1 txtcenter">
								<input id="IPAccessExpireInHours" type="text" class="input_text_sml" value="0" />
								小时后失效(非正代表无限期)
							</td>
							<td class="ListItemsTd ListItemsTd_style2 txtcenter">
								<input type="button" value="添加" onClick="addIPAccess();" />
							</td>
						</tr>
					</tbody>
				</table>
				<div id="IPAccessList"><%=GenerateIPAccessItemsHtml() %></div>
			</td></tr></tbody></table>
			<!-- InstanceEndEditable -->
		</div>
	</div>
</body>
<!-- InstanceEnd --></html>

ipaccess.aspx - 源码说明

本页面展示了「LiteBlaster 是一款基于 .NET Framework 原创的 ASP.NET 论坛系统。后台程序库采用 C#/VB.NET 编写」中的 ipaccess.aspx 源码文件，采用 ASPX 编程语言编写，共 130 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与ASP.NET相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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