范例-人力资源管理系统

人力资源管理系统绩学句租文院制专睡喂婆业残班窝知熟级点学受姜蝴号惧姓缓亦趟名雨指导教师璃教师职称常年扮月锤日摘要【摘要】随着经济全球一体化时代的到来，企业的发展不再仅限于技术的竟争，市场的竟争，更重要的是人才的竟争。企业在发展过程中，除了要维护好和客户的关系，掌握先进的行业生产技术，还必须拥有一批本领域中具有相当才能的工作人员，才能在信息时代的经济浪潮中立于不败之地。人才是企、事业单位的宝贵财富，是人力资源管理的核心。吸引人才，留住人才成为企业人力资源管理的一个重要课题。要想留住人才不仅需要企业具有良好的发展前景，更重要的是企业要有一个相当健全的管理制。良好的管理体制，不仅能节省大量的企业人力物力，提高企业的经济效益，更重要能够帮助企业制订计划，按照一个良好的方向发展。人才的引入给企业的发展注入的新鲜的血液，带动了企业一系列新的发展变化。通过应用人力资源管理系统能够集中对企业人事工作进行管理，不单单使得人力资源管理人员摆脱繁重的日常工作，更为重要的是能够根据员工个人能力对其岗位进行调动，充分发挥员工自身的能力，为企业的带来更大的经济利益。因此，快捷、准确、方便、高效的人力资源管理系统是企、事业单位的基本需求之一。【关键词】人事管理、人力资源、人力资源管理系统目录TOC\o"1-3"\h\zHYPERLINKmeth置od="po撇st"疲admin_耻name丝text辣用户名京class=春"wenbe虽n"siz戏e="8"竭admin_梦pwd埋text残密码凳class=济"wenbe吗n"siz克e="8"叨Submit软image港登录按钮竹value=攀"交提触交魂"src=难"image孟s/logi足n_04.g壳if"身当单击【登录坝系统】按钮时葱，后台对用户春的身份进行验抄证，主要是检御索用户名和密币码在数据库中学是否存在。如债果存在那么登锅录成功，进入如操作页面，否乳则登录失败。且其程序代码如你下：势<!--#i拒nclude绘file=斩DataBa暂se/con神n.asp-寺-><%份ifreq烫uest("舱action外")="lo船gin"t石hen郑惩admin_鸟name=r绝equest织("admi危n_name屋")将'陵获取用户名性谅admin_烘pass=r页equest苍("admi龙n_pass除")惠'柱获取密码熊济userna黑me=tri负m(requ闸est("a户dmin_n松ame"))南岁passwo换rd=tri弟m昌(宇reques袖t("adm竭in_pas浓s"))赤寸fori=仍1tol肠en(use逆rname)添大生user=m售id(use指rname,台i,1)克之ifuse铜r="'"俭oruse维r="%"晌oruse沟r="<"培oruse火r=">"陕oruse守r="&"霜oruse骨r="|"喊then忌琴胃respon蕉se.wri丹te"<s曲cript洪langua符ge=Jav胡aScrip踏t>"&赛"alert扛(泻'拿您的用户名含质有非法字铁符贴,俯请重新输入单！扶');"&旨"hist反ory.ba脑ck()"经&"</s脂cript>煎"菠屋沟respon晃se.end傅助endif next堆栗fori=必1tol策en(pas秃sword)碰店量pass=m蔑id(pas能sword,筋i,1)嘱堵强ifpas央s="'"炭orpas耀s="%"父orpas锅s="<"宴orpas杀s=">"系orupa姓ss="&"仓orpa框ss="|"俭then催遥动抱respon照se.wri笼te"<s粮cript巷langua米ge=Jav寇aScrip竟t>"&喘"alert葱(贞'兵您的密码含有浇非法字改符筛,考请重新输入辉！吴');"&貌"hist搏ory.ba蝇ck()"捐&"</s添cript>碌"伴猪搁御respon阶se.end撤彩璃endif next漏突'愚在数据库中检枣索用户名和密辣码时候正确余袜setrs炕=serve脊r.Crea默teObje笑ct("ad鼻odb.re雅cordse秀t")央到sql="s醒elect介*from片tb_Us艘erwhe赔reuse串rname=雷'"&adm网in_nam幻e&"'an劳duser宴pwd='"直&admin情_pass&尽"'"粥那rs.ope测nsql,躬conn,1毛,1拉斩ifrs.召eofth惩en虾抽滥'铅记录集为空也凯就是说用户名嘱或者密码错误水学圾respon愁se.wri章te"<b录r><br>削<br><b睛r><fon义tsize熔=2><ce洪nter挨>傍对不起，您输坏入的用户名或满密码，请重新恭输入，谢谢世！斥<br><b打r喷>案本软件建议您捧使唤用府IE6.扎0舱以上版本，分豪辨率抖：骨1024*7咳68<br>非<br><a伸href=殖login.宁asp访>呀返违回赖</a></栏font>"壁斩else狸量制朝育'龄记录集不为也骡就是说用户名春和密码正确，基进入管理页面至愈狮sessio寇n("adm笑in_nam览e")=re怕quest(猪"admin坛_name"沟)归主惕respon寻se.Red查irect(组"index悬.asp")旅'宇跳转到管理首角页岗竖endif外术泉rs.clo裙se秆竞setrs术=nothi于ng正种conn.c仗lose错朱setco恳nn=not斗hingendif%>榆6魂贴网站首页设计鼠网站首页主要镇由三大部分组储成，一部分是愁管理导航区，肝二部分是功能剃导航区，三部介分是展示区。旬其中展示区中拆除了显示主要慰显示各种功能似或者列表，还尾显示当前的操邮作用户和当前定的日期，并且米被装在一个包栏含文件里。其唉程序代码如下扔：匀<!--#i疫nclude零file=域DataBa笔se/con盲n.asp-摔->况<!--#i中nclude配file=托yan.as辜p--><%扔setrs久=serve复r.Crea久teObje还ct("ad滥odb.re累cordse耻t")牢s虫ql="SE面LECTd渔bo.tb_萄Employ再ee.nam铜eFROM扬dbo.t准b_Empl百oyeeI赛NNERJ章OINdb股o.tb_U困serON荒dbo.tb损_Emplo攀yee.id迅=dbo搏.tb_Us肌er.nam景ewher僻edbo.反tb_Use阵r.user抽name='立"&sess游ion("a煮dmin_n钉ame")&妹"'"腾rs.ope锐nsql,周conn,1但,1翁ifnot悦rs.eo栏fthen%>衬<table拉width集="612"口borde抵r="0"垦cellsp莲acing=朝"0"><tr>颈<t徒dwidt鞭h="33%按"alig夸n="lef桃t">&nb由sp;</t问d>倚<汤tdwid毯th="44战%"ali猴gn="le蔑ft"><s洽pancl陈ass="s介tyle5"椅>恒您好屑，滤<%=rs(麻"name"换)%沸>悬今天的日期是队：机<%=dat紫e()%><旗/span>术</td>虫<t训dwidt夏h="23%嘴"alig合n="rig灭ht"><d栽ivali剃gn="ce冤nter">踩<ahre商f="qui脏te.asp座"><spa迟nclas聋s="sty其le5"任>铅注销登鞋录启</span喝></a><街/div><芒/td>席</tr确>朝</tabl死e><%else埋筋respon阀se.Red息irect(抗"login欠.asp")endif%>资当用户单饲击秀“贫注销登碰录斩”纯超链接，就是网把粱sesssi佳on(好“炕admin_宝name帽”弹)塔的值清空，用抬户就会退出登醒录，返回登录短页面。其程序胡代码如下：<%陪sessio习n("adm厅in_nam走e")=""民respon普se.Red稀irect(悦"login广.asp")%>释7敬卡人事管理模块必设计赌人事管理模块妈主要包括人力梯规划、工作管吸理和考勤管理闲三大部分组成丑。绑7.1制担人力规划制人力规划主要愤包括部门设置羊、职位设置、细人事设置、添普加员工、填写咳合同、合同管舅理和合同模期版缠7池部分组成。1．部门设置撑部门设置主要礼用于用户管理表部门的名称，灵包括显示、添裂加、修改和删姑除部门信易息各4过个部分。部门显示平当用户在单胡击羊“创部门设如置五”丛超链接时，页目面在展示区会烈显示出部门名扫称，并且按级补别进行排序。陈其程序代码如蹄下：争<!--#i芒nclude滥file=出DataBa富se/con涨n.asp-岛-><% 辆setrs烦=serve烧r.Crea崖teObje犹ct("ad貌odb.re废cordse懒t")饲sql="s版elect梳*from毁tb_De郊ptord咐erby搞up"妄rs.ope棵nsql,解conn,1告,1杜dowhi黑lenot周rs.EO锅F摘海xian="广"验速fori=虚1tor溪s("lev忆el")-1无的挽xian=膝xian&遮"守├育" next顾跌xian=倡xian&模"后〖刘<ahre逼f=dept拍open.a袋sp?id=择"&trim增(rs("i单d"))&"锦targe堂t='xia婶n'>"&t君rim(rs握("titl窝e"))&"伞</a变>织〗撕<br>"学 %>谷霸<%=xia情n%> <%桶籍rs.mov排enextloop%>先当用户在页面味展示区内在单连击部门名称的狗超链接时，会恋在右侧显示出壤其部门的详细侧信息。主要是辰根据传递的参刮数查找相应的输记录并显示来嗓实现的。查询焦部门详细信息注的程序代码如琴下：雾<!--#i堆nclude到file=唐DataBa层se/con习n.asp-尚-><%'部门名称京教setrs齿=serve值r.Crea炉teObje歪ct("ad泥odb.re逼cordse团t")黎归sql="s养elect示*from灾tb_De爆ptwhe哭reid=联"&requ优est("i慎d")期袄rs.ope雅nsql,撞conn,1品,1'上级部门辅猎ifrs(坚"shang羞ji")<>皂""the难n房setrs油s=serv息er.Cre倚ateObj阔ect("a责dodb.r直ecords翁et")密sqls="面select杏*fro凑mtb_D哭eptwh萝ereid催="&rs(寄"shang牵ji")散rss.op影ensql以s,conn伍,1,1昏骆endif'下级部门尼餐setrs迈d=serv逼er.Cre席ateObj旱ect("a昌dodb.r蜻ecords欢et")称让sqld="涌select剥*fro往mtb_D斯eptwh咸eresh蛮angji=迎"&requ梦est("i影d")答兴rsd.op私ensql殊d,conn进,1,1'职位名称正setrs舞z=serv期er.Cre衣ateObj钞ect("a狱dodb.r技ecords突et")朝sqlz="拦select狸*fro裁mtb_Z爸hiWei伶where嫌suoshu奴="&rs(骡"id")栋rsz.op静ensql盗z,conn散,1,1%>辩通过以下代码下显示部门名称沾：聪<%=rs(谅"title译")%>兔'朝部门名称袜通过以下代码特显示上级部门妄名称：没<%if胃rs("sh简angji"没)<>""母then%零><ahr斩ef=dep稠topen.进asp?id喜=<%=rs产s("id"裹)%>><%钞=rss("脂title"逝)%></a乎><%En妹dIf%杀>帝通过以下代码焦显示下级部门驾名称： <%距洞形dowhi夺lenot昂rsd.E这OF %>疏灾副<ahre户f=dept球open.a踢sp?id=瓜<%=rsd盯("id")盾%>><%=维rsd("t式itle")秃%></a>界 雅  <%阁串轨rsd.mo怒venext loop %>宰通过以下代码民显示部门描述浸：讽<%=rs(怖"conte闪nt")%>赏通过以下代码窑显示部门所含家职位的名称：<%墨dowhi世lenot像rsz.e光of%>反<a肃href=除"javas秧cript:记"onCli贞ck="wi糊ndow.o融pen('z夺hiweio破pen.as该p?id=<弄%=rsz(直"id")%云>','',爹'width强=350,h托eight=仗150')"蚀><%=rs晨z("zhi至wei")%辜></a乐>垂<%末rsz.mo职venextloop%>犯部门显示页面崇的运行结果如川图柿5玉所示。晕图黄5偏鼠部门显示页面驰的运行结果部门添加搅部门添加主要巡用于添加部门插的名称。在添疾加部门名称时峡要先选择其上稀级部门，然后券进行添加。其优部门添加的设航计效果如摸图悬6饶所示。深图庄6艇倚部门添加页面甘设计效果狸部门添加页面带中涉及效的荣HTM盗L通表单如傲表态3稿所示。亭表发3坐躬翼馆骨部门添加页面挖中涉及街的炮HTM而L召表单元素陷名称剃类型脸含义挠重要属性疮form1冲Form篮表单劝method搅="post循"acti爪on=""鲁post齿hidden恳判断表单是否禽提交箩value=烈"true"课title慕text绳部门名称富value=零"<%=rs熄("titl码e")%>"障up匠select秃上级部门夫<optio仇nvalu妥e="<%=僻rs("id年")%>">弄<%=tem自pcataS偏tr%></这option贴>协Submit撤image火添加按钮谜value=孟"鄙提山交泛"src=玩"image执s/logi牲n_04.g旬if"稳Submit田2声reset役重置按钮望value=等"杏重置敬当用户单管击暗“佩添加部管门树”颗超链接后，进腹入部门名称添狗加页面，填写鱼完部门名称，完【添加】按钮墓，系统会把用酸户添加的数据泪提交给本页进漂行数据处理。剪其数据处理的技程序代码如下樱：踏<!--#i绢nclude没file=炼DataBa多se/con找n.asp-吼-><%停callb抵umensh惩ezhi姥'颤上级部归门币id济setrs抬=serve率r.Crea龙teObje存ct("ad勺odb.re克cordse书t")咐sql="s铅elect里*from衔tb_De旱ptord件erby棒up"末rs.ope蒜nsql,尼conn,1音,1'添加部门隶ifreq雨uest("滩post")己<>""t屡hen夹毙ifreq速uest("激title"末)<>""锹then呈setrs榨c=serv克er.Cre幕ateObj枪ect("a剂dodb.r纹ecords吵et")件恒回sqlc="义select汗*fro特mtb_D帽eptwh要eresh顷angji=驻"&requ蚕est("u沟p")&"之andti织tle='"敏&reque荐st("ti忙tle")&喝"'"剪随勺rsc.op抚ensql逗c,conn躲,1,1叠拉鲜ifnot境rsc.e部ofthe赛n牙抬雨爽respon蜓se.Wri足te("<s词cript书langua炮ge=jav晴ascrip芝t>aler桨t(逢'易同一级别下的页部门不能重披名竖');loc层ation=店'javas跟cript:户histor输y.go(-圆1)'</s权cript>惕")半雅葬唱respon细se.End辈()迷盯典endif断收茂'紧上级部门级别执往塌setrs荣j=serv给er.Cre萝ateObj还ect("a敢dodb.r成ecords过et")慨言确sqlj="乌select让*fro帅mtb_D逢eptwh缘ereid召="&req同uest("秩up")把描阀rsj.op控ensql挣j,conn返,1,1水穴台up=rsj惹("up")跳棋千setrs络a=serv选er.Cre延ateObj瘦ect("a殖dodb.r柴ecords践et")诞仿脖sqla="财Select绢*fro脏mtb_D印eptwh纯ereid泽isnu亦ll"萍概慎rsa.Op嗽ensql窃a,conn误,1,3板久符rsa.ad古dnew拉眉牌rsa("t叹itle")删=reque族st("ti绢tle")券小仅rsa("l祝evel")哥=rsj("眨level"歌)+1寸廉夏rsa("u死p")=re携quest(宵"up")能告看rsa("s探hangji瞒")=req欠uest("颠up")录皆世rsa.up鼠date阴垫籍rsa.cl疏ose虎且冷'坊获邪取政id怒亿时setrs疤a=serv浓er.Cre盾ateObj盟ect("a热dodb.r告ecords松et")路绝监sqla="索Select棍*fro爱mtb_D购eptor巾derby脾idde虽sc"从辆似rsa.Op与ensql嫂a,conn持,1,3笛均欢id=rsa骆("id")涉答纷'榨添加排序摘以羞setrs迁a1=ser悠ver.Cr穗eateOb筛ject("质adodb.喇record高set")院悄捏sqla1=目"Selec骤t*fr天omtb_熊Dept"员拜蔽rsa1.O买pensq悠la,con舱n,1,3元拢镜rsa1("柏up")=u旬p&","&沸id国川兆rsa1.u效pdate启握河港rsa1.c馅lose硬量偏setrs屡c=noth造ing越健慨respon淋se.Wri烂te("<s凉cript遵langua误ge=jav曲ascrip率t>aler敌t(烈'究添加成仰功骆');par狼ent.lo咱cation忆.reloa继d()</s志cript>斥") else净热顷respon西se.Wri研te("<s接cript秋langua炒ge=jav竿ascrip汤t>aler传t(堂'刑请填写部门名哈称歇义');loc朝ation=吼'javas粒cript:非histor高y.go(-义1)'</s握cript>条")桃倾endifendif%>部门修改倡在部门详细信朴息显示页面（偷如床图乳7驳所示），单触击厌“该修改部诸门荐”御超链接，可以王对部门的名称负进行修改。其矮修改部门信息立页面设计效果申如在图垮8灿所示。芒图曲7朝兔修改部门信息拾页面设计效果女当用户单击【债修改】按钮，收会把用户修改管的数据提交给高本页进行数据伐处理。数据处年理的程序代码听如下：晃<!--#i搁nclude瘦file=兼DataBa筑se/con标n.asp-搭-><%焰ifreq率uest("松post")掩<>""t趟hen肝setrs勤a=serv世er.Cre情ateObj肉ect("a最dodb.r岸ecords避et")义sqla="猫select搏*fro瞎mtb_D螺eptwh家ereid粮="&req至uest("魔id")仓rsa.op岗ensql新a,conn肿,1,3炼rsa("t撤itle")态=reque族st("ti修tle"珍)知’炒添加标题巾rsa("c固ontent微")=req早uest("责conten化t"方)绿’陪添加内容勤rsa.up傻date妻rsa.cl卧ose膏r鉴espons需e.Writ凝e("<sc宵riptl网anguag给e=java般script马>alert屑(倘'遍修改成欣功垃');ope兽ner.lo撇cation鸽.reloa及d();wi流ndow.c昂lose()颤</scri获pt>")棵’贴括关闭窗口时刷补新父窗口endif%>部门删除贺在部门详细信乘息显示页面（战如添图悄6太所示），单垂击北“态删除部跪门添”采超链接，可以雀对部门的名称境以及其部门下见级的有部门及俭其相关信息删口除。其删除部侍门的程序数据膝处理代码如下稍：有<!--#i路nclude贤file=干DataBa新se/con泰n.asp-洞-><%售doid=r邮equest检("贼del练")俗ifreq踏uest("兆del糠")=1t洽hen书杆respon墙se.Wri桂te("<s史cript锯langua明ge=jav旗ascrip纲t>aler哈t(帐'收对不起这个部叮门不能删除哲！沾')</sc喇ript>"稳)else徒浮ifreq季uest("本del呀")<>""划then左阴失setrs稀b=serv伟er.Cre竿ateObj掘ect("a句dodb.r哗ecords谨et")斤疮站sqlb="知Select草*fro壁mtb_d纤eptwh陶ereid傍="&doi伏d杰加施rsb.Op退ensql惹b,conn嫩,1,3权简蜘ifnot缘rsb.E盼OFthe缸n算稍伏絮bup=侮rsb("u幸p")隆狮霞斥俊危肠瘦亚掉乘setrs摸d=serv艰er.Cre罩ateObj著ect("a甲dodb.r厅ecords丽et")堪汤系否丧sqld="课Select乒*fro逝mtb_d逝ept"蒜牵腰虚rsd.Op皇ensql诱d,conn尤,1,3虑着倾令dowhi袄lenot农rsd.E稠OF标斤伤狗厘dup=市rsd("u轮p")延宽晕熄波delid延=rsd("货id")怎宵况扭许拦竟扮ifInS慈tr(bup息,",")辞<0th氧en芽磨迅狭速打del_na宽me=spl祝it(dup天,",")拌久傻惯麻材ifdel业_name(聪0)=b级upthe计n鹿贴肺洗闲嗽斗rsd.De猫lete井漫好死图协辅rsd.Up对date腾涝浇扰药祖患setrs驻re=ser摩ver.Cr碎eateOb誉ject("较adodb.俱record璃set")印亩且欺闪域共sqlre=身"selec市t*fr企omtb_研Employ霸eewhe脚resuo茂shu="&吓delid要礼穷在腔坛迈rsre.o渗pensq扒lre,co萝nn,1,1粉弊博着成唐喝dowhi架lenot却rsre.只eof暴负帅望坏臭替手么扒城狗耐肥摇setrs秘=serve乔r.Crea催teObje们ct("ad喘odb.re慕cordse秒t")亿疑丹初盘鼓菜因sql="s胆elect仓*from类tb_Us腥erwhe诵renam票e="&rs举re("id倘")矮紧残蜂秆忍爬资rs.ope庆nsql,宏conn,1供,3坑片晒井绵窃伍阅dowhi统lenot唱rs.eo萝f柱链担绍瓦闸海泪拾动subdel匹1伞纺宽例腥屿乡标loop梳分核跑典畜究电subdel循2佣岂懂苹尤活交loop强劈浴融孙丑endif联惠告构贤功respon缺se.wri另te"<s胃cript率langua邪ge=jav坑ascrip始t>aler唯t(兰'创部门删除成功含！竿');par窃ent.lo针cation材.reloa帅d()</s疗cript>互"湖微输钢亚else扁耳班广勿镜ifInS她tr(dup悔,bup)职>0th壮en梁誉押组川姑险rsd.De仍lete胆借根帜司框阁rsd.Up丸date仗呀芬凤宝颤玻setrs钻re=ser陪ver.Cr趁eateOb汉ject("际adodb.重record敬set")吩购鹊粒把栋具sqlre=围"selec摧t*fr喘omtb_艺Employ示eewhe黎resuo截shu="&彩delid敬开住疯免战格rsre.o丙pensq垃lre,co打nn,1,1跑蝇鬼难谷已之dowhi骤lenot趟rsre.秆eof膀池时堡厅锡隙毕setrs测=serve虑r.Crea傅teObje络ct("ad层odb.re岂cordse展t")既宇杰杠弊搞涨沙sql="s演elect烧*from寿tb_Us储erwhe葡renam旁e="&rs糕re("id仙")往盖睬揭独木模莲rs.ope盏nsql,精conn,1歼,3盒切沟箩叫铸睁娃dowhi寇lenot师rs.eo宜f帽改绢稿辟亡拒夫套subdel头1击义铃能锦雁苹悄loop肉汁染喊村阔旦嫌暗subdel览2焰将亭滨怖曲台loop毯贼么常怠镜endif稀婚恐型尽endif蒸可异区屑rsd.Mo艘veNext艺傍优储loop吧竞圈击respon酬se.wri六te"<s纹cript匀langua辅ge=jav丹ascrip删t>aler筝t(随'鱼部门删除成功乔！绘');par智ent.lo帽cation蚁.reloa宜d()</s雅cript>款"圾驶捏瞧rsd.cl映ose戚昂由险setrs平d=noth裳ing超坛锅endif派沙endifendif菌subsu耀bdel亏1池’冶衰删除其他表中于含有用户名的赔记录组现sql1="饶delete受from讨tb_Wor乎kwher题ebuzh锐izhe='绪"&rs("吓userna择me")&"健'"资掏conn.e佳xecute缝(sql1)未劝sql2="疫delete木from判tb_Mes看sagef园where捡fabuzh查e='"&r陪s("use愉rname"申)&"'"哄末conn.e鸣xecute占(sql2)票刷sql3="原delete佛from权tb_Mes渔sagew青heref联abuzhe喇='"&rs程("user锣name")燥&"'"终爹conn.e搞xecute茶(sql3)沈庸sql4="楚delete割from迫tb_Let圣ter_s恨where择name='软"&rs("她userna蹲me")&"表'"天尤conn.e历xecute酱(sql4)擦讽sql5="语delete瓜from趁tb_Let碍ter_f遥where绘name='不"&rs("赴userna谣me")&"甚'"伞渣conn.e敞xecute番(sql5)蝶绍sql6="堪delete带from早tb_Lea符vewhe伐renam田e='"&r悼s("use胸rname"痰)&"'"医栋conn.e获xecute暮(sql6)贯权sql7="姑delete愚from鸭tb_Kao怜qinwh缺erena员me='"&闹rs("us统ername豆")&"'"厌妻conn.e棉xecute秃(sql7)聋痕sql8="概delete播from应tb_Job身where府name=泰'"&rs(尤"usern分ame")&贺"'"遮共conn.e你xecute覆(sql8)症污rs.mov飘enext蝴endsu劲b树subsu欲bdel题2拆’随灾删除其他表中弹含有用户块名窃i建d建的记录踪蹄sql9="以delete已from简tb_Emp嘉loyee嗓where皱id="&r汇sre("i咏d")嘉哀conn.e津xecute借(sql9)圈昏sql11=界"delet俱efrom吵tb_Wa刘gewhe竿renam淡e="&rs构re("id届")半智conn.e销xecute律(sql11匠)开串sql12=脏"delet像efrom述tb_Us条erwhe轨renam鹰e="&rs嘱re("id胆")于茅conn.e恐xecute伞(sql12巧)遍胃sql13=联"delet痛efrom凡tb_Me踢ssagef茅where环jiesh不ouzhe=稠"&rsre链("id")沾淹conn.e嗽xecute笨(sql13稠)济捉sql14=吴"delet盲efrom徐tb_Me灌ssage殃where蝴jiesho进uzhe="叶&delid帅奶conn.e显xecute修(sql14蛇)旨药sql15=终"selec宰t*fr抓omtb_再Letter贷_swhe因redui映xiang=选'界个吼人叠'and胁point=劣"&rsre仇("id")躺瞧conn.e笋xecute剑(sql15累)拌粒sql16=蛙"selec盲t*fr请omtb_旺Letter饶_fwhe邮redui遗xiang=清'棚个贱人充'and士point=雷"&rsre倡("id")廊翅conn.e鲜xecute选(sql16之)脚胀sql17=系"selec届t*fr圣omtb_共Workw蓝herew蹦anchen露glei=帖'母个程人商'and河wanche雾ngzhe=燕"&rsre剩("id")滚预conn.e惧xecute菠(sql17趁)身姻rsre.m葬ovenex戴t笨endsu恋b%>2．职位设置男职位设置主要珍是设置部门所舱包含的职位。器包括职位信息惭的显示、添加欺、修改和删除存。由于没有特满殊的技术，下稍面只给大家介芦绍职位的显示剂，其他部分不控做详细介绍。之如有问题，请梢查看附赠的光嫂盘。耐职位信息显示的主要是显示部间门所包含的职浑位的名称。其俩程序代码如下帝：<%尺maxp富age=0医'欲设总页数默认沈为慢0弯setrs炊=serve庄r.Crea哄teObje填ct("ad白odb.re螺cordse璃t")往sql="S秩elect催*from猛tb_de朵ptord雕erby妖up"偶rs.Ope女nsql,飘conn,1财,1涂ifnot连rs.eo地fthen‘实现分页吹每show=1澡5女'这每页显示的记研录数杂柔tol=rs荐.recor快dcount河'静总记录数赚仇rs.pag截esize=滚show拉语maxpag熊e=rs.p蜻agecou抖nt景'言总页数庭距reques构tpage=控clng(r另equest琴("p"))剂'锈获取当前页码裳适ifreq湾uestpa筐ge=""叛orreq利uestpa傍ge=0t笼hen衔掘滔reques钳tpage=年1笨危endif蜡清ifreq犬uestpa坛ge>max皆paget铲hen技踏酷reques崇tpage=担maxpag塞e科桃endif谢膏ifnot桐reque去stpage抖=1the自n甘跟棚rs.mov付e(req杆uestpa肿ge-1)*粉rs.pag具esize仍青endif纲畏fori=俱1tor乌s.page掉sizea浆ndnot唤rs.eo蒜f '职位名称缝息setrs塘z=serv铁er.Cre扁ateObj俗ect("a筐dodb.r桌ecords摩et")申扑sqlz="咏select苦*fro辈mtb_Z汉hiWei焰where贫suoshu糠="&rs(妹"id")湾父rsz.op蝴ensql慢z,conn燃,1,1 %>冤寸<tr>叶巷蛾<tdhe殃ight="侨28"bg落color=主"#FFFF摇FF"cl牙ass="l柜eftdia倒n"><di婶valig婆n="cen祖ter"><挡%=rs("慎title"壶)%></d肾iv></t允d>恒霜者<tdco附lspan=策"2"cl宿ass="d坏ian"><馒%便膨眉dowhi千lenot委rsz.e段of %>胁吼千<ah柏ref="j恶avascr角ipt:"o举nClick纱="wind相ow.ope布n('zhi祸weiope毙n.asp?叶id=<%=显rsz("i贼d")%>&忌name=<毅%=sess剑ion("n即ame")%药>','',钟'width左=350,h疼eight=拴150')"藏><%=rs与z("zhi今wei")%待></a误>跟 <%咐火棚rsz.mo牺venext loop %> </td>睡村</tr声> <%牵鄙rs.Mov该eNext昂役ifrs.划eofth究enexi脊tfor nextelse踩膜respon满se.Wri腥te(豆"习没有任何职傅位上")endif隶rs.Clo壳se()膝setrs励=nothi询ng%>胀职位显示页面帮的运行结果如首图弦8揉所示。团图旷8展蛾职位显示页面授的运行结果3．人事设置搁持人事设置主要搭是对人员职位希的设置。主要妄包括员工职位仅的添加、员工拢职位信息显示植、员工职位信幼息删除。，由过于信息显示在进前面章节中已六经介绍过，在康这里不再详细古介绍，只介绍清添加职位。缝添加职位中的瓣员工信息是从销表中读取出来漫的。员式职位港信息添加的设羡计效果如排图选9岸所示。枯图辟9她演添加员工职位某页面的设计效益果售员工职位添加屡页面中涉及乔的后HTM亩L谊表单元素如绳表掘4胁所示。讽表艺4朗丘悦盆椅员工职位添加迅页面中涉及闪的资HTM宁L蛮表单元素容名称傻类型济含义贪重要属性颗form1脾Form叮表单逃method市="post术"acti杰on="e长mploye凑esave.险asp"肢post量hidden蒸判断表单是否售提交填value=栗"true"筛nameid娇select院员工名称盲value=焰"<%=rs伴("id")漠%>"锡zhiwei码select傍职位名称戴value=点"<%=rs财z("id"随)%>"追Submit拐image柴登录按钮捎value=泳"非提有交耗"困Submit桂2剥reset喘重新添按钮副value=串"拘重置须Submit再3法button瓶返回按钮丝onClic恩k="loc叼ation=闲'javas慕cript:远histor妈y.go(-孟1)'"v仗alue=寺"症返枝回礼"cla舞ss="bo黎tton"遭在单击【提交论】按钮之后，绪用户添加的数沾据将被提交给就数据处理页，灭本页将根据用漆户添加的数据违进行相应的处怕理。员式职位裙添加的程序代导码如下：价<!--#i乐nclude逃file=复DataBa润se/con想n.asp-跟-><%兼callr驰enshis钳hezhi匙ifreq诊uest("脖post")土<>""t僵hen缘ifreq暂uest("划nameid扬")=""喝then神惩心respon魄se.Wri绞te("<s干cript沟langua觉ge=jav坚ascrip替t>aler忙t(衰'稿员工不能为空挂，请先添加员其工仪');loc事ation=咸'javas转cript:粥histor设y.go(-伴1)'</s锡cript>恒")掘respon窜se.End李()endif希雀'迎获取部杨门摘id伏setrs递b=serv研er.Cre晒ateObj耀ect("a径dodb.r雨ecords薯et")砖sqlb="测select恰*fro物mtb_Z士hiWei远where遣id="&r将equest舒("zhiw准ei")芹rsb.op夹ensql愧b,conn伯,1,1袋bumen=允rsb("s咽uoshu"蜘) '职位设置创setrs翁=serve堡r.Crea写teObje垦ct("ad宵odb.re与cordse黎t")写sql="s鼻elect谢*from疼tb_Em帅ployee部where堤id="&智reques穷t("nam臂eid")杜rs.ope枪nsql,凳conn,1突,3之rs("zh裁iwei")彼=reque吗st("zh盼iwei")淹rs("su机oshu")赖=bumen滥rs("ko询ng")=1锦rs.upd歉ate羞rs.clo侵se猜舍respon幼se.Wri漏te("<s牌cript迟langua社ge=jav如ascrip闭t>aler循t(堪'猛提交成东功丸');loc手ation=员'emplo袭yeeedi移t.asp'生</scri促pt>")endif%>仇员工职位添加替页面的运行结幅果如杯图企1狠0活所示。热图绳10湿墙员工职位添加盟页面的运行结足果4．添加员工皇添加员工主要焦用于用户添加箱员工的详细信啊息。在功能导挺航区中单温击读“湿添加员醉工笔”话按钮，在展示底区中会显示员抛工信息添加页即面。员工信息梦添加页面的设谢计效果如饱图寒1奋1攀所示。煌图彼11磁螺员工信息添加民页面的运行结揉果歪在添加页面中橡单击【提交】驰按钮，用户添贿加的数据将被孔提交给本页，遮而数据处理页舒则将企业人才欢库表里的数据搭导入员工信息耀表里，其代码贱如下：瓜<!--#i死nclude脉file=电DataBa承se/con印n.asp-屈-><%远ifreq务uest("劈post")受<>""t娇hen赌伯ifreq己uest("蕉nameid肝")=""铺then箭硬肢respon貌se.Wri耀te("<s败cript新langua蹄ge=jav近ascrip诞t>aler饲t(碍'衣没有员工不能激添矮加柿');loc花ation=痰'javas堆cript:紧histor访y.go(-胡1)'</s际cript>戒")撑'门判断员工名称颗是否为空，如固果为空返回上辞一级页面赔蛙歌respon愚se.End瘦()套抵endif慧'忆从表落tb_Job贡base岁导进表泳tb_Emp室loyee史仗setrs腔=serve招r.Crea站teObje淹ct("ad矩odb.re鄙cordse段t")种奖sql="s脾elect飞*from女tb_Jo盈bbase牵where墙id="&r恢equest遍("name息id")屈丛rs.ope塔nsql,领conn,1伶,1匹运setrs资d=serv庄er.Cre笼ateObj搜ect("a城dodb.r完ecords夺et")成威sqld="淘select灯*fro逃mtb_E秒mploye净e"彻嘱rsd.op启ensql裂d,conn谦,1,3藏芒rsd.ad怕dnew绞伴rsd("n饲ame")=压rs("na饰me")押底rsd("e写name")揪=rs("e掀name")刮rsd("m押ianmao乳")=rs(内"mianm叙ao")扒错rsd("h择un")=r她s("hun挣")旧rsd("e温mail")狠=rs("e末mail")盼漆rsd("x诚ueli")味=rs("x忆ueli")征枯rsd("s伙chool"盘)=rs("伍school灰")妻烘rsd("a质ge")=r棉s("age桐")孤连rsd("z碑huanye记")=rs(肢"zhuan脆ye")蛋缓rsd("s详ex")=r姜s("sex谜")灵锣rsd("j裳iguan"办)=rs("派jiguan漫")衰渴rsd("x返ianzhi麦")=rs(戒"xianz责hi")貌愚rsd("t椒el")=r伤s("tel作")洗域rsd("h鲁ander"容)=rs("惑hander谱")胶慨rsd("c潮hushen炒g")=rs球("chus项heng")彼徒rsd("w亭ork")=痰rs("wo晃rk")童院rsd("j相ingong悬si")=r骗equest惯("jyea量r")&"-甲"&requ挠est("j兆month"临)&"-"&灶reques修t("jda济y")汇'宇把日期插入数坑据表中辣池rsd("k高ong")=株0倦于rsd.up私date苹蚁rsd.cl时ose较察setrs锤y=serv夕er.Cre拢ateObj侦ect("a钻dodb.r恭ecords界et")娃貌sqly="瓶select荡*fro步mtb_J润obbase设where泉id="&拾reques饰t("nam博eid")纲搅rsy.op业ensql命y,conn位,1,3挤珍rsy("y锦i")=1咬忙rsy.up膛date题习rsy.cl良ose箩武respon邀se.Wri诵te("<s卫cript床langua蹲ge=jav存ascrip划t>aler奏t(棉'榆提交成堪功额');loc粗ation=界'emplo距yeeadd渴.asp'<夏/scrip蹦t>")endif'显示员工%>孟当单击【详细冬资料】按钮后沙，系统会弹出泪一个新窗口显赞示此人的详细春信息，调挽用帮j示s湾自定义函数。泉显示详细资料乐的程序代码如扔下：淡<scrip泪tlang未uage="妈javasc诵ript">桃functi兴onmor会e(){爷varid述=form1良.namei疯d.valu促e;付window塑.open(毁"jobda乎oopen.辨asp?id盆="+id,唐"","wi聪dth=55会0,heig赵ht=600渗,促toolba柄r=no,l雄ocatio活n=no,s伪tatus=化no,men旅ubar=n霸o");}笼</scri析pt>5．填写合同便填写合同主要进用于填写企业挨与员工之间劳赶动合同的类型刺、期限截止的共信息。填写合毯同页面的设计帽效果如牺图扯1晴2根所示。犬图谷12存基填写合同页面韵的设计效果云在添加页面中耳单击【提交】半按钮，用户添泊加的数据将被赞提交给本页，妖本页将用户添宰加的数据进行苗相应的处理。寺填写合同和的落程序代码如下趋：价<!--#i标nclude土file=喷DataBa幻se/con患n.asp-匀-><%戚ifreq愉uest("杰post")题<>""t烛hen还钥ifreq锻uest("乳qixian贡")<>""您andr勒equest绳("name役id")t车hen尚悼'待判断合同期限锦和用担户现i宿d填不能为空持秋性setrs饼a=serv献er.Cre完ateObj兰ect("a推dodb.r袭ecords观et")群丛穗sqla="轰select莫*fro妥mtb_E叮mploye膀ewher萝eid="环&reque罚st("na首meid")厦东侧rsa.op鞋ensql惠a,conn攀,1,3搅旺惕弓轨rsa("h夺etong"笛)=requ价est("h辰etong"丙)神蛮纷rsa("q勺ixian"点)=requ铺est("q标ixian"研)母疮巧rsa("y辈ouxiao姻qi")=r眠equest势("cyea忧r")&"-知"&requ啄est("c构month"至)&"-"&摘reques剑t("cda讯y")&嘉"欧至译"&requ早est("z皇year")挨&"-"&r铺equest增("zmon疼th")&"续-"&req可uest("醉zday")仅意途rsa("z闯hengsh解i")=1蛾渴某rsa.up撞date谷寒挂rsa.cl秘ose慧阿协respon朗se.Wri窃te("<s踪cript凉langua宁ge=jav晴ascrip愉t>aler捏t(宴'宵提交德际成炎功疮');loc拣ation=培'pacta据dd.asp参'</scr捉ipt>")薯’亮尚提交成功弹出抖提示信息并转浑向指定页面 else咏咽花respon沸se.Wri务te("<s破cript竿langua疫ge=jav到ascrip价t>aler蜂t(箭'嚼人员名称或合敏同期限不能为太空朗');loc脏ation=鸟'javas碌cript:溪histor首y.go(-冈1)'</s陵cript>宴")碑畜endifendif%>6．合同管理喝合同管理主要拌是对已填写的绑合同进行信息嫁显示和修改。屡在数据库里通珍过一个字段来杠实现员工是否达填写了合同，胜其默认值灶为燃0师，表示为未填牲写合同贯，文1卖表示为填写合默同。合同显示恶的程序代码如泥下：<%策setrs专r=serv遗er.Cre板ateObj送ect("a除dodb.r敌ecords嘴et")浪sqlr="疮select查*fro日mtb_E稠mploye通ewher论ekong经=1and娃zheng欢shi=1"食rsr.op忘ensql镜r,conn拍,1,1%>身合同管理页面采的运行结果如裕图遣1满3惩所示。竹图冤13律乱合同管理页面竹的运行结果7．合同模版配合同模板是签没写合同内容的射模板。合同模尤板内容的显示冠和修改主要是疼根据传递的参订数进行查找相墓应的记录。查我询合同信息的展程序代码如下绘：<%他'祝获取默认参数幸ifreq辩uest("阳uid")<针>""th温en齿uid=re励quest(吼"uid")elseuid=6endif续setrs宜=serve竿r.Crea烧teObje流ct("ad辉odb.re轻cordse庭t")也sql="s厚elect眠*from朝tb_Pa拒ctwhe发reid=午"&ui越d勿’聪悄显示合同信息孝rs.ope宵nsql,撑conn,1董,1%>棕7.2些苏工作管理铸工作管理主要练包括布置工作岗任务、管理工鲜作任务和在线壮发布通正知权3乞个部分。砌1级．布置工作任仇务片布置工作任务偶主要是把工作忆合理地分配到辜公司的某个部举门或者某个员卧工。布置工作膝任务页面的设邻计效果如芝图劣1泪4纤所示。浅图咸14求楼布置工作任务所页面的设计效衬果响布置工作任务梦页面中涉及沃的钞HTM赖L陆表单元素如络表吵5蓝所示。绣表递5暗户夜规乞布置工作任务厉页面中涉及极的柜HTM景L刃表单元素下名称巧类型阴含义传重要属性脱form1还Form挺表单芳method附="post醒"acti吴on=""砖post胜hidden羊判断表单是否帆提交纽value=找"true"些title铅text脉任务名称店conten巴t稻textar霞ea括任务内容戒cols="算50"ro斤ws="5"岩bumen谅select熟部门旷value=纪"<%=rs防("id")格%>"狸geren遮select轮个人掉value=亮"<%=rs河r("id"继)%>"匹wanche夸ng泡radio悔选择完成方式晕value=耀"飞部饭门桂"氧value=办"乎个贵人豪"玩value=授"梨全部员来工甲"锣wanche杨ngtime阿text画完成的期限畜Submit身submit际重置按钮伸class=的"botto蹦n"val观ue="陪膛递序险交群"踩在布置工作任关务页面中，用刻户填写完工作薯任务后，单击飞【递交】按钮正，用户添加的遇数据将被提交烟给本页，本页禾将根据用户提快交的表单信息猛对数据进行相埋应的处理。布菜置工作模块的嗓程序代码如下桶：响<!--#i换nclude窗file=涌DataBa客se/con滨n.asp-慎-><%料ifreq释uest("挑post")淹<>""t顶hen稀咏ifreq锈uest("霜title"市)=""t切hen勇址立respon鹅se.Wri抓te("<s饶cript重langua怜ge=jav勾ascrip微t>aler湾t(购'葱任务名称必须震填控写介');loc防ation=阵'javas而cript:凑histor鉴y.go(-季1)'</s份cript>够")订阅静respon亚se.End聪()伸税endif诵互根ifreq天uest("屑conten延t")=""悄then院劫罢respon蝇se.Wri筒te("<s增cript拿langua士ge=jav劣ascrip证t>aler牲t(掘'燃任务内容必须隐填辫写旦');loc膛ation=和'javas遇cript:洪histor部y.go(-咸1)'</s注cript>爷")扣菠跨respon顺se.End劣()碎仿endif驰捏全ifreq蛋uest("头wanche抱ngtime斧")=""殃then谣绢嗽respon止se.Wri俭te("<s缠cript羊langua素ge=jav永ascrip搅t>aler灭t(父'伍任务期限必须饼填毅写拐');loc蒸ation=轧'javas鼠cript:颗histor公y.go(-擦1)'</s池cript>视")妖饼解respon猴se.End暗()肿宅endif舟爹烂'忆取完成者的名游称怒脊select扔case被reques妖t("wan盈cheng"慢)械悲case幼"乏部钳门脸"顺恒调wanche骗ngzhe=嗽reques婚t("bum犹en")给蹲case乐"各个毕人独"神骤拘wanche朽ngzhe=葬reques朱t("ger怒en")组呈case嗓"个全部员创工团"距就丽callq槽uanbuy制uangon郊g瓦番endse市lect '布置任务爸蛙setrs对a=serv互er.Cre度ateObj全ect("a津dodb.r含ecords泡et")槽卷sqla="电select胜*fro陵mtb_W违ork"诱围rsa.op亚ensql悉a,conn思,1,3仍悼rsa.ad立dnew周转rsa("b谨uzhizh绘e")=se协ssion(至"admin医_name"铃)破胖rsa("t淘itle")施=reque粗st("ti廉tle")谅颂rsa("c供ontent车")=req饶uest("显conten伟t")三熟rsa("b责uzhiti锹me")=n载ow()膏岛rsa("w塘anchen莫gzhe")闪=wanch隐engzhe中数rsa("w贺anchen粱gtime"的)=requ馒est("w疑anchen却gtime"宽)捕躲rsa("w赵anchen烫glei")绘=reque提st("wa落ncheng循")玩毛rsa("w凭anchen托gdu")=猛"亭未完麻成流"绘行rsa.up装date稍围rsa.cl曲ose鉴绑respon纯se.Wri逮te("<s伟cript辈langua缓ge=jav逐ascrip贵t>aler星t(秤'句布置成劫功窄');loc闲ation=另'worka夏dd.asp牵'</scr午ipt>")endif圾'算发送到全部员派工摄functi恒onqua戏nbuyua隆ngong添久setrs暂aff=se惧rver.C壤reateO章bject(眉"adodb值.recor腿dset")蔽签sqlaff铜="SELE饮CTdbo士.tb_Em蓝ployee本.idFR乓OMdbo吵.tb_Em类ployee烂INNER针JOIN仇dbo.tb吉_User垒ONdbo卖.tb_Em芽ployee伐.id=捎dbo.tb薯_User.忌name"特揪rsaff.细opens退qlaff,胁conn,1蛇,3赔脱dowhi蚂lenot跪rsaff神.eof '布置任务牧论setrs阅a=serv刻er.Cre望ateObj惠ect("a摆dodb.r仓ecords慨et")旅拌sqla="千select聪*fro符mtb_W土ork"冒攀rsa.op嗓ensql咽a,conn栏,1,3羡耳rsa.ad旧dnew旷丸rsa("b痒uzhizh柄e")=se够ssion(夫"admin真_name"较)陈妇rsa("t掘itle")脖=reque前st("ti耕tle")截度rsa("c疤ontent逢")=req恩uest("扛conten汪t")亚它rsa("b宣uzhiti挠me")=n镰ow()彩财rsa("w贱anchen籍gzhe")击=rsaff岁("id")昆柿rsa("w兴anchen屑gtime"笛)=requ红est("w伸anchen投gtime"银)隐尽rsa("w乔anchen拴glei")疼=弃"录个年人隐"咱至rsa("w哭anchen酿gdu")=缺"绑未完裙成忽"档其rsa.up射date镜亏respon条se.Wri旧te(rsa男ff("id撞"))浅电rsaff.反movene燃xt loop予拴rsa.cl豪ose勿李respon玉se.Wri