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

📄 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>

<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="middle" height="18">修改<%=bdTitle%>信息</td></tr>
			<tr><td width="100%" height="18"></td></tr>
			<tr><td width="100%">状态:<input id="ID" type="hidden"><input id="State" value="新建" size="23" readonly> <input type="button" value="新建" onClick="ID.value='';State.value='新建';"></td></tr>
			<tr height="26"><td width="100%">用户名:<input id="Name" type=Hidden><input id="NameText" size="30"> <input type="button" value="搜索"  onClick="userClick(this,NameText,Name)"> <input type="button" value="打开"  onClick="openClick(this,NameText,Name)"></td></tr>
			<tr><td width="100%"><div id=bdBodyDetail width=100%></div></td></tr>
			<tr height="26"><td width="100%">权限组:<input id="Purview" style="width:220px"> <input type=button value="搜索" onClick="PriGroClick(this,Purview)"></td></tr>
			<tr><td width="100%">备注:<input id="Memo" style="width:274px"></td></tr>
			<tr><td width="100%" height="18"></td></tr>
			<tr><td width="100%" height="18" align="middle"><input type="button" value="确定" onClick="saveClick(this)">   <input type="button" value="取消" onClick="Reset()"></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=bdSelectArea2 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=0 height=0 style="DISPLAY: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
<div id=bdPanel width=100 height=60 style="position:absolute; display:none; border:1 solid #000000">
<div id=bdPanelProduct><input type=button value="删除" onclick="panelDelete()"></div>
</div>
</body>
<script>
function EnterKeyDo(doFun){if (window.event.keyCode==13)doFun();}
var wzjbutton;
var gDetail,iPanelx=0,iPanely=0;
bdPanel.style.left=0;
bdPanel.style.top=0;
bdPanel.style.backgroundColor=document.bgColor;

function panelShow(idCtrl,idPanel,idChild,dir){
	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();
	switch(dir){
		case 1:
			idPanel.style.left=rect.right-(rectPanel.right-rectPanel.left);
			idPanel.style.top=idCtrl.getBoundingClientRect().top;
			break;
		default:
			idPanel.style.left=rect.left;
			idPanel.style.top=rect.top;
	}
}

function ecbDetail(eo,szEvent,x,y){
	if (szEvent=='MOUSECLICK'){
		if (bdPanel.style.display=='block') return panelHide();
		iPanelx=gDetail.showpos+x;
		iPanely=y;
		if (iPanelx>=gDetail.data.length)
			return;
		//有数据
		switch(y){
			case 0:
			case 1:
				panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelProduct,1);
				break;
		}
	}
}
function panelHide(){bdPanel.style.display='none';}
function panelDelete(){
	panelHide();
	gDetail.remove(iPanelx);
	gDetail.refreshAll(1,0);
}

gDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),bdBodyDetail,6,2,'100%','',1,testUndefine,testUndefine,ecbDetail);
gDetail.title[0].text='№';
gDetail.title[1].text='编号';
gDetail.title[1].width=1;
gDetail.title[2].text='权限组';
gDetail.title[2].width=360;

gDetail.refreshAll();

function cbListCommonSelect(ifrid, fun, data){
	if (fun=='data'){
		var i
		for (i=0;i<gDetail.data.length;i++){
			if (gDetail.data[i][0]==data[0]){
			alert ("该权限组已选择!!");
			return;}
		}
		gDetail.append(data[0],data[1]);
		gDetail.refreshAll();
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function PriGroClick(obj,idCtrl,idCtrlHidden){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	userSaveCtrl=idCtrl;
	userSaveHidden=idCtrlHidden;
	IServer(bdSelectArea2,'PrivilegeGroup.Open','find='+escape(idCtrl.value),cbListCommonSelect);
	obj.disabled=false;
}

var userSaveCtrl, userSaveHidden;
function cbCommonSelect(ifrid, fun, data){
	if (fun=='data'){
		userSaveHidden.value=data[0];
		userSaveCtrl.value=data[1];
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function userClick(obj,idCtrl,idCtrlHidden){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	userSaveCtrl=idCtrl;
	userSaveHidden=idCtrlHidden;
	IServer(bdSelectArea2,'User.OpenAll','find='+escape(idCtrl.value),cbCommonSelect);
	obj.disabled=false;
}

var indata;

function cbLoad(ifrid, fun, data){
	if (fun=='data'){
		indata=data;
		eboSet();
		gDetail.calcTotal();
		gDetail.refreshAll();
		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{
			ID.value=data[0];
			alert('保存成功!');
			State.value='修改';
		}
		wzjbutton.disabled=false;
		return;
	}
	wzjbutton.disabled=false;
}

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

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

function openClick(obj,idCtrl,idCtrlHidden){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	IServer(bdSelectArea2,RootID+'.Open','find='+escape(idCtrl.value),cbOpen);
	obj.disabled=false;
}

function Reset(){
	var i;
	for (i=0;i<_ebo.length;i++){
		_ebo[i].id.value='';
		gDetail.data.length=0;
		gDetail.calcTotal();
		gDetail.refreshAll();
		State.value='新建';
	}
}


</script>

<script Title="eboReg">

eboReg('ID',ID,'',deftextproc);
eboReg('Name',Name,'',deftextproc);
eboReg('NameText',NameText,'',deftextproc);
eboReg('Memo',Memo,'',deftextproc);
eboReg('Detail',gDetail,'',defdetailproc);
</script>


</html>

⌨️ 快捷键说明

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