📄 default.asp

📁 进销存软件源代码
💻 ASP
字号:
<!-- #include virtual="/eB3KTransaction.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>
<script src="/client/datectrl.js"></script>
<BODY topmargin="10">
<TABLE>

<TR><TD width=30%></TD><TD width=70% align="center">查看总帐</TD></TR>
<TR><TD width=30%></TD><TD width=70%>选择科目：<input id=subject type=hidden><input id=Code type=hidden><input id=subjectText>&nbsp;<input type=button value="选择" onclick="subjectClick(this,subject)"></TD></TR>
<TR><TD width=30%></TD><TD width="70%">选择日期：<input id=dateFrom size=20>&nbsp;<input type=button value="↓" onclick="dateShow(dateFrom)">　—　<input id=dateTo size=20>&nbsp;<input type=button value="↓" onclick="dateShow(dateTo)"></TD></TR>
<TR><TD width=30%></TD><TD width="70%">　　　　　<input type=checkbox id=corpCheck><span onClick="corpCheck.click()">显示子公司</span></TD></TR>
<TR><TD width=30%></TD><TD width="70%">　　　　　　　　<input type=button value="查看帐页" onClick="searchClick()"></TD></TR></TABLE>
<iframe id=bdSelectArea width=500 height=500 style="display: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
</BODY>
<script>
function cbSubjectSelect(ifrid, fun, data){
	if (fun=='data'){
		subject.value=data[0];
		Code.value=data[1];
		subjectText.value=data[2];
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function subjectClick(obj,idCtrl){
	obj.disabled=true;
	followControl(subjectText,getFrameElement(bdSelectArea));
	IServer(bdSelectArea,'Subject.Open','DisPlay=1&Find='+subjectText.value,cbSubjectSelect);
	obj.disabled=false;
}

var outdata=new Array();
function cbSearch(ifrid, fun, data){
	if (fun=='data'){
		return;
	}
}

function searchClick(obj){
	eboGet();
	var newindow=window.open('', 'liwei','toolbar=no,directories=no menubar=no,scrollbars=yes,resizable=yes,location=no,width=780,heigth=550,left=0,top=46');
	IServer(newindow,'Account.Search',outdata,cbSearch);
	outdata=new Array();
}

</script>
<script>
eboReg('subject',subject,'',deftextproc);
eboReg('Code',Code,'',deftextproc);
eboReg('subjectText',subjectText,'',deftextproc);
eboReg('dateFrom',dateFrom,'',deftextproc);
eboReg('dateTo',dateTo,'',deftextproc);
eboReg('corpCheck',corpCheck,'',defcheckproc);
</script>

</HTML>
⌨️ 快捷键说明

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