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

📄 historyframe.asp

📁 学生档案与成绩管理(1)学生档案管理:记录每个学生的档案信息
💻 ASP
字号:
<!-- #include file = "../include/asphead.asp" -->
<!-- #include file = "../include/function.asp" -->
<%CheckUser()%>
<link href="../include/main.css" rel="stylesheet" type="text/css">
<script src="../include/function.js" type="text/javascript"></script>
<script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--
function GoToView()
{
	document.frmData.target ="_self";
	document.frmData.action="view.asp?SheetAndRowID="+frmData.SheetID.value+JoinChar+frmData.RowID.value+JoinChar+frmData.RowIDs.value;
	document.frmData.submit();
}
function GoToEdit()
{
	document.frmData.target ="_self";
	document.frmData.action="edit.asp?SheetAndRowID="+frmData.SheetID.value+JoinChar+frmData.RowID.value+JoinChar+frmData.RowIDs.value;
	document.frmData.submit();
}
function GoToRefDetail()
{
	document.frmData.target ="_self";
	document.frmData.action="refdetail.asp?SheetAndRowID="+frmData.SheetID.value+JoinChar+frmData.RowID.value+JoinChar+JoinChar+frmData.RowIDs.value;
	document.frmData.submit();
}

function PrintThisPage()
{
	var curPageBody,PrintBody;
	curPageBody=window.document.body.innerHTML;
	PrintBody=RemoveNoPrint(curPageBody);
	window.document.body.innerHTML=PrintBody;
	window.print();
	window.document.body.innerHTML=curPageBody;
}

function Cancel()
{
	parent.window.close();
}

function ChgField()
{
	document.frmData.target ="_self";
	document.frmData.action="historyframe.asp?SheetAndRowID="+frmData.SheetID.value+JoinChar+frmData.RowID.value+JoinChar+frmData.RowIDs.value+"&FieldID=" + FieldID.value ;
	document.frmData.submit();
}


//-->
</script>
<%

	dim WExcel
	set WExcel=server.CreateObject("WExcel.Sheet")

	dim SheetAndRowID,Parts,SheetID,RowID,RowIDs
	SheetAndRowID=Request.QueryString("SheetAndRowID")
	Parts=split(SheetAndRowID,JoinChar)
	SheetID=Parts(0)
	RowID=Parts(1)
	RowIDs=""
	if(ubound(Parts)>=2) then 
		RowIDs=Parts(2) 
	end if

	dim FieldID
	FieldID=Request.QueryString("FieldID")
	if FieldID="" then
		FieldID=Request.Cookies("Sheet")("HistoryField" & SheetID)
	end if
	if FieldID="" then
		FieldID=0
	end if

	dim FieldList
	FieldList=WExcel.GetFieldOption(cint(UserID),cint(SheetID),cint(FieldID),clng(RowID))
	dim HasRefDetail
	HasRefDetail=WExcel.HasRefDetail(cint(UserID),cint(SheetID))
	CheckErr

%>
<html>
	<head>
		<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
	</head>
	<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
	<%if HasRefDetail then%>
		<table width="100%" border=0 cellPadding=0 cellSpacing=0>
			<tr height=5>
				<td colspan="11">
			</tr>
			<tr>
				<td height=1 rowspan="3" valign="bottom" width="8%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>

				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/leftoff.gif" width=11></td>
				<td height=1 valign="center" width="10%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/rightoff.gif" width=11></td>

				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/leftoff.gif" width=11></td>
				<td height=1 valign="center" width="10%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/rightoff.gif" width=11></td>

				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/leftoff.gif" width=11></td>
				<td height=1 valign="center" width="10%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/rightoff.gif" width=11></td>

				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/lefton.gif" width=11></td>
				<td height=1 valign="center" width="10%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/righton.gif" width=11></td>

				<td height=1 rowspan="2" width="47%">
					<!--NoPrintStart-->
					<p align=right>
						<input id="btnPrint" type="button" value="打印" name="btnPrint" title="打印此页面" style="cursor:hand; WIDTH: 70px; HEIGHT: 20px" LANGUAGE="javascript" onclick="return PrintThisPage()">&nbsp;
					</p>
					<!--NoPrintEnd-->
				</td>
			</tr>
			<tr>
				<td height=20 valign=bottom bgcolor="#E0E0E0" style="cursor:hand" onclick="return GoToView();">预览</td>
				<td height=20 valign=bottom bgcolor="#E0E0E0" style="cursor:hand" onclick="return GoToRefDetail();">子表</td>
				<td height=20 valign=bottom bgcolor="#E0E0E0" style="cursor:hand" onclick="return GoToEdit();">修改</td>
				<td height=20 valign=bottom>历史</td>
			</tr>
			<tr>
				<td height=1 rowspan="3" valign="bottom"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" valign="bottom"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" valign="bottom"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td></td>
				<td height=1 valign="bottom"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
			</tr>
		</table>
	<%else%>
		<table width="100%" border=0 cellPadding=0 cellSpacing=0>
			<tr height=5>
				<td colspan="11">
			</tr>
			<tr>
				<td height=1 rowspan="3" valign="bottom" width="10%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>

				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/leftoff.gif" width=11></td>
				<td height=1 valign="center" width="10%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/rightoff.gif" width=11></td>

				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/leftoff.gif" width=11></td>
				<td height=1 valign="center" width="10%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/rightoff.gif" width=11></td>

				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/lefton.gif" width=11></td>
				<td height=1 valign="center" width="10%"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" width="1%"><IMG height=22 src="../images/righton.gif" width=11></td>

				<td height=1 rowspan="2" width="54%">
					<!--NoPrintStart-->
					<p align=right>
						<input id="btnPrint" type="button" value="打印" name="btnPrint" title="打印此页面" style="cursor:hand; WIDTH: 70px; HEIGHT: 20px" LANGUAGE="javascript" onclick="return PrintThisPage()">&nbsp;
					</p>
					<!--NoPrintEnd-->
				</td>
			</tr>
			<tr>
				<td height=20 valign=bottom bgcolor="#E0E0E0" style="cursor:hand" onclick="return GoToView();">预览</td>
				<td height=20 valign=bottom bgcolor="#E0E0E0" style="cursor:hand" onclick="return GoToEdit();">修改</td>
				<td height=20 valign=bottom>历史</td>
			</tr>
			<tr>
				<td height=1 rowspan="3" valign="bottom"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td height=1 rowspan="3" valign="bottom"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
				<td></td>
				<td height=1 valign="bottom"><IMG height=1 src="../images/promptline.gif" width="100%"></td>
			</tr>
		</table>
	<%end if%>
		<table width="100%" border=0 CELLSPACING=0 CELLPADDING="0">
			<tr height=10>
				<td colspan=5></td>
			</tr>
			<tr>
				<td colspan=5>
					<table width=99% cellspacing=1 bgcolor=999999>
						<tr>
							<td bgcolor=white width="10%">
								<p align="center">操作者</p>
							</td>
							<td bgcolor=white width="11%">
								<p align="center">操作类型</p>
							</td>
							<td bgcolor=white width="19%">
								<p align="center">操作时间</p>
							</td>
							<td bgcolor=white width="18%">
								<p align="center">
									<select name="FieldID" style="width:105px;" LANGUAGE="javascript" onchange="return ChgField()">
										<%=FieldList%>
									</select>
								</p>
							</td>
							<td bgcolor=white width="21%">
								<p align="center">旧值</p>
							</td>
							<td bgcolor=white width="21%">
								<p align="center">新值</p>
							</td>
						</tr>						
					</table>
				</td>
			</tr>
			<tr height=5>
				<td colspan=5></td>
			</tr>
			<tr height=310>
				<td colspan=5>
					<iframe id="WorkArea" name="WorkArea" style="visibility:visible" width="100%" height="100%" frameborder="0" src="history.asp?SheetAndRowID=<%=SheetAndRowID%>&FieldID=<%=FieldID%>">
					</iframe>
				</td>
			</tr>
			<!--NoPrintStart-->
			<tr height=40 valign=bottom>
				<td colspan=5><input id="btnCancel" type="button" value="关闭" name="btnCancel" style="cursor:hand; WIDTH: 50px; HEIGHT: 24px" LANGUAGE="javascript" onclick="return Cancel()"></td>
			</tr>
			<!--NoPrintEnd-->
		</table>
		<form METHOD="post" name="frmData">
			<input TYPE="hidden" NAME="SheetID" value="<%=SheetID%>">
			<input TYPE="hidden" NAME="RowID" value="<%=RowID%>">
			<input TYPE="hidden" NAME="RowIDs" value="<%=RowIDs%>">
		</form>
	</body>                                                                                                           
</html>

⌨️ 快捷键说明

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