員工信息管理系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)-文庫(kù)吧資料
2025-04-13 23:04本頁(yè)面
【正文】 sql=select * from worker order by amp。wid=amp。kyearamp。amp。)) if cs thenrs(wid)=widrs(kq)=加班rs(jtime)=csrs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=下午end ifnext ?mm=amp。)) if cs thenrs(wid)=widrs(kq)=曠工rs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=下午end ifcs=trim((jxamp。)) if cs thenrs(wid)=widrs(kq)=事假rs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=下午end ifcs=trim((kxamp。)) if cs thenrs(wid)=widrs(kq)=公假rs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=下午end ifcs=trim((sxamp。)) if cs thenrs(wid)=widrs(kq)=病假rs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=下午end ifcs=trim((gxamp。)) if cs thenrs(wid)=widrs(kq)=早退rs(ctime)=csrs(date)=irs(km)=kmonthrs(sx)=下午rs(ky)=kyearend ifcs=trim((bxamp。)) if cs thenrs(wid)=widrs(kq)=遲到rs(ctime)=csrs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=下午end ifcs=trim((zxamp。)) if cs thenrs(wid)=widrs(kq)=加班rs(jtime)=csrs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=上午end ifcs=trim((cxamp。)) if cs thenrs(wid)=widrs(kq)=曠工rs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=上午end ifcs=trim((jsamp。)) if cs thenrs(wid)=widrs(kq)=公假rs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=上午end ifcs=trim((ksamp。)) if cs thenrs(wid)=widrs(kq)=事假rs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=上午end ifcs=trim((gsamp。)) if cs thenrs(wid)=widrs(kq)=病假rs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=上午end ifcs=trim((ssamp。)) if cs thenrs(wid)=widrs(kq)=早退rs(ctime)=csrs(date)=irs(ky)=kyearrs(km)=kmonthrs(sx)=上午end ifcs=trim((bsamp。)) if cs thenrs(wid)=widrs(kq)=遲到rs(ctime)=csrs(date)=irs(km)=kmonthrs(ky)=kyearrs(sx)=上午end ifcs=trim((zsamp。/SCRIPT end ifwid=rs(id)Set rs = ()sql=select * from rool sql,conn,3,2for i= 1 to 31cs=trim((csamp。)。 sql,conn,3,2if thenSCRIPT language=JavaScriptalert(39。oamp。 and card_no =39。nameamp。rs(part) sql2,conn,3,2% %=rs2(uses_name)% %% /td……(1)圖 44 分配用戶權(quán)限頁(yè)面(2)代碼如下：……Set rs = ()sql=select * from worker sql,conn,3,2name=trim((name))memo=trim((memo))if len(memo)1 then memo= end ifcard_no=trim((card_no))if len(card_no)1 then card_no= end ifpart=trim((selparts))if len(part)1 then part= end iftel=trim((tel))if len(tel)1 then tel= end ifadd=trim((add))if len(add)1 then add= end ifsex=trim((sex))if len(sex)1 then sex= end ifwh=trim((wh))if len(wh)1 then wh= end ifjc=trim((jc))if len(jc)1 then jc=200011 end ifzc=trim((zc))if len(zc)1 then zc= end ifzw=trim((zw))if len(zw)1 then zw= end ifgl=trim((gl))if len(gl)1 then gl=0 end ifhth=trim((hth))if len(hth)1 then hth= end ifhtq=trim((htq))if len(htq)1 then htq=0 end ifhtdq=trim((htdq))cardno=trim((cardno))if len(cardno)1 then cardno= end ifsj=trim((sj))if len(sj)1 then sj= end if……(3) 考勤記錄及統(tǒng)計(jì)管理模塊(1)(2)代碼如下:……Set rs = ()sql=select * from worker where name=39。/SCRIPT end if =10…… % (4) 代碼如下: ……Set rs = ()sql=select * from worker where id= amp。)。 sql,conn,1,1 if and then SCRIPT language=JavaScriptalert(39。 amp。/SCRIPT end if =10 if pagecount or pagecount=0 then pagecount=1 end if =pagecount %…… (3)% …… sql=select * from worker where outone=1 order by amp。)。 end if sql,conn,1,1 if then SCRIPT language=JavaScriptalert(39。 and part= amp。t2amp。 and card_no like 39。t1amp。 else sql=select * from worker where name like 39。t2amp。 and card_no like 39。t1amp。Set rs = ()Set rs1 = ()Set rs2 = ()Set rs3 = ()%//連接數(shù)據(jù)庫(kù) 頁(yè)面框架（1）圖 42 管理登陸頁(yè)面(2)圖 43 菜單頁(yè)面 員工列表查看模塊(1)圖 43 員工列表頁(yè)面(2)…… sql=select * from worker where name like 39。 DefaultDir amp。圖 41 用戶登錄頁(yè)面 (2)…… session(dlm)=dlm session(type)=database end if if session(dlm) then if session(type)=管理員 then Session(userlogin)=true
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1