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

📄 search.asp

📁 功能齐全的oa系统
💻 ASP
字号:
🔍 
<% option explicit%>
<!-- #include virtual="include/DataEnvi.asp" -->
<!-- #include virtual="include/MyFunc.asp" -->
<!-- #include virtual="include/Page.asp" -->
<%
	If Request.Form.Count > 0 Then
		Dim ObjDB
		Dim C
		Dim StrWhere
		
		Set ObjDB = Server.CreateObject("ADODB.Connection")
		OpenDBH 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 width="15%">查询培训纪录</td>
		<td width="85%"> </td>	
		</tr>
        <tr class=Ltr >
		<td align="left"><input name=IsLesCodeLession type="checkbox" id="IsLesCodeLession">
        课程代号</td>
		<td><input name="LesCodeLession" class="Input" id="LesCodeLession" Check="1"  ></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input name=IsName type="checkbox" id="IsName">
        姓名</td>
		<td><input name="Name" class="Input" id="Name" Check="1"  ></td>
	</tr>
	  <tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsLesTime>培训时限</td>
		<td><input class="Input" name="LesTime" Check="1" ></td>
	</tr>

	  <tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsFee>费用</td>
		<td><input class="Input" name="Fee" Check="1" ></td>
	</tr>
	  <tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsTestResult>测试</td>
		<td><select  name="TestResult">
          <option value="0">优</option>
          <option value="1">良</option>
          <option value="2">及格</option>
          <option value="3">差</option>
        </select></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsBeginTime>开始日期</td>
		<td>从<input class=Input name="BeginTime" readonly onclick="InputDate(this)" style="HEIGHT: 22px; WIDTH: 80px" Check="1"  >至
        <input name="BeginTime" class="Input" id="BeginTime" style="HEIGHT: 22px; WIDTH: 80px" onclick="InputDate(this)" readonly Check="1"  ></td>
	</tr>
<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsEndTime>结束日期</td>
		<td>从<input class=Input name="EndTime" readonly onclick="InputDate(this)" style="HEIGHT: 22px; WIDTH: 80px" Check="1"  >至
        <input name="EndTime" class="Input" id="EndTime" style="HEIGHT: 22px; WIDTH: 80px" onclick="InputDate(this)" readonly Check="1"  ></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 + -