📄 f_swhtdetail.asp
字号:
<!--#include file="../include/Pubconn.asp"-->
<!--#include file="../include/PubFun.asp"-->
<% username=Getuser()%>
<%
'***************************************
'
'Author:Ruphi Update Time:2001-06-29
'功能说明：客户丢失报告记录信息浏览
'
'**************************************
%>
<%
hth=request("hth")
year1=request("year1")
month1=request("month1")
date1=request("date1")
if year1<>"" and month1<>"" and date1<>"" then
total1=year1+"-"+month1+"-"+date1
end if
year2=request("year2")
month2=request("month2")
date2=request("date2")
if year2<>"" and month2<>"" and date2<>"" then
total2=year2+"-"+month2+"-"+date2
end if
%>
<%
set htcx=server.createobject("adodb.recordset")
str="select * from F_Tblcontract2 "
if hth<>"" then
if total1="" and total2="" then
str=str&"where contractNum='"&hth&"'"
end if
if total1<>"" and total2="" then
str=str&"where contractNum='"&hth&"' and signtime='"&total1&"'"
end if
if total1="" and total2<>"" then
str=str&"where contractNum='"&hth&"' and signtime='"&total2&"'"
end if
if total1<>"" and total2<>"" then
str=str&"where contractNum='"&hth&"' and signtime between '"&total1&"' and '"&total2&"' "
end if
else
if total1="" and total2="" then
str=str
end if
if total1<>"" and total2="" then
str=str&"where signtime='"&total1&"'"
end if
if total1="" and total2<>"" then
str=str&"where signtime='"&total2&"'"
end if
if total1<>"" and total2<>"" then
str=str&"where signtime between '"&total1&"' and '"&total2&"' "
end if
end if
htcx.open str&"order by id desc",pubconn,1
'response.write str
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>单据查询</title><link href="../cread.css" rel="stylesheet" type="text/css">
</head>
<script language="vbscript">
'sub GoPage()
' a="f_swhtdetail.asp?page="+document.myform.page1.value+"&wid="+document.myform.wid.value+"&txtstuff="+document.myform.txtstuff.value
' window.location=a
'end sub
</script>
<body bgcolor="#FFFFFF">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="100%"><b><font size="3"><img border="0" src="../pic/it_22.gif" width="34" height="15"></font>
<font size="2">商务合同明细查询</font></b><hr width="40%" size="1" align="left">
</td>
</tr>
</table>
<form method="post" action="F_swhtdetail.asp" name="myform">
<p>
<div align="center">
<center>
<table border="0" cellspacing="0" width="680" align="center" width="630" width="636">
<tr>
<td width="61" align="center" width="151" width="150" bgcolor="#F1E8DA">
<p align="right">
<font size="2">合同号
</font>
</p>
</td>
<td width="67" align="center" width="104" width="104" bgcolor="#F1E8DA">
<p align="left"> <input type="text" size="8" name="hth">
</p>
</td>
<td width="72" align="center" width="96" width="123" bgcolor="#F1E8DA">
<p align="right">
<font size="2">签订日期
</font>
</p>
</td>
<td width="464" align="center" width="263" width="243" bgcolor="#F1E8DA">
<p align="left">
<font size="2">
<input type="text" size="4" name="year1">年 <select name="month1" style="width: 51; height: 23" size="1">
<option value=""></option>
</select> 月<select name="data1" style="width: 51; height: 23" size="1">
<option value=""></option>
</select>日 至<input type="text" size="4" name="year2">年 <select name="month1" style="width: 51; height: 23" size="1">
<option value=""></option>
</select> 月<select name="date2" style="width: 43; height: 23" size="1">
<option value=""></option>
</select>日 <input type="submit" value="查询" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1" >
</font>
</p>
</td>
</tr>
</table>
</form>
<%
if htcx.eof then%>
<font size="2">无任何记录！</center>
<p align="center">
<input type="button" value="新增" onclick="location.href='F_contractnew.asp'" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">
<%
response.end
else
if request.querystring("page")<>"" then
page=cint(request.querystring("page"))
else
page=1
end if
htcx.pagesize=10
if page>=htcx.pagecount then
page=htcx.pagecount
else
if page<1 then
page=1
end if
end if
htcx.absolutepage=page
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -