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

📄 propertymodify.asp

📁 一个比较完整的oa系统
💻 ASP
字号:
🔍 
<!--#INCLUDE FILE="../HXINCLUDE/HXINCLUDEHEAD.ASP"-->
<!--#INCLUDE FILE="../HXINCLUDE/SelectDate.asp"-->
<%if WS_S.MemberPriv("WS_PublicAffairsPropertyModify")<>1 then response.Write "<script>alert('对不起,您的权限不够!');window.close();</script>":response.end
ColumnName="":Tablename="HX_Property":WS_PPID=request("WS_PPID")
if WS_PPID="" or isnull(WS_PPID) or (WS_PPID<>"" and not isnumeric(WS_PPID)) then 	response.write "<script>alert('非法操作');window.close();</script>":response.end  
Orderby=" where WS_PPID="&WS_PPID
action=request("action")
if action="saveinfo" then  Orderby=" where WS_PPID<>"&WS_PPID&" and WS_PropertyNUM='"&request("pnumber")&"'"
set rs=WS_S.HX_SetRSD(ColumnName,Tablename,Orderby)
if action="saveinfo" then
 if rs.recordcount>0 then
  HX_GoBack "资产编号有重复！","" 
 else
  WS_S.HX_RSClose rs
  set rs=WS_S.HX_SetRSD(ColumnName,Tablename," where WS_PPID="&WS_PPID)
  pnumber=request("pnumber")
  rs("WS_PropertyName")=request("pname")
  rs("WS_PropertyNUM")=pnumber
  if isdate(request("Date1")) then rs("WS_PropertyTableDate")=request("Date1")
  rs("WS_PropertyKind")=request("pkind")
  if isnumeric(request("pprice")) then  rs("WS_PropertyPrice")=request("pprice")
  if isdate(request("Date2")) then  rs("WS_PropertyBuyDate")=request("Date2")
  if isnumeric(request("oldyear")) then  rs("WS_PropertyOldYear")=request("oldyear")
  rs("WS_PropertyRemark")=request("remark")
  if isnumeric(request("WS_jbmanUid")) then  rs("WS_PropertyJBManID")=request("WS_jbmanUid")
  if isnumeric(request("WS_zcmanUid")) then  rs("WS_PropertyGLManID")=request("WS_zcmanUid")
  if isnumeric(request("WS_cwmanUid")) then  rs("WS_PropertyCWManID")=request("WS_cwmanUid")
  rs("WS_PropertyAddDate")=now
  rs.update
  WS_S.HX_RSClose rs
  response.write "<script>if(confirm('是否关闭此窗口？')) {window.opener.location.reload();window.close();}else location.href='propertymodify.asp?WS_PPID="&WS_PPID&"';</script>"
  response.end
 end if
end if
if rs.recordcount<=0 then  response.write "<script>alert('非法操作');window.close();</script>":response.end  
response.Write "<head><meta http-equiv='Content-Type' content='text/html; charset=gb2312'><title>资产修改</title><link rel=stylesheet type=text/css href='../HXinclude/HX_Css.css'><script src='../HXinclude/HX_Function.js'></script></head><body topmargin='10' leftmargin='0' bottommargin='10'><table width='500'  border='0' cellspacing='1' cellpadding='0' align=center bgcolor='#115F8F'><tr><td colspan='2' bgcolor=ffffff><table width='100%'  border='0' cellspacing='0' cellpadding='0'><tr><td height='25' background='../hximages/titleline.gif'><font class='fontmenu'>资产修改</font></td></tr></table><table width='100%'  border='0' cellspacing='1' cellpadding='3' bgcolor=f1f1f1><form name='form1' method='post' action='?action=saveinfo' onSubmit='return propertycheck(this);'><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>资产编号</td><td width='78%'><input name='pnumber' type='text' value='"&rs("WS_PropertyNum")&"' size='40' title='编号格式为：前两位为大写字母，后面跟大于1000的数字'></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>制表时间</td><td width='78%'><input name='Date1' type='text' title='选择制表时间' value='"&rs("WS_PropertyTableDate")&"' size='15' readonly> <input onclick=""popUpcalendar(this, form1.Date1, 'yyyy-mm-dd')"" type='button' value='选择' title='选择制表时间'></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>资产名称</td><td width='78%'><input name='pname' type='text' value='"&rs("WS_PropertyName")&"' size='40'></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>规格型号</td><td width='78%'><input name='pkind' type='text' value='"&rs("WS_PropertyKind")&"' size='40'></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>价　　格</td><td width='78%'><input name='pprice' type='text' style='ime-mode:disabled' value='"&rs("WS_PropertyPrice")&"' size='15'><font color=FF0000>万元 *只允许填入数字</font></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>购入时间</td><td width='78%'><input name='Date2' type='text' title='选择购入时间' value='"&rs("WS_PropertyBuyDate")&"' size='15' readonly> <input onclick=""popUpcalendar(this, form1.Date2, 'yyyy-mm-dd')"" type='button' value='选择' title='选择购入时间'></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>折旧年限</td><td width='78%'><input name='oldyear' type='text' style='ime-mode:disabled' value='"&rs("WS_PropertyOldYear")&"' size='15'><font color=FF0000>年 *只允许填入数字</font></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>经 办 人</td><td width='78%'><input type='hidden' name='WS_jbmanUid' value='"&rs("WS_PropertyJBManID")&"'><input name='WS_jbmanName' type='text' title='在后面选择对象' value='"
Call WS_S.HX_OutUserInfo(rs("WS_PropertyJBManID")):response.Write OutName&"' size='30' readonly> <input type='button' name='Submit2' value='选择对象' onClick=""openwin(510,500,'../HXinclude/HX_Checkuser.asp?checkuser=jbman')"" title='在后面选择对象'></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>资产管理人</td><td width='78%'><input type='hidden' name='WS_zcmanUid' value='"&rs("WS_PropertyGLManID")&"'><input name='WS_zcmanName' type='text' title='在后面选择对象' value='"
Call WS_S.HX_OutUserInfo(rs("WS_PropertyGLManID")):response.Write OutName&"' size='30' readonly> <input type='button' name='Submit3' value='选择对象' onClick=""openwin(510,500,'../HXinclude/HX_Checkuser.asp?checkuser=zcman')"" title='在后面选择对象'></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%'>财务负责人</td><td width='78%'><input type='hidden' name='WS_cwmanUid' value='"&rs("WS_PropertyCWManID")&"'><input name='WS_cwmanName' type='text' title='在后面选择对象' value='"
Call WS_S.HX_OutUserInfo(rs("WS_PropertyCWManID")):response.Write OutName&"' size='30' readonly> <input type='button' name='Submit4' value='选择对象' onClick=""openwin(510,500,'../HXinclude/HX_Checkuser.asp?checkuser=cwman')"" title='在后面选择对象'></td></tr><tr bgcolor='#FFFFFF' onmouseover=javascript:this.bgColor='#F9F8F2' onmouseout=javascript:this.bgColor='#ffffff'><td width='22%' height='44' valign='top'>备　　　注</td><td width='78%' height='44'><textarea name='remark' cols='42' rows='4' class='bgline'>"&rs("WS_PropertyRemark")&"</textarea></td></tr><tr bgcolor='#FFFFFF'><td>&nbsp;</td><td><input type='submit' name='Submit' value=' 修 改 '> <input type='reset' name='Submit' value=' 重 输 '><input name='WS_PPID' type='hidden' id='WS_PPID' value='"&WS_PPID&"'></td></tr></form></table></td></tr></table>"

%>

⌨️ 快捷键说明

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