⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 accdiary_updjg.asp

📁 这个系统是企业管理系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Check_Sql123.asp" -->
<!--#include file="admin_qx.asp" -->
<% call isgly_sys() %>
<% Response.Buffer =True  
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0  
Response.CacheControl = "no-cache"  
Response.AddHeader "Pragma", "No-Cache" %>

<!--#include file="conn_db123.asp" -->

<%
ziduan=trim(request("ziduan"))
key=trim(request("key"))
by=trim(request("by"))

if key<>"" and ziduan<>""then
sql="select * from diary_updjg  where  "&ziduan&" like '%"&key&"%'"
end if

if  key=""then
sql="select * from diary_updjg  where  upd_ID is not null "
end if

if by="" then
sql=sql & " order by  lastupddate desc"
end if
if by<>"" then
Select case by
      
       case "jg_nameasc"
             sql=sql & " Order by  jg_name asc"
       case "jg_namedesc"
             sql=sql & " Order by jg_name desc"
		case "lastupduserasc"
             sql=sql & " Order by  lastupduser asc"
       case "lastupduserdesc"
             sql=sql & " Order by lastupduser desc"
		case "lastupdnameasc"
             sql=sql & " Order by  lastupdname asc"
       case "lastupdnamedesc"
             sql=sql & " Order by lastupdname desc"
			 case "danweiasc"
             sql=sql & " Order by  danwei asc"
       case "danweidesc"
             sql=sql & " Order by danwei desc"
		case "lastupdipasc"
             sql=sql & " Order by lastupdip asc"
       case "lastupdipdesc"
             sql=sql & " Order by lastupdip desc"	
       case "lastupddateasc"
             sql=sql & " Order by lastupddate asc"
       case "lastupddatedesc"
             sql=sql & " Order by lastupddate desc"		 
       End Select
end if
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,2
if  rs.eof then
response.write "<script language=JavaScript>{window.alert('提示:没有找到符合条件的记录,将返回“前一页面”!\n\n   请按“确定”返回!');window.history.go(-1);}</script>"
response.end
end if

PageSize=trim(request("pageSize"))
if PageSize<>""then
session("pageSize")=PageSize
pz=PageSize
end if
if PageSize=""then
 if session("pageSize")<>""then
 pz=session("pageSize")
 else
 pz=20
 end if
 end if
 
rs.PageSize=pz
pagecount=rs.PageCount 
page=int(request.QueryString ("page"))
if page<=0 then page=1
if request.QueryString("page")="" then page=1
rs.AbsolutePage=page
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<style type="text/css">
<!--
table {
	word-break:break-all;
}
.style1 {color: #0000FF}
.STYLE2 {color: #FF0000}
.STYLE3 {font-size: 12px}
.STYLE4 {font-size: 12px; color: #FF0000; }
body {
	margin-left: 0px;
	margin-right: 0px;
	margin-bottom: 2px;
	background-color: #39867b;
	margin-top: 0px;
	 SCROLLBAR-FACE-COLOR: #c6ebde;
	 SCROLLBAR-HIGHLIGHT-COLOR: #ffffff; 
	 SCROLLBAR-SHADOW-COLOR: #39867b; 
	 SCROLLBAR-3DLIGHT-COLOR: #39867b; 
	 SCROLLBAR-ARROW-COLOR: #330000; 
	 SCROLLBAR-TRACK-COLOR: #e2f3f1; 
	 SCROLLBAR-DARKSHADOW-COLOR: #ffffff;
}
.STYLE13 {color: #0000FF; font-size: 14px; }
body,td,th {
	font-size: 12px;
}
.STYLE17 {color: #006600}
a:link {
	color: #006600;
	text-decoration: none;
}
a:visited {
	color: #0000FF;
	text-decoration: none;
}
a:hover {
	color: #FF0000;
	text-decoration: underline;
}
a:active {
	color: #99FF66;
	text-decoration: none;
}
.STYLE18 {font-size: 15px}
-->
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>浏览与简单查询</title>
</head>

<body class="STYLE3">
<%
if  rs.eof then
response.write"没有记录"
end if
%><table width="99%" height="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#18CF9D">
  <tr>
    <td align="center" valign="middle"><table width="100%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td height="114" valign="top" background="images/bg/6/9.gif" bgcolor="#DEFAEC" ><form action="accdiary_updjg.asp" method="post" name="form1" target="_self" id="form1">
          <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#CCCCCC">
            <tr>
              <td class="STYLE2"><div align="center"> <span class="STYLE18">[*修改日记*]</span>  
                  <label>
                      <select name="ziduan" id="ziduan">
                        <option value="jg_name">被修改的姓名</option>
                        <option value="lastupduser" >修改者的用户名</option>
                        <option value="lastupdname" selected>修改者的真实姓名</option>
							 <option value="danwei" selected>修改者单位</option>

                        <option value="lastupdip">修改者的访问IP</option>
                        <option value="lastupddate">修改时间</option>
                      </select>
                      </label>
                关键字:
                <input name="key" type="text" id="key" value="<%=key%>" size="15" />
                <label>
                  <input type="submit" name="Submit" value="查找">
                  * <a href="accdiary_updjg.asp">重新载入</a>*</label>
              </div></td>
            </tr>
          </table>
        </form>
				<%if not rs.eof then%>

⌨️ 快捷键说明

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