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

📄 uselog.asp

📁 易方4.0程序+邮局接口+序列号+销售系统
💻 ASP
字号:
<!-- #include file="../inc_config.asp" -->
<!-- #include file="LoginCk.asp" -->
<%
Call PopCheck(12)
if Cmd="Del" then
	call Conn.Delete("EfangAdminLog")
	Call WriteLog("删除日志 - "&Request.ServerVariables("REMOTE_ADDR") )
End if
%>
<html>
<head>
<title>系统日志</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link id="style_sheet" href="css/save.css" type="text/css" rel="stylesheet">
	<script language="JavaScript">style_sheet.href = parent.parent.style_sheet.href;</script>
<%=Efs_Cfg_PHeader%>
</head>
<script language="JavaScript" src="js/common_Efang.js"></script>
	<body class="NormalPage">
	<form id="form_help" action="help_content.asp" method="get" target="working_area">
		<input name="help_topic" type="hidden" value="查看系统日志">
	</form>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
	<tr>
		<td id="headerToolBar" valign="middle" nowrap style="width:100%; height:22px;"><table cellpadding="0" cellspacing="0" class="HeaderPageControl">
				<tr>
					<td align="left" valign="middle" nowrap height="20">系统设置&gt;&gt; 系统参数设置 &gt;&gt; <b></b><b>查看系统日志</b></td>
					<td align="center" valign="middle" nowrap width="10" height="20"></td>
					<td align="right" valign="middle" width="100%" nowrap height="20"></td>
					<td align="center" valign="middle" nowrap width="10" height="20"></td>
					<td align="right" valign="middle" width="60" nowrap height="20"><img id="id_back" alt="返回上一页" onclick="JavaScript:history.back()" onmouseover="JavaScript:this.src=imgBackUp.src" onmouseout="JavaScript:this.src=imgBackDown.src" src="images/toolbar_back.gif" border="0" style="cursor:hand;width:22px; height:20px;"><img id="id_refresh" alt="刷新" onclick="JavaScript:fn_Refresh()" onmouseover="JavaScript:this.src=imgRefreshUp.src" onmouseout="JavaScript:this.src=imgRefreshDown.src" src="images/toolbar_refresh.gif" border="0" style="cursor:hand;width:22px; height:20px;"></td>
					<td align="right" valign="middle" width="25" nowrap height="20"><img id="id_locate" alt="帮助" onclick="JavaScript:fn_ShowHelp()" onmouseover="JavaScript:this.src=imgHelpUp.src" onmouseout="JavaScript:this.src=imgHelpDown.src" src="images/toolbar_help.gif" border="0" style="cursor:hand;width:22px; height:20px;"></td>
				</tr>
		</table></td>
	</tr>
	<tr>
		<td valign="top">
			<div id="viewPanel" style="visibility:visible; position:absolute; overflow:auto;">
				
		      <br>
		      <table width="85%" border="0" align="center" cellPadding="0" cellSpacing="0" class="datalist">
		
          <th width="9%" height="22" align="center" nowrap class="DataListHeader">序号</th>
          <th width="19%" align="center" nowrap class="DataListHeader">操作者帐号</th>
          <th width="49%" align="center" nowrap class="DataListHeader">操作内容</th>
          <th width="23%" align="center" nowrap class="DataListHeader">时间</th>
       
        <%
Set LogData=Conn.Query("EfangAdminLog","Order By ALog_CTime DESC")
Do while not (LogData.EOF or LogData.BOF)
%>
        <tr> 
          <td width="9%" height=25 align="center" nowrap class="DataListGrid"> <%
TmXu=TmXu+1
Response.Write TmXu
%> </td>
          <td width="19%" align="center" nowrap class="DataListGrid"><%=LogData("ALog_User")%></td>
          <td width="49%" align="center" nowrap class="DataListGrid"><%=LogData("ALog_Handle")%><%=EFang.GbLeft(LogData("ALog_Handle"),40)%> </td>
          <td width="23%" align="center" nowrap class="DataListGrid"><%=Mid(LogData("ALog_CTime"),3)%></td>
        </tr>
        <%
LogData.movenext 
Loop
Set LogData=Nothing
%>
			  </table>
		  </div>
		</td>
	</tr>
</table>
<% Call ExitEnd(False) %>
</body>
<script language="JavaScript">
<!--
	document.parentWindow.onresize = fn_RejustViewPanel ;
	fn_RejustViewPanel ( ) ;
	//alert ( document.body.clientWidth + ":" + viewPanel.clientWidth ) ;
//-->
</script>
</html>

⌨️ 快捷键说明

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