📄 table.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file=DataBase/conn.asp-->
<!--#include file=config.asp-->
<!--#include file=purview.asp-->
<%
call forms
'国家/地区
set rsg=server.CreateObject("adodb.recordset")
sqlg="select ClientCountry from tb_Client group by ClientCountry"
rsg.open sqlg,conn,1,1
'城市
set rsc=server.CreateObject("adodb.recordset")
sqlc="select ClientCity from tb_Client group by ClientCity"
rsc.open sqlc,conn,1,1
'客户创建者
set rss=server.CreateObject("adodb.recordset")
sqls="select SetName from tb_Client group by SetName"
rss.open sqls,conn,1,1
'部门
set rsb=server.CreateObject("adodb.recordset")
sqlb="select LinkmanDept from tb_Linkman group by LinkmanDept"
rsb.open sqlb,conn,1,1
'职务
set rsz=server.CreateObject("adodb.recordset")
sqlz="select LinkmanDuty from tb_Linkman group by LinkmanDuty"
rsz.open sqlz,conn,1,1
'联系人创建者
set rssj=server.CreateObject("adodb.recordset")
sqlsj="select SetName from tb_Linkman group by SetName"
rssj.open sqlsj,conn,1,1
'产品编号
set rsbh=server.CreateObject("adodb.recordset")
sqlbh="select ProductNumber from tb_Product group by ProductNumber"
rsbh.open sqlbh,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
body {
background-color: #DFEEFF;
}
-->
</style>
<link href="css/css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
-->
</style></head>
<body>
<form action="Table_cl.asp" method="post" name="form1" target="_blank">
<fieldset class="fiedset">
<legend>客户报表查询</legend>
<table width="686" border="0">
<tr>
<td width="38%" align="right"><input name="eeeet" type="hidden" id="eeeet">
国家/地区</td>
<td colspan="2"><select name="ClientCountry" id="ClientCountry">
<option value="全部">全部 </option>
<%do while not rsg.eof %>
<option value="<%=rsg("ClientCountry")%>"><%=rsg("ClientCountry")%></option>
<%
rsg.movenext
loop
%>
</select></td>
</tr>
<tr>
<td align="right">城市</td>
<td colspan="2"><select name="ClientCity" id="ClientCity">
<option value="全部">全部 </option>
<%do while not rsc.eof %>
<option value="<%=rsc("ClientCity")%>"><%=rsc("ClientCity")%></option>
<%
rsc.movenext
loop
%>
</select></td>
</tr>
<tr>
<td align="right">创建者</td>
<td colspan="2"><select name="SetName" id="SetName">
<option value="全部">全部 </option>
<%do while not rss.eof %>
<option value="<%=rss("SetName")%>"><%=rss("SetName")%></option>
<%
rss.movenext
loop
%>
</select></td>
</tr>
<tr>
<td align="right">模糊查询</td>
<td width="25%"><input name="search" type="text" id="search"></td>
<td width="37%"><select name="searchtype" id="searchtype">
<option value="ClientName">公司名称</option>
<option value="ClientTel">公司电话</option>
<option value="ClientEmail">E-mail</option>
<option value="ClientAddress">公司地址</option>
</select></td>
</tr>
</table>
<table width="970" border="0" cellspacing="0">
<tr>
<td width="68%"> </td>
<td width="18%"><input name="Submit" type="submit" class="input" value="导入Excel" onClick="form1.eeeet.value='Excel'">
<input name="Submit2" type="submit" class="input" value="打印报表" onClick="form1.eeeet.value='print_c'"></td>
<td width="14%"> </td>
</tr>
</table>
</fieldset>
<br>
<fieldset class="fiedset">
<legend>联系人报表查询</legend>
<table width="686" border="0">
<tr>
<td width="38%" align="right">
部门：</td>
<td width="434"><select name="LinkmanDept" id="LinkmanDept">
<option value="全部">全部 </option>
<%do while not rsb.eof %>
<option value="<%=rsb("LinkmanDept")%>"><%=rsb("LinkmanDept")%></option>
<%
rsb.movenext
loop
%>
</select></td>
</tr>
<tr>
<td align="right">职务：</td>
<td><select name="LinkmanDuty" id="select2">
<option value="全部">全部 </option>
<%do while not rsz.eof %>
<option value="<%=rsz("LinkmanDuty")%>"><%=rsz("LinkmanDuty")%></option>
<%
rsz.movenext
loop
%>
</select></td>
</tr>
<tr>
<td height="28" align="right">创建者：</td>
<td><select name="select2" id="select4">
<option value="全部">全部 </option>
<%do while not rssj.eof %>
<option value="<%=rssj("SetName")%>"><%=rssj("SetName")%></option>
<%
rssj.movenext
loop
%>
</select></td>
</tr>
</table>
<table width="970" border="0" cellspacing="0">
<tr>
<td width="68%"> </td>
<td width="18%"><input name="Submit" type="submit" class="input" value="导入Excel" onClick="form1.eeeet.value='Excel_l'">
<input name="Submit2" type="submit" class="input" value="打印报表" onClick="form1.eeeet.value='print_l'"></td>
<td width="14%"> </td>
</tr>
</table>
</fieldset>
<br>
<fieldset class="fiedset">
<legend>反馈客户报表查询</legend>
<table width="686" border="0">
<tr>
<td width="38%" align="right">开始日期：</td>
<td colspan="3"> <select name="year" id="select9">
<%for i=2005 to 2050%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
年
<select name="month" id="select10">
<%for i=1 to 12%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
月
<select name="day" id="select11">
<%for i=1 to 31%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
日</td>
</tr>
<tr>
<td align="right">结束日期：</td>
<td colspan="3"><select name="year1" id="select16">
<%for i=2005 to 2050%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
年
<select name="month1" id="select17">
<%for i=1 to 12%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
月
<select name="day1" id="select18">
<%for i=1 to 31%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
日</td>
</tr>
<tr>
<td align="right">排序形式：</td>
<td width="26%"><select name="xingshi" id="select15">
<option value="FeedbackDate">反馈日期</option>
<option value="FeedbackFulfill">是否解决</option>
<option value="FeedbackClient">客户名称</option>
</select></td>
<td width="11%" align="right">顺序：</td>
<td width="27%"><select name="shunxu" id="select21">
<option value="desc">降序</option>
<option value="asc">升序</option>
</select></td>
</tr>
</table>
<table width="970" border="0" cellspacing="0">
<tr>
<td width="68%"> </td>
<td width="18%"><input name="Submit3" type="submit" class="input" value="导入Excel" onClick="form1.eeeet.value='Excel_k'">
<input name="Submit22" type="submit" class="input" value="打印报表" onClick="form1.eeeet.value='print_k'"></td>
<td width="14%"> </td>
</tr>
</table>
</fieldset>
<br>
<fieldset class="fiedset">
<legend>库存报表查询</legend>
<table width="686" border="0">
<tr>
<td width="38%" align="right">开始日期：</td>
<td colspan="3"> <select name="year2" id="select9">
<%for i=2005 to 2050%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
年
<select name="month2" id="month2">
<%for i=1 to 12%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
月
<select name="day2" id="select11">
<%for i=1 to 31%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
日</td>
</tr>
<tr>
<td align="right">结束日期：</td>
<td colspan="3"><select name="year3" id="select16">
<%for i=2005 to 2050%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
年
<select name="month3" id="select17">
<%for i=1 to 12%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
月
<select name="day3" id="select18">
<%for i=1 to 31%>
<option value="<%=i%>"><%=i%></option>
<%next%>
</select>
日</td>
</tr>
<tr>
<td align="right">产品编号：</td>
<td><select name="ProductNumber" id="select19">
<option value="全部">全部 </option>
<%do while not rsbh.eof %>
<option value="<%=rsbh("ProductNumber")%>"><%=rsbh("ProductNumber")%></option>
<%
rsbh.movenext
loop
%>
</select></td>
<td align="right">库存类型：</td>
<td><select name="StockpileType" id="StockpileType">
<option value="全部" selected>全部</option>
<option value="出库">出库</option>
<option value="入库">入库</option>
</select></td>
</tr>
<tr>
<td align="right">排序形式：</td>
<td width="26%"><select name="xingshi1" id="select15">
<option value="ProductNumber">产品编号</option>
<option value="ProductName">产品名称</option>
</select></td>
<td width="11%" align="right">顺序：</td>
<td width="27%"><select name="shunxu1" id="select20">
<option value="desc">降序</option>
<option value="asc">升序</option>
</select></td>
</tr>
</table>
<table width="970" border="0" cellspacing="0">
<tr>
<td width="68%"> </td>
<td width="18%"><input name="Submit3" type="submit" class="input" value="导入Excel" onClick="form1.eeeet.value='Excel_kc'">
<input name="Submit22" type="submit" class="input" value="打印报表" onClick="form1.eeeet.value='print_kc'"></td>
<td width="14%"> </td>
</tr>
</table>
</fieldset>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -