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

📄 setsearch.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">
<!--

var HasChanged;

function Save() {
	parent.window.returnValue = "1," + GetItems() + "|" + GetMultipleItems();
	parent.window.close();
}

function HasChange() {
	HasChanged=true;
}

function GetItems() 
{
	var AllItems,Items;
	var chk;
	Items=""
	AllItems=frmData.AllItems.value.split(",");
	if(AllItems.length>0)
	{
		for (i = 0; i <= AllItems.length-1; i++)
		{
			eval("chk=frmData.Fld"+JTrim(AllItems[i])+".status");
			if(chk==true)
			{
				Items=Items + "," + JTrim(AllItems[i]);
			}
		}
		if(Items.length>0)
			Items=Items.substr(1,Items.length-1);
	}
	return(Items);
}

function GetMultipleItems() 
{
	var AllItems,Items;
	var chk;
	Items=""
	AllItems=frmData.AllSelectItems.value.split(",");
	if(AllItems.length>0)
	{
		for (i = 0; i <= AllItems.length-1; i++)
		{
			eval("chk=frmData.Fld"+JTrim(AllItems[i])+"SelectMode.selectedIndex");
			if(chk==1)
			{
				Items=Items + "," + JTrim(AllItems[i]);
			}
		}
		if(Items.length>0)
			Items=Items.substr(1,Items.length-1);
	}
	return(Items);
}

function window_onload() {
	window.parent.document.all['btnSave'].disabled =false;
	window.parent.document.all['btnCancel'].disabled =false;
}

//-->
</script>
<%
	dim WExcel
	set WExcel=server.CreateObject("WExcel.Report")
	dim SheetID,ReportID,SearchID
	dim strBody,CurItems,MultiSelectItems,AllItems,AllSelectItems
	CurItems=Request.QueryString  ("CurItems")
	MultiSelectItems=Request.QueryString("MultiSelectItems")
	SheetID=Request.Cookies("Report")("SheetID")
	ReportID=Request.Cookies("Report")("ReportID" & SheetID)
	SearchID=Request.Cookies("Report")("SearchID" & SheetID & "-" & ReportID)
	WExcel.GetSearchSettingPage cint(UserID),cint(SheetID),cint(ReportID),cint(SearchID),cstr(CurItems),cstr(MultiSelectItems),strBody,AllItems,AllSelectItems
	CheckErr
%>

<html>
	<head>
		<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
	</head>
	<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" LANGUAGE=javascript onload="return window_onload()">
		<form METHOD="post" name="frmData">
			<table width="100%" border=0 align="center">
				<tr>
					<%=strBody%>
				</tr>
			</table>
			<input TYPE="hidden" NAME="AllItems" value="<%=AllItems%>">
			<input TYPE="hidden" NAME="AllSelectItems" value="<%=AllSelectItems%>">
		</form>
	</body>                                                                                                           
</html>

⌨️ 快捷键说明

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