📄 default.asp

📁 进销存软件源代码
💻 ASP
字号:
<!-- #include virtual="/eB3KTransaction.asp" --><!-- #include virtual="/Server/ebo.asp" -->
<HTML><HEAD><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><LINK REL=stylesheet HREF="/Client/All.css" TYPE="text/css"><script src="/Client/ebComm.js"></script></HEAD>
<script src="/client/ebo.js"></script>
<script src="/client/Request.js"></script>
<script src="/client/IClient.js"></script>
<script src="/client/IServer.js"></script>
<script src="/client/grid.js"></script>
<script src="/client/cbLib.js"></script>

<body leftmargin="0" topmargin="20">

<table border="0" width="450" cellspacing="0" cellpadding="0" align="center">
	<tr><td width="100%">
<table border="0" width="450" cellspacing="0" cellpadding="0" align="center">
	<tr><td width="100%">
		<table border="0" width="100%" cellspacing="0" cellpadding="0">
			<tr><td width="100%" align="center" height="18">科目映射</td></tr>
			<tr><td width="100%" height="18"></td></tr>
			<tr><td width="100%" height="18" align="center">选择科目：<input type=hidden id=subject><input style="width:178px" id=subjectText>　<input type=button value="搜索" onclick="subjectClick(this,subject,subjectText)"></td></tr>
			<tr><td width="100%" align="center">选择要影射的项目：<SELECT id=BillType></SELECT>　<input type="button" value="影射"  onClick="allude(this)"></td></tr>
			<tr><td width="100%" height="18"></td></tr>
			</table></td>
	</tr>
</table>
<iframe id=bdSelectArea width=500 height=500 style="DISPLAY: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe></td></tr></table>
<iframe id=bdLoadSave width=500 height=500 style="display: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
</body>
<script>
var AccountID=<%=Session("AccountID")%>

function addSelect(ID,Text,Value){
	var oOption = document.createElement("OPTION");
	oOption.text=Text;
	oOption.value=Value;
	ID.add(oOption);
}

addSelect(BillType,'客户　　　　　　',4);
if (AccountID==1){
	addSelect(BillType,'产品目录',2);
	addSelect(BillType,'供应商（经销部）',101);
	addSelect(BillType,'供应商（生产厂）',5);	
}


function cbSave(ifrid, fun, data){
	if (fun=='data'){
		if (isNaN(parseInt(data))||parseInt(data)==0)
			alert('保存失败！');
		else{
			alert('保存成功！');
		}
		return;
	}
}

function allude(obj){
	obj.disabled=true;
	IServer(bdLoadSave,'Mapping.Work','biType='+BillType.options[BillType.selectedIndex].value+'&subject='+subject.value,cbSave);
	obj.disabled=false;
}

var userText,userHidden
function cbSubSelect(ifrid, fun, data){
	if (fun=='data'){
		userHidden.value=data[0];
		userText.value=data[2];
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function subjectClick(obj,iHidden,iText){
	obj.disabled=true;
	userText=iText;
	userHidden=iHidden;
	followControl(userText,getFrameElement(bdSelectArea));
	IServer(bdSelectArea,'Subject.Open','DisPlay=1&find='+userText.value,cbSubSelect);
	obj.disabled=false;
}
</script>

</html>
⌨️ 快捷键说明

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