📄 search.asp

📁 功能齐全的oa系统
💻 ASP
字号:
<% option explicit%>
<!-- #include virtual="include/DataEnvi.asp" -->
<!-- #include virtual="include/Page.asp" -->
<%
	If Request.Form.Count > 0 Then
		Dim C,conn
		Dim StrWhere
		
        Set conn=Server.CreateObject("ADODB.Connection")
		OpenDBCrm( conn )
		Set C = Server.CreateObject ("CMS2003.DBhandle")
		C.Init(conn)
		StrWhere = C.Search("Is")
		Response.Redirect "List.asp?W=" & Server.URLEncode(StrWhere)
		
		conn.Close
		Set conn = 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 type="checkbox" name=IsPro_name>产品名称</td>
		<td><input class="Input" name="Pro_name" Check="1" Show="产品名称" ></td>
	</tr>
	<tr class=Ltr>
		<td align="left"><input type="checkbox" name=IsPro_con>产品规格</td>
		<td><input class="Input" name="Pro_con" Check="1" Show="产品规格"></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsPro_price>产品单价</td>
		<td><input class="Input" name="Pro_price" Check="1" Show="产品单价" ></td>
	</tr>

	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsPro_num>采购数量</td>
		<td><input class="Input" name="Pro_num" Check="1" Show="采购数量" ></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsPro_man>经办人</td>
		<td><input class="Input" name="Pro_man" Check="1" Show="经办人" ></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsSell_man>经销商</td>
		<td><input class="Input" name="Sell_man" Check="1" Show="经销商" ></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsBargain_num>合同序号</td>
		<td><input class="Input" name="Bargain_num" Check="1" Show="合同序号" ></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsNumber>编号</td>
		<td><input class="Input" name="Number" Check="1" Show="编号" ></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsEligibility>有无合格证</td>
		<td><input class="Input" name="Eligibility" Check="1" Show="有无合格证" ></td>
	</tr>
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsSelldate>到货日期</td>
		<td><input class="Input" name="Selldate" Check="1" Show="到货日期" ></td>
	</tr>
	 
	<tr class=Ltr >
		<td align="left"><input type="checkbox" name=IsCreateTime>创建日期</td>
		<td>从<input class=Input name="CreateTime" readonly onclick="InputDate(this)" style="HEIGHT: 22px; WIDTH: 80px" Check="1"  Show="创建时间">至<input class="Input" name="CreateTime" style="HEIGHT: 22px; WIDTH: 80px" Check="1" readonly  Show="CreateTime" onclick="InputDate(this)"></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 + -