工资管理系统

  • r7_530372
    了解作者
  • 24.3KB
    文件大小
  • rar
    文件格式
  • 0
    收藏次数
  • VIP专享
    资源类型
  • 0
    下载次数
  • 2022-04-05 11:14
    上传日期
工资管理系统的全部代码,非常完备 &lt;HTML&gt; &lt;BODY BGCOLOR="#9CCDCD"&gt; <P align=center><FONT face=隶书 size=6>职工工资管理</FONT> <TABLE ALIGN="Center" WIDTH="100%" BORDER="0"> <TR HEIGHT="30" BGCOLOR="#EDF5F5" ALIGN="Center"> <TD><A HREF="list1.asp?no=First" TARGET="Bottom">第一个</A></TD> <TD><A HREF="list1.asp?no=Previous" TARGET="Bottom">上一个</A> <TD><A HREF="list1.asp?no=next" TARGET="Bottom">下一个</A> <TD><A HREF="list1.asp?no=last" TARGET="Bottom">最后一个</A> <TD><A HREF="list2.asp" TARGET="Bottom">修改</A></TD> <TD><A HREF="list3.asp" TARGET="Bottom">增加</A></TD> <TD><A HREF="list4.asp" TARGET="Bottom">删除</A></TD> </TR> </TABLE> &lt;/BODY&gt; &lt;/HTML&gt;
工资管理系统代码.rar
  • gzgl
  • List3.asp
    2.9KB
  • menu.asp.txt
    729B
  • List5.asp.txt
    1.6KB
  • MENU.ASP
    729B
  • List4.asp
    1.2KB
  • List2.asp
    1.5KB
  • List1.asp
    1.3KB
  • List6.asp
    2.1KB
  • List5.asp
    1.6KB
  • List4.asp.txt
    1.2KB
  • MAIN.ASP
    185B
  • List2.asp.txt
    1.5KB
  • List3.asp.txt
    2.9KB
  • List1.asp.txt
    1.3KB
  • RSGL.MDB
    114KB
  • List6.asp.txt
    2.1KB
内容介绍
<HTML> <HEAD><title>职工工资</title></HEAD> <BODY LANGUAGE=VBScript> <FORM METHOD='POST' name=frm1 ACTION='list3.asp'> <table border=1 align=center cellspacing=0 cellpadding=4 height=390> <TR><td width=100><td width=195> <TR><td >部门<td> <SELECT id=select1 style="width:100px" name=select1> <OPTION value="04">保卫<OPTION value="05">财务 <OPTION value="03">供销<OPTION value="02">技术<OPTION value="01">生产 </SELECT> <Input Type=hidden name=hid value='保卫'> <TR><td>编号<td><Input Type=text name=txt1 value=''> <TR><td>姓名<td><Input Type=text name=txt2 value=''> <TR><td>基本工资<td><Input Type=text name=txt value=0> <TR><td>岗位津贴<td><Input Type=text name=txt value=0> <TR><td>职务补贴<td><Input Type=text name=txt value=0> <TR><td>奖金<td><Input Type=text name=txt value=0> <TR><td>房租<td><Input Type=text name=txt value=0> <TR><td>水电<td><Input Type=text name=txt value=0> <TR><td>实发工资<td><Input Type=text readonly=true name=txt value=0> </table> <SCRIPT for=select1 EVENT=onblur LANGUAGE=vbscript> i=frm1.select1.selectedindex f=frm1.select1.options(i).text k=frm1.select1.options(i).value frm1.hid.value=f frm1.txt1.value=k frm1.txt1.focus </SCRIPT> <SCRIPT for=txt1 event=onblur LANGUAGE=VBScript> if len(frm1.txt1.value)<5 then msgbox "编号太短" frm1.txt1.focus else frm1.txt2.focus end if </SCRIPT> <% set conn=server.createobject("adodb.Connection") CS="Provider=Microsoft.jet.OLEDB.4.0;Data Source=" conn.ConnectionString=CS & Server.MapPath("rsgl.mdb") conn.Open set rs=server.createobject("adodb.recordset") rs.open "职工工资",conn,1,2,2 p=Request.form("txt2") if len(p)>0 then redim na(rs.Fields.count-1) For J=0 To RS.Fields.Count-1 na(j)= RS.Fields(j).name next redim bb(rs.Fields.count-1) bb(0)=Request.form("hid") bb(1)=Request.form("txt1") bb(2)=Request.form("txt2") For J=3 To RS.Fields.Count-1 bb(j)=Request.form("txt")(j-2) next RS.AddNew na, bb RS.Update end if Response.write "</table>" RS.close conn.close %> <table border=0 align=center height=50> <tr><td><INPUT type=submit value="确定增加"> </table> </Form> <SCRIPT for=txt event=onchange LANGUAGE=VBScript> w = ccur(frm1.txt(0).value)+ccur(frm1.txt(1).value) w=w+ccur(frm1.txt(2).value)+ccur(frm1.txt(3).value) w=w-ccur(frm1.txt(4).value)-ccur(frm1.txt(5).value) frm1.txt(6).value=w </SCRIPT> <SCRIPT for=txt event=onblur LANGUAGE=VBScript> if len(frm1.txt2.value)=0 then msgbox "姓名不能空" frm1.txt2.focus end if </SCRIPT> </BODY> </HTML>
评论
    相关推荐
    • HTML
      HTML HTML存储库。 HTML的嵌套库。
    • HTML教程
      HTML教程HTML教程HTML教程
    • HTMLHTML
      HTMLHTML
    • html
      html 佩拉蒂罕(Pelatihan)传播HTML和CSS
    • html相关
      html相关html相关html相关
    • Html教程
      Html教程 Html教程 Html教程 Html教程
    • html教程
      HTML教程关于基本语法的使用
    • html指南
      html查询指南,html格式
    • html
      html html 2021.03.22 HTML在Codecademy(chapter1)中的课程身体,头部,h,p,img,视频,标题,跨度,强壮,em 2021.03.23 HTML在Codecademy中学习课程(第2章)!DOCTYPE htmlhtml,table,thead,tbody ...
    • html学习
      html入门学习,适合初学者