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

📄 jedit.asp

📁 具有计划、任务、通告、公文、员工档案、等网络办公功能
💻 ASP
字号:
<%response.expires=0%>
<%Response.Buffer=true%>
<!-- #include file="../conn_lr.asp"-->
<!-- #include file="../css.asp"-->
<%
oabusyname=request.cookies("oabusyname")
oabusyusername=request.cookies("oabusyusername")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
if oabusyusername="" then 
	response.write("<script language=""javascript"">")
	response.write("window.top.location.href='../../default.asp';")
	response.write("</script>")
	response.end
end if
%>

<head>
<title>固定资产交接</title>
<meta http-equiv=Content-Type content="text/html; charset=gb2312">
<!--  #Include File=../inc/css.asp -->
<%
 	'定义变量
	dim opFlag,Number,title,StyleList,image
	'获取输入参数:记录号和操作标志
	opFlag=request("opFlag")
	if opFlag="" then opFlag="cmdAddNew"
	Number=request("Number")
	if Number="" then Number="0"
	on error resume next
	'创建记录访问对象
	SET rs=Server.CreateObject("ADODB.RecordSet") 
	'打开记录源,并定位到输入参数决定的记录号
	if opFlag<>"cmdAddNew" then 
		rs.open Session("SQL"),Session("conn"),1,1	
		rs.move Number
	else
		'读取
		rs.Open "select vname,vnumber,vcount as num from gdzc ",Session("conn"),1,1
		while not rs.eof
			StyleList=StyleList+ "<option value='" & rs("vnumber") & "," & rs("num") &  "'>"
			StyleList=StyleList+ left("" & rs("vname") + "" & "                        ",16) & "数量:" & rs("num") & "</option>"
			rs.movenext
		wend
		rs.close
	end if

		title="交接登记"
	image="../images/gdzcout.gif"

%>

<style>
.css0{<%=vinputtext%>;border:none;}
</style>
<script language=JavaScript>

//读取表内字符串信息
function ds(sstr)
{
 var dstr="";
 
 for (i=0;i<sstr.length;i++)
 {   if (sstr.charAt(i)!=' ') dstr+=sstr.charAt(i);
 }
 return dstr;
}


//数据参数传递
function setvaluex()
{
 var dstr=document.all.temp.value.toString().split(',');
 document.all.vnumber.value=dstr[0];
 document.all.countmax.value=dstr[1];
}

function add_users(to)
{
var return_value;

return_value=showModalDialog("../public/userlist.asp?muilt=no&to=" + to,"","dialogWidth:25;dialogHeight:16;dialogTop:250;dialogLeft:260;status:no;scrollbars:no;help:no");

if((typeof(return_value)=="undefined") ||(return_value=="*") || (return_value==""))
  return;
else
  var str1="";
  var str2="";
  tmpstr=return_value.split("*");
  str1=tmpstr[0];
  str2=tmpstr[1];

  document.submitinput.all(str2).value=str1 ;
  
}

//判断用户输入信息的正确性
function getit()
{

 if (ds(document.submitinput.vnumber.value)=="")
   {
     alert("对不起,资产名称不允许为空!");
     document.submitinput.temp.focus();
     return false;
   }
 if (document.submitinput.vnumber.value.length>255)
   {
     alert("对不起,您输入的资产名称超过最大限制,请重新输入!");
     document.submitinput.vnumber.focus();
     return false;
   }

 if (ds(document.submitinput.voutname.value)=="")
   {
     alert("对不起,交接人不允许为空!");
     document.submitinput.voutname.focus();
     return false;
   }
 if (document.submitinput.voutname.value.length>255)
   {
     alert("对不起,您输入的交接人名称太多,请重新输入!");
     document.submitinput.voutname.focus();
     return false;
   }
 if (ds(document.submitinput.vrecname.value)=="")
   {
     alert("对不起,接收人不允许为空!");
     document.submitinput.vrecname.focus();
     return false;
   }
 if (document.submitinput.vrecname.value.length>255)
   {
     alert("对不起,您输入的接收人名称太多,请重新输入!");
     document.submitinput.vrecname.focus();
     return false;
   }
rphtml('vnumber','voutname','vrecname','vinfo');
  if (ds(document.submitinput.vcount.value)=="")
     {
     alert("对不起,数据不允许为空!");
     document.submitinput.vcount.focus();
      return false;
     }
   else
      {
         if (document.submitinput.vcount.value>document.all.countmax.value)
               {
                alert("对不起,您输入的数据超过实际数据,请重新输入!");
                document.submitinput.vcount.focus();
                return false;
                }
            else {
                  document.all.submitinput.submit();
                  }

       }
}
</script>
</head>
<body >


<form name=submitinput action="saveout.asp" method=post >
 <!-- #include file="../inc/title.asp" --> 
<table cellspacing=1 cellpadding=2 width=95% bgcolor=<%=Session("vtablebordercolor")%> border=0 class=vtext align="center">
    <tr> 
      <td align=right bgcolor=<%=Session("vtabletitlebackcolor")%> width="84" nowrap>名 称(N):</td>
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> nowrap colspan="5"> 
<select name='temp' style='width=100%' accesskey="n" onKeyDown="gonext('voutname')" onChange="setvaluex();document.submitinput.voutname.focus();">
<option>--请选择--</option>
<%=StyleList%>
</select>
<input type="hidden" name="vnumber">
<input type="hidden" name="countmax">
      </td>
    </tr>
    <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="84" align="right" nowrap>交接人(P):</td>
      <td bgcolor=<%=Session("vcolcolor")%> > 
        <input size=20 name=voutname class=css0 style="width=100%" accesskey="p" onKeyDown=gonext("vrecname")>
      </td>
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="84" align="center" > 
        <div border=1 class=coolBarflat style="align:right" width="40px" heidht="25px" onmouseove="this.className='coolbar'" onMouseOut="this.className='coolBarflat'"  onMouseDown="this.className='coolBardown'"  onClick="add_users('voutname');document.submitinput.vrecname.focus();"><img name=usersel src="../images/man.gif" width="16" height="16" align="absmiddle" >地址薄</div>
      </td>
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="108" align="left" >接收人(R):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="122"  > 
        <input size=16 name=vrecname class=css0 style="width=100%" accesskey="r" onKeyDown=gonext("vcount")>
      </td>
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="91" > 
        <div border=1 class=coolBarflat style="align:right" width="40px" heidht="25px" onMouseOver="this.className='coolbar'" onMouseOut="this.className='coolBarflat'"  onMouseDown="this.className='coolBardown'"  onClick="add_users('vrecname');document.submitinput.vcount.focus();">
          <div align="center"><img name=usersel src="../images/man.gif" width="16" height="16" align="absmiddle" >地址薄</div>
        </div>
      </td>
    </tr>
    <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="84" align="right" nowrap> 
        <p>数 量(C):</p>
      </td>
      <td bgcolor=<%=Session("vcolcolor")%> colspan="2" > 
        <p> 
          <input size=20 name=vcount class=css0 style="width=100%" accesskey="c" onKeyDown=gonext("vinfo") onKeyPress=checkkey() oncontextmenu="self.event.returnValue=false">        </p>
      </td>
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="108" align="left" >交接时间(T):</td>
      <td bgcolor=<%=Session("vcolcolor")%> colspan="2" width="221" > 
        <input readonly name=vouttime class=css0 style="width=100%" value="<%=nowdate%>" accesskey="t" onKeyDown=gonext("vinfo")>
      </td>
    </tr>
    <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="84" align="right" nowrap valign="middle">备 注(M):</td>
      <td bgcolor=<%=Session("vcolcolor")%> colspan="5" > 
        <textarea cols="40" name="vinfo" class="css0" style="width=100%" accesskey="m" rows="5"><%=rs("vinfo")%></textarea>
      </td>
    </tr>
  </table>
<table  cellspacing=0 cellpadding=0 width=90% border=0 align="center">
  <tr> 
    <td> 
      <p align=center> 
	<br> 
         <button class=vinputbutton  style="height=24"  onClick="getit();"><img src="../images/save.gif" align="absmiddle">&nbsp;保存</button>&nbsp;
         <button class=vinputbutton  style="height=24"  onClick=javascript:history.go(-1);><img src="../images/back.gif" align="absmiddle">&nbsp;返回</button>
	
      </p>
    </td>
  </tr>

</table>

</form>
<% '关闭记录源
   rs.close
   set rs=nothing
%>   
</body>
</html>

⌨️ 快捷键说明

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