<!--#include file="conn.asp"-->
<!--#include file="check.asp"-->
<%
	useflag=3
%>
<!--#include file="flag.asp"-->
<!--#include file="../inc/setup.asp"-->
<!--#include file="../inc/sql.asp"-->
<%
	end if
%>
<script language="javascript">
function openScript(url, width, height){
	var Win = window.open(url,"openScript",'width=' + width + ',height=' + height + ',resizable=1,scrollbars=yes,menubar=no,status=yes' );
}
</SCRIPT>
<link href='Include/Admin_Style.CSS' rel='stylesheet' type='text/css'>
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="sortbutton">
<tr>    
<td width="16%" height="23" align="center" valign="middle">企业招聘信息管理
<td width="84%" align="center" valign="middle"><table width="100%" border="0">
<form name="form2" method="get">
<input name="action" type="hidden" value="search" />
        <tr>
          <td width="57%">
		  搜索关键字：
		    <Input maxLength=30 name="Keyword" value="关键字" onMouseOver="if(this.value=='关键字'){this.value=''}" title="关键字">&nbsp;<input name="type" type="radio" value="uname" checked>用户名&nbsp;<input name="type" type="radio" value="iname">公司名称&nbsp;
		  </td>
          <td width="43%"><input class="button" type="submit" value="提交条件"></td>
        </tr>
		</form>
</table>
</tr>
</table>
<table width="100%" style="MARGIN-TOP: 3px" border="0" align="center" cellspacing="1" cellpadding="1"  class="Border">
<tr height="25" align="center" class='title'>
	<td width='7%' nowrap>编 号</td>
	<td width="11%" nowrap>用 户 名</td>
	<td width="21%" nowrap>公 司 名 称</td>
	<td width="16%" nowrap>字 体 颜 色</td>
	<td width="16%" nowrap>字 体 加 粗</td>
	<td width="13%" nowrap>排 列 顺 序</td>
	<td width="16%" nowrap>操 作</td>
</tr>
<%
	searchtype=""
	
	if Trim(Request.QueryString("action"))="search" then
	
		type1=Trim(Request.QueryString("type"))
		Keyword=Trim(Request.QueryString("Keyword"))
		if Keyword<>"" and Keyword<>"关键字" then
			if type1="uname" then
				searchtype="where uname like '%"&Keyword&"%'"
			else
				searchtype="where cname like '%"&Keyword&"%'"
			end if
		end if
		
	end if

	dim i,intPage,page,pre,last,filepath'定义变量
	set rs_user = server.CreateObject("adodb.recordset")'创建对象
	sql="select * from company "&searchtype&" order by id desc"'定义SQL语句
	rs_user.PageSize = 14 '这里设定每页显示的记录数
	rs_user.CursorLocation = 3
	rs_user.Open sql,conn,0,2,1 '这里执行你查询SQL并获得结果记录集
	pre = true
	last = true
	page = trim(Request.QueryString("page"))'变量是跳转页面时的值

	if len(page) = 0 then
		intpage = 1
		pre = false
	else
		if cint(page) =< 1 then
			intpage = 1
			pre = false
		else
			if cint(page) >= rs_user.PageCount then
				intpage = rs_user.PageCount
				last = false
			else
				intpage = cint(page)
			end if
		end if
	end if
	if not rs_user.eof then
		rs_user.AbsolutePage = intpage
	end if
	if rs_user.eof then
		response.Write "<tr><td colspan=9><div align=center><font size=3 color=red><b>没有企业信息，请查询后再重试</b></font></div></td></tr>"
		response.End
	else
	for i=1 to rs_user.PageSize
	if rs_user.EOF or rs_user.BOF then exit for
%>
<tr height="25" align=center class='tdbg' onMouseOver="this.className='tdbgmouseover'" onMouseOut="this.className='tdbg'">
	<td><%= rs_user("id") %></td>
	<td><%= rs_user("uname") %></td>
	<td><%=left(rs_user("cname"),5)%>..</td>
	<td bgcolor="<%= rs_user("titlefontcolor") %>">&nbsp;</td>
	<td><% if rs_user("maxfont")=1 then Response.Write("<b>加粗</b>") else Response.Write("不加粗") %></td>
	<td><%=rs_user("shunxu")%>&nbsp;[越大越前]</td>
	<td><a href="JavaScript:openScript('add_company_add.asp?id=<%= rs_user("id") %>',650,300)"><font color="#FF0000">修 改</font></a></td>
</tr>
<%
	rs_user.movenext
	next
	End If
%>
<tr>
<td colspan=7>
<table width="99%" border="0" align="center" cellpadding="2" cellspacing="2" borderColorLight=#808080 borderColorDark=#ffffff>
<tr>
<%if rs_user.pagecount > 0 then%>
<td width="13%" align="left">当前页<%=intpage%>/<%=rs_user.PageCount%></td>
<%else%>
<td width="41%" align="left">当前页0/0</td><%end if%>
<td width="46%" align="right"> <a href="?page=1&action=<%= Trim(Request.QueryString("action")) %>&Keyword=<%= Trim(Request.QueryString("Keyword")) %>&type=<%= Trim(Request.QueryString("type")) %>">首页</a>|
<%if pre then%>
<a href="?page=<%=intpage -1%>&action=<%= Trim(Request.QueryString("action")) %>&Keyword=<%= Trim(Request.QueryString("Keyword")) %>&type=<%= Trim(Request.QueryString("type")) %>">上页</a>| <%end if%>
<%if last then%>
<a href="?page=<%=intpage +1%>&action=<%= Trim(Request.QueryString("action")) %>&Keyword=<%= Trim(Request.QueryString("Keyword")) %>&type=<%= Trim(Request.QueryString("type")) %>">下页</a> |<%end if%>
<a href="?page=<%=rs_user.PageCount%>&action=<%= Trim(Request.QueryString("action")) %>&Keyword=<%= Trim(Request.QueryString("Keyword")) %>&type=<%= Trim(Request.QueryString("type")) %>">尾页</a>|转到第
<select name="sel_page" onchange=javascript:location.href=this.options[this.selectedIndex].value>
<%
	for i = 1 to rs_user.PageCount
	if i = intpage then
%>
<option value="?page=<%=i%>&action=<%= Trim(Request.QueryString("action")) %>&Keyword=<%= Trim(Request.QueryString("Keyword")) %>&type=<%= Trim(Request.QueryString("type")) %>" selected><%=i%></option>
<%else%> 
<option value="?page=<%=i%>&action=<%= Trim(Request.QueryString("action")) %>&Keyword=<%= Trim(Request.QueryString("Keyword")) %>&type=<%= Trim(Request.QueryString("type")) %>"><%=i%></option>
<%
	end if
	next
	rs_user.close
	set rs_user=nothing
	conn.close
	set conn=nothing
%>
</select>页</font></td>
</tr>
</table></td>
</tr>
<tr>
	<td  class='tdbg' onMouseOver="this.className='tdbgmouseover'" onMouseOut="this.className='tdbg'" height='25' colspan=7>
	&nbsp;</td>
</tr>
<tr>
	<td  class='tdbg' onMouseOver="this.className='tdbgmouseover'" onMouseOut="this.className='tdbg'" colspan=7 align=right>	</td>
</tr>
</table>

