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

📄 popselect.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() {
	if(LocalDC()==true)
	{
		parent.window.returnValue = "1," + GetItems();
		parent.window.close();
	}
}

function HasChange() {
//	HasChanged=true;	//pop式窗口,没必要提示保存
}

function LocalDC()
{
	var chk;
	var Items;
	Items=""
	if(parent.frmData.Limit[1].status==true)
	{
		if(ItemCount>0)
		{
			for (i = 0; i <= ItemCount-1; i++)
			{
				eval("chk=frmData.Item"+JTrim(ItemID[i])+".status");
				if(chk==true)
				{
					Items=Items + "," + JTrim(ItemID[i]);
				}
			}
		}
		if(Items.length>0)
		{
			if(Items.length>255) 
			{
				alert("您选择的项太多,请适当减少(通常只能容纳80个左右)。")
				return(false);
			}
			else
				return(true);	
		}
		else
		{
			alert("您未选择任何允许的选项,请选择。")
			return(false);
		}
	}
	return(true);	
}
function GetItems() 
{
	var Items,Captions;
	var chk;
	Items=""
	Captions=""
	if(parent.frmData.Limit[1].status==true)
	{
		if(ItemCount>0)
		{
			for (i = 0; i <= ItemCount-1; i++)
			{
				eval("chk=frmData.Item"+JTrim(ItemID[i])+".status");
				if(chk==true)
				{
					Items=Items + "," + JTrim(ItemID[i]);
					Captions=Captions + "," + JTrim(ItemName[i]);
				}
			}
			if(Items.length>0)
				Items=Items.substr(1,Items.length-1);
			if(Captions.length>0)
			{
				Captions=Captions.substr(1,Captions.length-1);
				Captions="已限定"	//2004.12.18修改,不再显示具体的限定项目
			}
		}
	}
	return(Items + "|" + Captions);
}

function DisableItems() 
{
	var Disabled;
	if(parent.frmData.Limit[1].status==true)
		Disabled="false"
	else
		Disabled="true"

	if(ItemCount>0)
	{
		for (i = 0; i <= ItemCount-1; i++)
		{
			eval("frmData.Item"+JTrim(ItemID[i])+".disabled=" + Disabled);
		}
	}
}

function window_onload()
{
	window.parent.EnableButton();
	DisableItems();
}


//-->
</script>
<%
	dim WExcel
	set WExcel=server.CreateObject("WExcel.System")
	dim CurItems,OptionID,AppendBlank
	CurItems=Request.QueryString  ("CurItems")
	OptionID=Request.QueryString  ("OptionID")
	AppendBlank=Request.QueryString  ("AppendBlank")
	dim Success,strBody,strScript
	Success=WExcel.GetPopSelectPage(cint(UserID),cint(OptionID),cstr(CurItems),cstr(AppendBlank),strBody,strBody2,strFromTo,curFromToCount,strScript)
	CheckErr
	Response.Write strScript
%>

<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">
				<%=strBody%>
			</table>
			<input TYPE="hidden" NAME="OptionID" value="<%=OptionID%>">
		</form>
	</body>                                                                                                           
</html>

⌨️ 快捷键说明

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