📄 default.asp

📁 进销存软件源代码
💻 ASP
字号:
<!-- #include virtual="/eB3KTransaction.asp" -->
<!-- #include file = "Common.asp" --><%
dim eBD,rs
dim bdTitle, bdIServerFun

Set eBD = Server.CreateObject("eB3KCommon.BillDocument")
if eBD.bdGetDetailByType(Conn, CLng(bdType), rs) = 1 then
	bdTitle = CStr(rs("BillName"))
	bdIServerFun = CStr(rs("ISVRFUN"))
	set rs = nothing
end if
set eBD = Nothing
%><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>
var RootID='<%=bdIServerFun%>';
</script>
<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>
<div id=bdMenu>
</div>

<div id=bdHead>
<INPUT id=bdhID type=hidden>
<TABLE cellSpacing=1 cellPadding=1 width=100%>
<TR><TD align=center><%=bdTitle%></TD></TR>
<TR><TD>报表名称：<input id=bdhName size=20>&nbsp;<input type=button value="保存" onclick="saveClick(this)">&nbsp;<input type=button value="打开" onclick="openClick(this)"></TD></TR>
<TR><TD>备注：<input id=bdhMemo size=60></TD></TR>
</TABLE>
</div>

<div id=bdBodyDetail width=100%></div>

<div id=bdFoot>
表格宽度：<input id=cols size=5>　表格高度：<input id=rows size=5>　<input type=button value="确定" onclick="makeGrid(cols.value,rows.value)">
</div>
<iframe id=bdSelectArea width=500 height=500 style="display: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
<iframe id=bdSelectArea2 width=500 height=500 style="display: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
<iframe id=bdLoadSave width=500 height=500 style="display: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
<textarea id=txtMemo OnFocus="this.select()" OnKeyPress="EnterKeyDo(panelMemoModify)" style="position:absolute; display:none; border:1 solid #000000"></textarea>
</BODY>
<script>
function EnterKeyDo(doFun){if (window.event.keyCode==13)doFun();}

var gDetail,iPanelx=0,iPanely=0;

function panelShow(idCtrl,idPanel){
	var coll=idPanel.all.tags('div');
	for (i=0;i<coll.length;i++){
		if (coll(i)==idChild)
			coll(i).style.display='block';
		else
			coll(i).style.display='none';
	}
	idPanel.style.display='block';
	var rect=idCtrl.getBoundingClientRect();
	var rectPanel=idPanel.getBoundingClientRect();
	idPanel.style.left=rect.left+document.body.scrollLeft;
	idPanel.style.top=rect.top+document.body.scrollTop;
	idPanel.style.width=rect.right-rect.left;
	idPanel.style.height=rect.bottom-rect.top;
}

function ecbDetail(eo,szEvent,x,y){
	if (szEvent=='MOUSECLICK'){
		if (txtMemo.style.display=='block') return panelHide();
		iPanelx=gDetail.showpos+x;
		iPanely=y;
		if (gDetail.data[iPanelx])
			void(0);
		else
			gDetail.data[iPanelx]=new Array();
		if (gDetail.data[iPanelx][iPanely])
			txtMemo.value=gDetail.data[iPanelx][iPanely];
		else
			txtMemo.value='';
		panelShow(eo.grid.rows(x+1).cells(y+1),txtMemo);
		txtMemo.focus();
	}
}
function panelHide(){txtMemo.style.display='none';}
function panelDelete(){
	panelHide();
	gDetail.remove(iPanelx);
	gDetail.refreshAll(1,0);
}
function panelMemoModify(){
	panelHide();
	if (iPanelx<gDetail.data.length){
		gDetail.data[iPanelx][iPanely]=txtMemo.value;
		gDetail.refreshAll(1,0);
	}
}
function rptdetailproc(method,ebo){
	var i,j;
	switch (method){
		case EBO_GET:
			outdata[outdata.length]=ebo.serversidename+'_rows';
			outdata[outdata.length]=ebo.id.data.length;
			outdata[outdata.length]=ebo.serversidename+'_cols';
			outdata[outdata.length]=ebo.id.cols;
			outdata[outdata.length]=ebo.serversidename+'_height';
			outdata[outdata.length]=ebo.id.rows;
			outdata[outdata.length]=ebo.serversidename+'_width';
			outdata[outdata.length]=ebo.id.cols;
			i=0;
			for (j=0;j<ebo.id.cols;j++){
				outdata[outdata.length]=ebo.serversidename+'_'+(j+1)+'_0';
				outdata[outdata.length]=ebo.id.grid.rows(0).cells(j+1).width;
			}
			for (i=0;i<ebo.id.data.length;i++){
				for (j=0;j<ebo.id.data[i].length;j++){
					if (ebo.id.data[i][j] && String(ebo.id.data[i][j]).length>0){
						outdata[outdata.length]=ebo.serversidename+'_'+(j+1)+'_'+(i+1);
						outdata[outdata.length]=ebo.id.data[i][j];
					}
				}
			}
			break;
		case EBO_SET:
			var rows=parseInt(indata.item(ebo.serversidename+'_rows'));
			var cols=parseInt(indata.item(ebo.serversidename+'_cols'));
			var width=parseInt(indata.item(ebo.serversidename+'_width'));
			var height=parseInt(indata.item(ebo.serversidename+'_height'));
			makeGrid(width,height)
			ebo.id.data.length=0;
			for (j=0;j<gDetail.cols;j++){
				iWidth=indata.item(ebo.serversidename+'_'+(j+1)+'_0');
				if (!isNaN(parseInt(iWidth)))
					if (parseInt(iWidth)>0) gDetail.grid.rows(0).cells(j+1).width=iWidth;
			}
			for (i=0;i<rows;i++){
				ebo.id.data[i]=new Array();
				for (j=0;j<cols;j++){
					ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+(j+1)+'_'+(i+1));
				}
			}
			break;
		default:
			break;
	}
	return (true);
}
var data=new Array()
function fakeSort(){}

function makeGrid(x,y){
	bdBodyDetail.innerHTML='';
	if (x<1) x=10;
	if (y<1) y=10;
	if (y>50) y=50;
	if (x>20) x=20;
	gDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),bdBodyDetail,y,x,'100%','',0,testUndefine,data,ecbDetail);
	gDetail.sort=fakeSort;
	for (var i=0;i<x;i++){
		gDetail.title[i+1].text=i+1;
		gDetail.title[i+1].width=80;
	}
	gDetail.refreshAll();
	eboReg('Detail',gDetail,'',rptdetailproc);
}

function cbLoad(ifrid, fun, data){
	if (fun=='data'){
		indata=data;
		eboSet();
		gDetail.refreshAll(1,0);
		return;
	}
}

function loadClick(id){
	if (!isNaN(parseInt(id)) && parseInt(id)!=0)
		IServer(bdLoadSave,RootID+'.Load','ID='+id,cbLoad);
}

loadClick(request('ID'));

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

function saveClick(obj){
	obj.disabled=true;
	eboGet();
	IServer(bdLoadSave,RootID+'.Save',outdata,cbSave);
	outdata=new Array();
	obj.disabled=false;
}

function cbOpen(ifrid, fun, data){
	if (fun=='data'){
		loadClick(data[0]);
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function openClick(obj){
	obj.disabled=true;
	followControl(bdhName,getFrameElement(bdSelectArea2));
	IServer(bdSelectArea2,RootID+'.Open','',cbOpen);
	obj.disabled=false;
}
makeGrid(10,10);
</script>
<script title=eboReg>
eboReg('ID',bdhID,'',deftextproc);
eboReg('Title',bdhName,'',deftextproc);
eboReg('Memo',bdhMemo,'',deftextproc);
eboReg('Detail',gDetail,'',rptdetailproc);
</script>
</HTML>
⌨️ 快捷键说明

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