?? xs_adminlist.asp
字號:
if (frm_search.FBSJ_FROM_R.value ==" ")
{
alert(" 『新聞發(fā)布時間-FROM』-『年』-『月』-『日』填寫完整。");
frm_search.FBSJ_FROM_R.focus();
return false;
}
}
if ((frm_search.FBSJ_TO_N.value !="") || (frm_search.FBSJ_TO_Y.value !=" ") || (frm_search.FBSJ_TO_R.value !=" "))
{
if (frm_search.FBSJ_TO_N.value =="")
{
alert(" 『新聞發(fā)布時間-TO』-『年』-『月』-『日』填寫完整。");
frm_search.FBSJ_TO_N.focus();
return false;
}
if (frm_search.FBSJ_TO_Y.value ==" ")
{
alert(" 『新聞發(fā)布時間-TO』-『年』-『月』-『日』填寫完整。");
frm_search.FBSJ_TO_Y.focus();
return false;
}
if (frm_search.FBSJ_TO_R.value ==" ")
{
alert(" 『新聞發(fā)布時間-TO』-『年』-『月』-『日』填寫完整。");
frm_search.FBSJ_TO_R.focus();
return false;
}
}
if ((frm_search.FBSJ_FROM_N.value !="")&&(frm_search.FBSJ_TO_N.value !="")&&(parseInt(frm_search.FBSJ_FROM_N.value,10) > parseInt(frm_search.FBSJ_TO_N.value,10)))
{
alert(" 請正確填寫新聞發(fā)布時間年份-TO>=FROM！\r\n\r\n[1900～2050]");
frm_search.FBSJ_TO_N.focus();
return false;
}
frm_search.submit();
return true;
}
//-->
</SCRIPT>
<%
'page = Trim(SafeRequest("start",1))
FBSJ_FROM_N = Trim(Request("FBSJ_FROM_N"))
FBSJ_FROM_Y = Trim(Request("FBSJ_FROM_Y"))
FBSJ_FROM_R = Trim(Request("FBSJ_FROM_R"))
'新聞發(fā)布時間起始時間
if FBSJ_FROM_N <> "" and Not IsNULL(FBSJ_FROM_N) THEN
FBSJ_FROM = FBSJ_FROM_N + "-"
END IF
if FBSJ_FROM_Y <> "" and Not IsNULL(FBSJ_FROM_Y) THEN
FBSJ_FROM = FBSJ_FROM + FBSJ_FROM_Y + "-"
END IF
if FBSJ_FROM_R <> "" and Not IsNULL(FBSJ_FROM_R) THEN
FBSJ_FROM = FBSJ_FROM + FBSJ_FROM_R + "-"
END IF
FBSJ_TO_N = Trim(Request("FBSJ_TO_N"))
FBSJ_TO_Y = Trim(Request("FBSJ_TO_Y"))
FBSJ_TO_R = Trim(Request("FBSJ_TO_R"))
'新聞發(fā)布時間結(jié)束時間
if FBSJ_TO_N <> "" and Not IsNULL(FBSJ_TO_N) THEN
FBSJ_TO = FBSJ_TO_N + "-"
END IF
if FBSJ_TO_Y <> "" and Not IsNULL(FBSJ_TO_Y) THEN
FBSJ_TO = FBSJ_TO + FBSJ_TO_Y + "-"
END IF
if FBSJ_TO_R <> "" and Not IsNULL(FBSJ_TO_R) THEN
FBSJ_TO = FBSJ_TO + FBSJ_TO_R + "-"
END IF
ID = Trim(SafeRequest("ID",1))
xID = Trim(SafeRequest("xID",1))
GJC_1 = NULLToString(Trim(Request("GJC_1")))'關(guān)鍵字
JSMB = Trim(Request("JSMB"))'檢索目標(biāo)
ROrder = Trim(Request("ROrder"))'檢索目標(biāo)
SearchDisplay = Trim(Request("SearchDisplay"))
%>
<%
set rs1 = Server.CreateObject("ADODB.Recordset")
SQL_News = "SELECT * FROM 學(xué)生表_student where 1=1 "
if FBSJ_FROM <> "" then
SQL_News = SQL_News & " and KbeginT >= '" & ZhuDate((FBSJ_FROM)) & "'"
end if
if FBSJ_TO <> "" then
SQL_News = SQL_News & " and KendT <= '" & ZhuDate((FBSJ_TO)) & "'"
end if
if ID <> "" and Not IsNull(ID) then
SQL_News = SQL_News & " and nianji='"&grad&"' "
end if
if xID <> "" and Not IsNull(xID) then
SQL_News = SQL_News & " and class="&cint(xid)&""
end if
if JSMB = "ALL" or JSMB = "" or IsNull(JSMB) then
'-----------------------------------------------------------------------
if GJC_1 <> "" then
SQL_News = SQL_News & " and (name like '%"&GJC_1&"%' or rename like '%"&GJC_1&"%' or renamejp like '%"&GJC_1&"%' or renameqp like '%"&GJC_1&"%' "
SQL_News = SQL_News & ")"
end if
'-----------------------------------------------------------------------
end if'if JSMB = "ALL" or JSMB = "" or IsNull(JSMB) then
if JSMB = "name" then'-課題標(biāo)題-
'-----------------------------------------------------------------------
if GJC_1 <> "" then
SQL_News = SQL_News & " and (name like '%"&GJC_1&"%' )"
end if
'-----------------------------------------------------------------------
end if'if JSMB = "name" then
if JSMB = "rename" then'-關(guān)鍵字-
'-----------------------------------------------------------------------
if GJC_1 <> "" then
SQL_News = SQL_News & " and (rename like '%"&GJC_1&"%' or renamejp like '%"&GJC_1&"%' or renameqp like '%"&GJC_1&"%' )"
end if
'-----------------------------------------------------------------------
end if'if JSMB = "rename" then
if JSMB = "xuehao" then'
'-----------------------------------------------------------------------
if GJC_1 <> "" then
SQL_News = SQL_News & " and (xuehao like '%"&GJC_1&"%' )"
end if
'-----------------------------------------------------------------------
end if'if JSMB = "rename" then
SQL_News = SQL_News & " and (AlreadyDeleted=0)"
if Lcase(ROrder) = Lcase("Orderbysh") then
SQL_News = SQL_News & " and sh=0"
end if
if Lcase(ROrder) = Lcase("OrderbyKhit") then
SQL_News = SQL_News & " order by CiShu DESC,ID DESC"
end if
'if Lcase(ROrder) = Lcase("OrderbyZhuanTiID") then
' SQL_News = SQL_News & " order by ZhuanTiID DESC,FBSJ DESC,KID DESC"
' end if
if Lcase(ROrder) = Lcase("OrderbyID") then
SQL_News = SQL_News & " order by ID DESC"
end if
if Lcase(ROrder) = Lcase("OrderbyJOIN") then
SQL_News = SQL_News & " order by JOINketi DESC,ID DESC"
end if
if Lcase(ROrder) = Lcase("Orderbyketi") then
SQL_News = SQL_News & " order by keti DESC,ID DESC"
end if
if ROrder = "" or IsNull(ROrder) then
SQL_News = SQL_News & " order by ID DESC"
end if
'Response.Write SQL_News
'Response.End
rs1.open SQL_News,Conn,3,1
%>
<SCRIPT language=JavaScript>
<!--
function IDchange()
{
frm_search.submit();
return true;
}
function ZhuanTiIDchange()
{
frm_search.submit();
return true;
}
function SFZDchange()
{
frm_search.submit();
return true;
}
function JSMBchange()
{
frm_search.submit();
return true;
}
function ZTchange()
{
frm_search.submit();
return true;
}
function CheckROrder()
{
frm_search.submit();
return true;
}
//-->
</SCRIPT>
<script>
function ShowTableSearch(){
frm_search.SearchDisplay.value = "Y"; //是否顯示為NO
TableNewsSearch.style.display = "";
TableDisplaySearch.style.display = "none";
//frm_search.submit();
}
</script>
<script>
function HideTableSearch(){
frm_search.SearchDisplay.value = "N"; //是否顯示為NO
TableNewsSearch.style.display = "none";
TableDisplaySearch.style.display = "";
//frm_search.submit();
}
</script>
<table border="1" width="100%" cellspacing="0" cellpadding="2" id=TableNewsSearch>
<tr>
<td align="left" valign="top">
<!--<font color="#7C96B8">年級：</font>
<select name="ID" class="xselect-1" size="1" onchange="return IDchange()">
<option value="" <%if ID = "" or IsNull(ID) then%>Selected<%end if%>>所有年級</option>
<option value="1" <%if ID = "1" then%>Selected<%end if%>>高一年級</option>
<option value="2" <%if ID = "2" then%>Selected<%end if%>>高二年級</option>
<option value="3" <%if ID = "3" then%>Selected<%end if%>>高三年級</option>
</select>
<option value="" <%if xID = "" or IsNull(xID) then%>Selected<%end if%>>所有班級</option>
<% if ID = "1" then classNUB=session("class1")%>
<% if ID = "2" then classNUB=session("class2")%>
<% if ID = "3" then classNUB=session("class3")%>
<font color="#7C96B8">班級：</font>
<select class="xselect-1" name="xID" size="1" onchange="return ZTchange()">
<option value="" <%if xID = "" or IsNull(xID) then%>Selected<%end if%>>所有班級</option>
<%
for j=1 to classNUB
%> <option value="<%=j%>" <%if xID<>"" then%><%if cint(xID) =j then%>Selected<%end if%><%end if%>>（<%=j%>）班</option>
<%next%></select>-->
<font color="#7C96B8">檢索：</font><select class="xselect-1" name="JSMB" size="1" >
<option value="ALL" <%if JSMB = "ALL" or JSMB = "" or IsNull(JSMB) then%>Selected<%end if%>>常用字段</option>
<option value="rename" <%if JSMB = "rename" then%>Selected<%end if%>>真實姓名</option>
<option value="xuehao" <%if JSMB = "xuehao" then%>Selected<%end if%>>--學(xué)號--</option>
</select>
<font color="#7C96B8">關(guān)鍵詞：</font><font color="#7C96B8"></font><input type="text" class="xselect-texbox-1" name="GJC_1" size="12" Value="<%=GJC_1%>" onFocus="this.focus();this.select();" title="此字段支持模糊查詢!<%=Str_BR%>真實姓名支持簡拼和全拼!<%=Str_BR%>此字段不支持空格輸入！<%=Str_BR%>如果是帶空格的特殊詞語（如英文、蒙文等）則用粘貼文本錄入！" onkeypress="NoSpace();"> <input type="hidden" name="SearchDisplay" Value="<%=SearchDisplay%>">
<input type="submit" name="BSearch" value="提交查詢" onclick="return checkinput()"> <input type="button" value="全部顯示" onclick="document.location='XS_AdminList.asp'" title="全部顯示所有記錄"> <a href="javascript:HideTableSearch();"><img alt="隱藏檢索窗體界面" border=0 height=9 src="images/HideUp.gif" width=9><font color="gray" title="隱藏檢索窗體界面">隱藏查詢窗體</font></a>
</td>
</tr>
</table>
<%
end sub
%>
<%
if SearchDisplay = "Y" then
%>
<script>
{
//ShowTableSearch();//隱藏檢索框
frm_search.SearchDisplay.value = "Y"; //是否顯示為NO
TableNewsSearch.style.display = "";
TableDisplaySearch.style.display = "none";
}
</script>
<%
else
%>
<script>
{
//HideTableSearch();//隱藏檢索框
frm_search.SearchDisplay.value = "N"; //是否顯示為NO
TableNewsSearch.style.display = "none";
TableDisplaySearch.style.display = "";
}
</script>
<%
end if
%>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -