search1.asp

一个毕业设计:企业工资管理系统,含毕业论文

<%@LANGUAGE="VBSCRIPT"%> 
<%
if session("password")<>"" then
session("return")=request.ServerVariables("SCRIPT_NAME")
%>
<!--#include file="Connections/conn2.asp" -->
<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_conn2_STRING
Recordset1.Source = "SELECT * FROM bbs1"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = -1
Repeat1__index = 0
Recordset1_numRows = Recordset1_numRows + Repeat1__numRows
%>
<!-- #include file="inc/top.asp"-->
<span class="unnamed2_14">

</span> 




<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td align="center"><table width="600" border="0" cellspacing="0" cellpadding="0" bordercolor="#eeeeee">
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr align="center"> 
          <td height="28"><span style="font-weight: bold">员工 工分 分类查询</span></td>
        </tr>
        <tr> 
          <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><table width="100%"  border="1" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td width="25%" height="19">
<form name="form1" method="post" action="search.asp">
                          <p>
                            <input name="xh" type="text" id="xh">
                          </p>
                          <p>
                            <input type="submit" name="Submit" value="提交">
                          </p>
                        </form></td>
                    </tr>
                    <tr> 
                      <td width="25%"><table width="100%"  border="1" cellspacing="0" cellpadding="0" bordercolor="#eeeeee">
                          <form name="form6" method="post" action="search.asp">
                            <tr align="center" bgcolor="#eeeeee"> 
                              <td width="100%">&nbsp;</td>
                            </tr>
                          </form>
                        </table></td>
                    </tr>
                  </table></td>
              </tr>
            </table></td>
        </tr>
      </table>
      <table width="60%" border="0" cellspacing="1" cellpadding="1">
        
        
        
        <tr> 
          <td><table width="768" height="25" border="0" align="center" cellpadding="0" cellspacing="0">
              
              
              
              <tr> 
                <td bgcolor="#EEEEEE">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<span class="unnamed2_14">年份： 
                  </span></td>
              </tr>
            </table>
            
            
            
            <% 
While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) 
%>
            <table width="787" height="51" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr> 
                <td width="14%" align="center" height="12">工号</td>
                <td width="14%" height="12" align="center">姓名</td>
                <td width="14%" height="12" align="center">项目</td>
                <td width="14%" height="12" align="center">工分</td>
                <td width="14%" height="12" align="center">月份</td>
                <td width="14%" height="12" align="center">类型</td>
                <td width="14%" height="12" align="center">算法分数</td>
              </tr>
              <%
			  if flag = false then
			  %>
              <tr> 
                <td align="center" height="30"><%=(Recordset1.Fields.Item("xh").Value)%> </td>
                <td width="14%" height="30" align="center"><%=(Recordset1.Fields.Item("cj").Value)%></td>
                <td width="14%" height="30" align="center">&nbsp;</td>
                <td width="14%" height="30" align="center">&nbsp;</td>
                <td width="14%" height="30" align="center">&nbsp;</td>
                <td width="14%" height="30" align="center">&nbsp;</td>
                <td width="14%" height="30" align="center"><font color="#FF0000"><strong> 
                  <% cj1=Recordset1.fields("cj")/23*7*1.2%>
                  <% =cj1%>
                  </strong></font> </td>
              </tr>
            </table>
            <% 
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  Recordset1.MoveNext()
Wend
%> </td>
        </tr>
      </table> 
      
      
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="14"> <div align="center">没有您需要的信息</div></td>
        </tr>
      </table>
      <%end if%>
      <p>&nbsp;</p></td></tr>
</table>
<!--#include file="inc/copyright.asp"-->
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>