popselect2.asp

来自「学生档案与成绩管理(1)学生档案管理:记录每个学生的档案信息」· ASP 代码 · 共 366 行

ASP
366
字号
<!-- #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>

<style type="text/css">
	#SelectArea1 {position:absolute;visibility:hidden;left:0;top:0;width:0;height:0;z-index:-1}
	#SelectArea2 {position:absolute;visibility:hidden;left:0;top:0;width:0;height:0;z-index:-1}
	#SelectFromTo {position:absolute;visibility:hidden;left:0;top:0;width:0;height:0;z-index:-1}
	#SelectAreaHead1 {position:absolute;visibility:hidden;left:0;top:0;width:0;height:0;z-index:-1}
	#SelectAreaHead2 {position:absolute;visibility:hidden;left:0;top:0;width:0;height:0;z-index:-1}
</style>    

<script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--

var HasChanged;
var CurOption;	//当前的Option选择
var FromToCount;	//现有的From、to对的个数
var HasInitPage;

function window_onload()
{
	InitPage();
	EnableButton();
	FromToCount=curFromToCount.value;	
}

function InitPage() 
{
	HasInitPage=false;

	var ItemIDs
	ItemIDs=JTrim(CurItems.value);
	if(ItemIDs=="")
	{
		parent.frmData.Limit[0].status=true;
		parent.frmData.Limit[1].status=false;
		parent.frmData.Limit[2].status=false;
	}
	else if(ItemIDs.indexOf(":")>0)
	{
		parent.frmData.Limit[0].status=false;
		parent.frmData.Limit[1].status=false;
		parent.frmData.Limit[2].status=true;
	}
	else
	{
		parent.frmData.Limit[0].status=false;
		parent.frmData.Limit[1].status=true;
		parent.frmData.Limit[2].status=false;
	}
	SetSelectPage();
	HasInitPage=true;
}

function SetSelectPage() 
{
	if(HasInitPage)
	{
		//将工作区的设置移至缓冲区
		if(CurOption==0 || CurOption==1)
		{
			parent.SelectAreaHead.innerHTML="";
			SelectArea1.innerHTML=SelectArea.innerHTML;
			SelectArea.innerHTML="";
		}
		else if(CurOption==2)
		{
			parent.SelectAreaHead.innerHTML="";
			SelectArea2.innerHTML=SelectArea.innerHTML; 
			SelectArea.innerHTML=""; 
		}
	}

	//设置工作区
	if(parent.frmData.Limit[0].status==true)
	{
		parent.SelectAreaHead.innerHTML=SelectAreaHead1.innerHTML;
		SelectArea.innerHTML=SelectArea1.innerHTML;
		SelectArea1.innerHTML=""; 
		DisableItems();
		CurOption=0;
	}
	else if(parent.frmData.Limit[1].status==true)
	{
		parent.SelectAreaHead.innerHTML=SelectAreaHead1.innerHTML;
		SelectArea.innerHTML=SelectArea1.innerHTML;
		SelectArea1.innerHTML=""; 
		DisableItems();
		CurOption=1;
	}
	else if(parent.frmData.Limit[2].status==true)
	{
		parent.SelectAreaHead.innerHTML=SelectAreaHead2.innerHTML;
		SelectArea.innerHTML=SelectArea2.innerHTML;
		SelectArea2.innerHTML=""; 
		CurOption=2;
	}
}

function EnableButton() 
{
	parent.frmData.Limit[0].disabled=false;
	parent.frmData.Limit[1].disabled=false;
	parent.frmData.Limit[2].disabled=false;
	parent.frmData.btnSave.disabled =false;
	parent.frmData.btnCancel.disabled =false;
}

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);
		}
	}

	if(parent.frmData.Limit[2].status==true)
	{
		if(FromToCount>0)
		{
			for (i = 1; i <= FromToCount; i++)
			{
				var From,To
				eval("From=frmData.From"+JTrim(i.toString())+".value");
				eval("To=frmData.To"+JTrim(i.toString())+".value");
				if(From==To)
				{
					alert("第 " + i + " 行的从、至值相同,请更正。")
					return(false);
				}
				else
				{
					Items=Items + "," + From + ":" + To;
				}
			}
		}
		if(Items.length>0)
		{
			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]);
				}
			}
			if(Items.length>0)
			{
				Items=Items.substr(1,Items.length-1);
				Captions="已限定"	//2004.12.18修改,不再显示具体的限定项目
			}
		}
	}
	if(parent.frmData.Limit[2].status==true)
	{
		if(FromToCount>0)
		{
			for (i = 1; i <= FromToCount; i++)
			{
				var From,To
				eval("From=frmData.From"+JTrim(i.toString())+".value");
				eval("To=frmData.To"+JTrim(i.toString())+".value");
				if(From!=0 || To!=0)
				{
					Items=Items + "," + From + ":" + To;
				}
			}
			if(Items.length>0)
			{
				Items=Items.substr(1,Items.length-1);
				Captions="已限定"
			}
		}
	}

	return(Items + "|" + Captions);
}

function AddFromTo()
{
	if(FromToCount>40)
	{
		alert("对不起,请不要超过 40 个转换逻辑。")
	}
	else
	{
		var FromToHTML;
		FromToCount=parseInt(FromToCount)+1
		FromToHTML=SelectFromTo.innerHTML;
		FromToHTML=replace(FromToHTML,'[FromName]','From' + JTrim(FromToCount.toString()));
		FromToHTML=replace(FromToHTML,'[ToName]','To' + JTrim(FromToCount.toString()));
		SelectArea.innerHTML =SelectArea.innerHTML + FromToHTML;
	}
}

function DelFromTo()
{
	if(FromToCount>0)
	{
		var FromToHTML,i;
		FromToHTML=SelectArea.innerHTML;
		i=FromToHTML.lastIndexOf("<TR>");
		if(i>1)
		{
			FromToHTML=FromToHTML.substr(0,i)
			SelectArea.innerHTML =FromToHTML;
			FromToCount=parseInt(FromToCount)-1
		}
	}
	else
	{
		alert("已减除干净。")
	}
}

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);
		}
	}
}

//-->
</script>
<%
	dim WExcel
	set WExcel=server.CreateObject("WExcel.System")
	dim CurItems,OptionID
	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),strBody1,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" CELLSPACING=0 CELLPADDING="0">
				<tr><td><p id=SelectArea name=SelectArea></p></td></tr>
			</table>
		</form>
		<div id=SelectAreaHead1>
			<table width=100% cellspacing=1 bgcolor=999999>
				<tr>
					<td width="20%" bgcolor=white>选择</td>
					<td width="80%" bgcolor=white>名称</td>
				</tr>
			</table>
		</div>
		<div id=SelectAreaHead2>
			<table width="100%" border=0 align="center" CELLSPACING=0 CELLPADDING="0">
				<tr>
					<td>
						<table width=100% cellspacing=1 bgcolor=999999>
							<tr>
								<td width="50%" bgcolor=white>从</td>
								<td width="50%" bgcolor=white>至</td>
							</tr>
						</table>
					<td>
					<td width="1%">
						<img alt="增加一行" onclick="AddFromTo()" style="cursor:hand" src="../../../images/expand.gif" WIDTH="12" HEIGHT="10">
					</td>
					<td width="1%">
						<img alt="减除一行" onclick="DelFromTo()" style="cursor:hand" src="../../../images/collaps.gif" WIDTH="12" HEIGHT="10">
					</td>
				</tr>
			</table>
		</div>
		<div id=SelectArea1>
			<table width="100%" border=0 align="center">
				<%=strBody1%>
			</table>
		</div>
		<div id=SelectArea2>
			<table width="100%" border=0 align="center">
				<%=strBody2%>
			</table>
		</div>
		<div id=SelectFromTo>
			<%=strFromTo%>
		</div>
		<input TYPE="hidden" ID="CurItems" NAME="CurItems" value="<%=CurItems%>">
		<input TYPE="hidden" ID="curFromToCount" NAME="curFromToCount" value=<%=curFromToCount%>>
	</body>                                                                                                           
</html>

⌨️ 快捷键说明

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