📄 idview.asp

📁 如果你是个天才的话
💻 ASP
字号:
<% @language=vbscript%>
<!--#include file="conn.asp"-->
<html>
  <head><title>view</title></head>
  <body bgcolor="7C96B8">
   <%
if request("action")="nyr" then 
id=request("id")
year=request("year")
month=request("month")
date=request("date")
    set rs=server.createobject("adodb.recordset")
    set rs.activeconnection=conn
    rs.cursortype=3
    rs.open"select * from kqjl where  id='" & Trim(id) & "' and datepart(year,skday)='" & Trim(year) & "'  and datepart(month,skday)='" & Trim(month) & "'  and datepart(day,skday)='" & Trim(date) & "'"
'    response.write("表中共包含"&cstr(rs.fields.count)&"个字段名<br><br>")
   %>
   <P align=center><FONT face="华文行楷" size="5"><br><br>员工考勤信息表</FONT></P>
    <table border="1" width="100%">
     <tr bgcolor="316395">
        <td> <font color="#FFFFFF">记录号</font></td>
        <td> <font color="#FFFFFF">日期</font></td>
        <td> <font color="#FFFFFF">上下午</font></td>
        <td> <font color="#FFFFFF">工号</font></td>
        <td> <font color="#FFFFFF">姓名</font></td>
        <td> <font color="#FFFFFF">部门</font></td>
        <td> <font color="#FFFFFF">上班刷卡时间</font></td>
        <td> <font color="#FFFFFF">上班刷卡机器号</font></td>
        <td> <font color="#FFFFFF">上班情况</font></td>
        <td> <font color="#FFFFFF">下班刷卡时间</font></td>
        <td> <font color="#FFFFFF">下班刷卡机器号</font></td>
        <td> <font color="#FFFFFF">下班情况</font></td>
     </tr>
   <%
    i=0
    do while not rs.eof
      response.write("<tr><td>"&cstr(rs("no1"))&"</td><td>"&rs("skday")&"</td><td>"&rs("noon")&"</td><td>"&rs("id")&"</td><td>"&rs("name")&"</td><td>"&rs("bm")&"</td><td>"&timevalue(rs("sbtime"))&"</td><td>"&rs("sbkqno")&"</td><td>"&rs("sbkqxz")&"</td><td>"&timevalue(rs("xbtime"))&"</td><td>"&rs("xbkqno")&"</td><td>"&rs("xbkqxz")&"</td></tr>")
      rs.movenext
    loop
    response.write("</table>")
    conn.close
'    if conn.state=0 then
'      response.write("数据库成功关闭<br><br>")
'    end if
    set conn=nothing
elseif request("action")="ny" then 
id=request("id")
year=request("year")
month=request("month")
    set rs=server.createobject("adodb.recordset")
    set rs.activeconnection=conn
    rs.cursortype=3
    rs.open"select * from kqjl where  id='" & Trim(id) & "' and datepart(year,skday)='" & Trim(year) & "' and datepart(month,skday)='" & Trim(month) & "'"
'    response.write("表中共包含"&cstr(rs.fields.count)&"个字段名<br><br>")
   %>
   <P align=center><FONT face="华文行楷" size="5"><br><br>员工考勤信息表</FONT></P>
    <table border="1" width="100%">
     <tr bgcolor="316395">
        <td> <font color="#FFFFFF">记录号</font></td>
        <td> <font color="#FFFFFF">日期</font></td>
        <td> <font color="#FFFFFF">上下午</font></td>
        <td> <font color="#FFFFFF">工号</font></td>
        <td> <font color="#FFFFFF">姓名</font></td>
        <td> <font color="#FFFFFF">部门</font></td>
        <td> <font color="#FFFFFF">上班刷卡时间</font></td>
        <td> <font color="#FFFFFF">上班刷卡机器号</font></td>
        <td> <font color="#FFFFFF">上班情况</font></td>
        <td> <font color="#FFFFFF">下班刷卡时间</font></td>
        <td> <font color="#FFFFFF">下班刷卡机器号</font></td>
        <td> <font color="#FFFFFF">下班情况</font></td>
     </tr>
   <%
    i=0
    do while not rs.eof
      response.write("<tr><td>"&cstr(rs("no1"))&"</td><td>"&rs("skday")&"</td><td>"&rs("noon")&"</td><td>"&rs("id")&"</td><td>"&rs("name")&"</td><td>"&rs("bm")&"</td><td>"&timevalue(rs("sbtime"))&"</td><td>"&rs("sbkqno")&"</td><td>"&rs("sbkqxz")&"</td><td>"&timevalue(rs("xbtime"))&"</td><td>"&rs("xbkqno")&"</td><td>"&rs("xbkqxz")&"</td></tr>")
      rs.movenext
    loop
    response.write("</table>")
    conn.close
'    if conn.state=0 then
'      response.write("数据库成功关闭<br><br>")
'    end if
    set conn=nothing
elseif request("action")="n" then 
id=request("id")
year=request("year")
month=request("month")
    set rs=server.createobject("adodb.recordset")
    set rs.activeconnection=conn
    rs.cursortype=3
    rs.open"select * from kqjl where  id='" & Trim(id) & "' and datepart(year,skday)='" & Trim(year) & "'"
'    response.write("表中共包含"&cstr(rs.fields.count)&"个字段名<br><br>")
   %>
   <P align=center><FONT face="华文行楷" size="5"><br><br>员工考勤信息表</FONT></P>
    <table border="1" width="100%">
     <tr bgcolor="316395">
        <td> <font color="#FFFFFF">记录号</font></td>
        <td> <font color="#FFFFFF">日期</font></td>
        <td> <font color="#FFFFFF">上下午</font></td>
        <td> <font color="#FFFFFF">工号</font></td>
        <td> <font color="#FFFFFF">姓名</font></td>
        <td> <font color="#FFFFFF">部门</font></td>
        <td> <font color="#FFFFFF">上班刷卡时间</font></td>
        <td> <font color="#FFFFFF">上班刷卡机器号</font></td>
        <td> <font color="#FFFFFF">上班情况</font></td>
        <td> <font color="#FFFFFF">下班刷卡时间</font></td>
        <td> <font color="#FFFFFF">下班刷卡机器号</font></td>
        <td> <font color="#FFFFFF">下班情况</font></td>
     </tr>
   <%
    i=0
    do while not rs.eof
      response.write("<tr><td>"&cstr(rs("no1"))&"</td><td>"&rs("skday")&"</td><td>"&rs("noon")&"</td><td>"&rs("id")&"</td><td>"&rs("name")&"</td><td>"&rs("bm")&"</td><td>"&timevalue(rs("sbtime"))&"</td><td>"&rs("sbkqno")&"</td><td>"&rs("sbkqxz")&"</td><td>"&timevalue(rs("xbtime"))&"</td><td>"&rs("xbkqno")&"</td><td>"&rs("xbkqxz")&"</td></tr>")
      rs.movenext
    loop
    response.write("</table>")
    conn.close
'    if conn.state=0 then
'      response.write("数据库成功关闭<br><br>")
'    end if
    set conn=nothing
end if
   %>    
  </body>
</html>
💿 文件大小 2 K
👤 上传用户 maige49
📂 所属分类 SQL Server
⌨️ 快捷键说明

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