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

📄 domodify.asp

📁 又一套oa 系统,供大家使用学习,更多的源代码正在上传中,好的程序应该大家共同使用
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#INCLUDE FILE="../HXINCLUDE/HXINCLUDEHEAD.ASP"-->
<%if WS_S.MemberPriv("WS_ManpowerResourceUserManage")<>1 then HX_GoBack "对不起!您的权限不够!",""
action=request("action"):WS_Uid=request("WS_Uid")
if (WS_Uid<>"" and not isnumeric(WS_Uid)) or WS_Uid="" or isnull(WS_Uid) then HX_GoBack "参数错误",""
ColumnName="":Tablename="HX_CompanyUser":Orderby=" where WS_Uid="&WS_Uid
set rs=WS_S.HX_SetRSD(ColumnName,Tablename,Orderby)
if action="edituser" and request("WS_username")<>"" then 
  if WS_S.MemberPriv("WS_ManpowerResourceUserManage")<>1 then HX_GoBack "对不起!您的权限不够!",""       
  WS_M.HX_MemberAdd:HX_GoBack "修改成功","modify.asp"
end if
set aprs=WS_S.HX_SetRSD("WS_Aid,WS_AppointmentName,WS_Did","HX_Appointment"," order by WS_OrderBy asc")
if aprs.recordcount>0 then %>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
   count = 0
   do while not aprs.eof 
%>
subcat[<%=count%>] = new Array("<%= trim(aprs("WS_AppointmentName"))%>","<%= aprs("WS_Did")%>","<%= aprs("WS_Aid")%>");
<%
        count = count + 1
        aprs.movenext
        loop
		end if
call WS_S.HX_RSClose(aprs)        
%>
		
onecount=<%=count%>;

function changelocation(locationid)
    {
    document.form1.WS_Appointment.length = 0; 

    var locationid=locationid;
    var i;
    for (i=0;i < onecount; i++)
        {
            if (subcat[i][1] == locationid)
            { //这句不是很理解
             document.form1.WS_Appointment.options[document.form1.WS_Appointment.length] = new Option(subcat[i][0], subcat[i][2]);
            }        
        }
        
    }    
</script>
<script language="JavaScript">
<!--

function amsub(form)
{
if (form.WS_name.value=="")
{ alert("请输入员工姓名!");
  form.WS_name.focus();
  return false
}
if (form.WS_username.value=="")
{ alert("请输入员工用户名!");
  form.WS_username.focus();
  return false
}
if (form.WS_Appointment.value=="")
{ alert("请输入员工职务!");
  form.WS_Appointment.focus();
  return false
}
return true
}
//-->
</script><%
    response.Write "<head><meta http-equiv='Content-Type' content='text/html; charset=gb2312'><title>员工资料修改</title><link rel=stylesheet type=text/css href='../HXinclude/HX_Style.css'></head><body topmargin='20' leftmargin='0' bottommargin='20'><table width='650'  border='0' cellspacing='1' cellpadding='0' align=center bgcolor='#115F8F'><tr><td colspan='2' bgcolor=ffffff background='../hximages/titlelinebg.gif'><table width='605'  border='0' cellspacing='0' cellpadding='0'><tr><td width='605' height='25' background='../hximages/titleline.gif'><font class='fontmenu'>资料修改</font></td></tr></table><table width='100%' cellspacing cellpadding><tr><td width='100%'><table width='100%' border='0' cellspacing='1' cellpadding='1' bgcolor='#CCCCCC' height='100%'><form method='post' action='' name='form1' onSubmit='return amsub(this);'><tr><td width='81' bgcolor='#f1f1f1'>&nbsp;编 号</td><td width='103' bgcolor='#FFFFFF'><input type='text' name='WS_Code' maxlength='8' size='8' value='"&rs("WS_Code")&"' readonly></td><td width='56' bgcolor='#f1f1f1'>姓 名</td><td width='91' bgcolor='#FFFFFF'><input type='text' name='WS_name' maxlength='8' size='8' value='"&rs("WS_name")&"'></td><td width='65' bgcolor='#f1f1f1'> 性 别</td><td width='115' bgcolor='#FFFFFF'><select name='WS_sex'><option "
	if rs("WS_sex")="男" then response.write "selected"
	response.Write ">男</option><option "
	if rs("WS_sex")="女" then response.write "selected"
	response.Write ">女</option></select></td><td width='113' rowspan='5' align='center' valign='middle' bgcolor='#FFFFFF'>"
    if rs("WS_Photo")<>"" then response.write "<a href='"&rs("WS_Photo")&"' target='_blank'><img src='"&rs("WS_Photo")&"' width=100 height=110 border=0></a>" else response.write "<a href='javascript:' onclick=""open('UpUserPhoto.asp?WS_uid="&rs("WS_Uid")&"','','top=200 left=180 width=450 height=130')"">上传照片</a>"
	 response.Write "</td></tr><tr><td width='81' bgcolor='#f1f1f1'>&nbsp;民 族</td><td width='103' bgcolor='#FFFFFF'><input type='text' name='WS_folk' maxlength='8' size='8' value='"&rs("WS_folk")&"' ></td><td width='56' bgcolor='#f1f1f1'>出生年月</td><td colspan='3' bgcolor='#FFFFFF'><select name='WS_byy'>"
	 if rs("WS_born")<>"" then WS_bornarr=split(rs("WS_born"),"-") else WS_bornarr=split(date,"-")								
	 for i=year(date)-50 to year(date)
	  response.write "<option value='"&i&"' "

⌨️ 快捷键说明

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