📄 search.asp
字号:
<% option explicit%>
<!-- #include virtual="include/DataEnvi.asp" -->
<!-- #include virtual="include/Page.asp" -->
<%
If Request.Form.Count > 0 Then
Dim ObjDB
Dim C
Dim StrWhere
Set ObjDB = Server.CreateObject("ADODB.Connection")
OpenDB ObjDB
Set C = Server.CreateObject ("CMS2003.DBhandle")
C.Init(ObjDB)
StrWhere = C.Search("Is")
Response.Redirect "List.asp?W=" & Server.URLEncode(StrWhere)
ObjDB.Close
Set ObjDB = Nothing
End If
%>
<%'==================================================================%>
<%Sub Main%>
<%'------------------------------------------------------------------%>
<HTML><HEAD>
<form action="" method="post">
</HEAD>
<BODY>
<table class=Ltable cellspacing=1 cellpadding=3>
<tr class=LHtr align="middle">
<td colspan="2" align="left">查询招聘计划 </td>
</tr>
<tr class=Ltr >
<td width="15%" align="left"><input name=IsComName type="checkbox">
公司</td>
<td width="85%"><select class="SelectWidth" name="ComName">
<%
dim rs
Set ObjDB = Server.CreateObject("ADODB.Connection")
OpenDBH ObjDB
set rs=server.CreateObject("ADODB.recordset")
rs.open "select distinct ComName from v_Hrms_DepRequirement Where StartTime<>'' and EndTime<>''",ObjDB,1,1
if not(rs.eof and rs.bof) then
%>
<option value="<%=rs("ComName")%>" selected><%=rs("ComName")%></option>
<% rs.movenext
do while not rs.eof
%>
<option value="<%=rs("ComName")%>"><%=rs("ComName")%></option>
<%
rs.movenext
loop
end if
rs.close
%>
</select></td>
</tr>
<tr class=Ltr >
<td align="left"><input name=IsDepName type="checkbox">
部门</td>
<td><select class="SelectWidth" name="DepName">
<%
rs.open "select distinct DepName from v_Hrms_DepRequirement Where StartTime<>'' and EndTime<>''",ObjDB,1,1
if not(rs.eof and rs.bof) then
%>
<option value="<%=rs("DepName")%>" selected><%=rs("DepName")%></option>
<% rs.movenext
do while not rs.eof
%>
<option value="<%=rs("DepName")%>"><%=rs("DepName")%></option>
<%
rs.movenext
loop
end if
rs.close
%>
</select></td>
</tr>
<tr class=Ltr >
<td align="left"><input name="IsJobName" type="checkbox">
岗位</td>
<td><select class="SelectWidth" name="JobName">
<%
rs.open "select distinct JobName from v_Hrms_DepRequirement Where StartTime<>'' and EndTime<>''",ObjDB,1,1
if not(rs.eof and rs.bof) then
%>
<option value="<%=rs("JobName")%>" selected><%=rs("JobName")%></option>
<% rs.movenext
do while not rs.eof
%>
<option value="<%=rs("JobName")%>"><%=rs("JobName")%></option>
<%
rs.movenext
loop
end if
rs.close
%>
</select></td>
</tr>
<tr class=Ltr >
<td align="left"><input name=IsReason type="checkbox">
申请理由</td>
<td> <select class="SelectWidth" name="Reason">
<%
rs.open "select distinct Reason from v_Hrms_DepRequirement Where StartTime<>'' and EndTime<>''",ObjDB,1,1
if not(rs.eof and rs.bof) then
%>
<option value="<%=rs("Reason")%>" selected><%=rs("Reason")%></option>
<% rs.movenext
do while not rs.eof
%>
<option value="<%=rs("Reason")%>"><%=rs("Reason")%></option>
<%
rs.movenext
loop
end if
rs.close
%>
</select></td>
</tr>
<tr class=Ltr >
<td align="left"><input name=IsState type="checkbox" id="IsState">
招聘状态 </td>
<td><select class="SelectWidth" name="State">
<option value="3">正在招聘</option>
<option value="4">人员到岗</option>
<option value="5">计划调整</option>
<option value="6">有意见</option>
</select></td>
</tr>
<tr class=Ltr >
<td align="left"><input name=IsInTime type="checkbox" id="IsInTime">
希望到岗日期</td>
<td>从
<input name="InTime" class=Input id="InTime" style="HEIGHT: 22px; WIDTH: 80px" onclick="InputDate(this)" readonly Check="1" Show="存库时间">
至
<input name="InTime" class="Input" id="InTime" style="HEIGHT: 22px; WIDTH: 80px" onclick="InputDate(this)" readonly Check="1" Show="SaveTime"></td>
</tr>
<tr class=Ltr >
<td align="left"><input name=IsStartTime type="checkbox" id="IsStartTime">
开始日期</td>
<td>从
<input name="StartTime" class=Input id="StartTime" style="HEIGHT: 22px; WIDTH: 80px" onclick="InputDate(this)" readonly Check="1" Show="存库时间">
至
<input name="StartTime" class="Input" id="StartTime" style="HEIGHT: 22px; WIDTH: 80px" onclick="InputDate(this)" readonly Check="1" Show="SaveTime"></td>
</tr>
<tr class=Ltr >
<td align="left"><input name=IsEndTime type="checkbox" id="IsEndTime">
结束日期</td>
<td>从
<input name="EndTime" class=Input id="EndTime" style="HEIGHT: 22px; WIDTH: 80px" onclick="InputDate(this)" readonly Check="1" Show="存库时间">
至
<input name="EndTime" class="Input" id="EndTime" style="HEIGHT: 22px; WIDTH: 80px" onclick="InputDate(this)" readonly Check="1" Show="SaveTime"></td>
</tr>
</table>
<table cellspacing=1 cellpadding=3>
<tr>
<td>
<input type="submit" name="Submit" class=Button value="提 交">
<input type="button" class=Button value="取 消" onclick="doList()" id=button1 name=button1></td>
<td></td>
</tr>
</table>
</FORM>
<%'------------------------------------------------------------------%>
<%End Sub%>
<%'==================================================================%>
<!-- #include virtual="Templet/Templet.asp" -->
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -