图25  客户报表打印页面的运行结果
7.2  联系人报表模块
 1．联系报表查询
 联系人报表查询页面涉及的HTML表单元素如表6所示。
 表6                      联系人报表查询页面涉及的HTML表单元素
 名称  类型  含义  重要属性 
 form1  Form  表单  method="post" action="" 
 eeeet  hidden  判断表单如何处理   
 LinkmanDept  select  国家/地区  <option value="<%=rsg("ClientCountry")%>">
 <%=rsg("ClientCountry")%></option> 
 LinkmanDuty  select  城市  <option value="<%=rsc("ClientCity")%>">
 <%=rsc("ClientCity")%></option> 
 select2  select  创建者  <option value="<%=rss("SetName")%>">
 <%=rss("SetName")%></option 
 Submit  submit  导入Execul  class="input" value="导入Excul" onClick="form1.eeeet.value='excul'" 
 Submit  submit  直接打印  class="input" value="打印报表" onClick="form1.eeeet.value='print_c'" 
 用户可以在报表管理页面中的联系人报表查询部分，输入一定的查询条件，进行联系人信息的查询。
 2．导入Excul
 用户在查询部分输入查询条件后，单击【导入Excul】按钮，用户所添加的查询条件将被提交给数据处理页，处理页用select case判断隐藏域的值，进而确定怎样处理，传值的程序代码如下：
<%
sql="dbo.tb_Linkman.id is not null"
if request("LinkmanDept")<>"全部" then
sql=sql&" and dbo.tb_Linkman.LinkmanDept='"&request("LinkmanDept")&"'"
end if
if request("LinkmanDuty")<>"全部" then
sql=sql&"  and dbo.tb_Linkman.LinkmanDuty='"&request("LinkmanDuty")&"'"
end if
if request("select2")<>"全部" then
sql=sql&" and dbo.tb_Linkman.SetName='"&request("SetName")&"'"
end if
sql="SELECT dbo.tb_Linkman.LinkmanName, dbo.tb_Client.ClientName,dbo.tb_Linkman.LinkmanDept,dbo.tb_Linkman.LinkmanDuty,dbo.tb_Linkman.LinkmanTel, dbo.tb_Linkman.LinkmanHander, dbo.tb_Linkman.LinkmanEmail FROM dbo.tb_Client INNER JOIN dbo.tb_Linkman ON dbo.tb_Client.ID= dbo.tb_Linkman.LinkmanClient where "&sql
response.Redirect("Table_print_kh.asp?sql="&sql)
%>
 由于查询和导入的实现方法和客户报表的实现方法相似，在此不再详细介绍，请读者参考7.1节中介绍的导入Excel的程序代码。
 3．用web打印
 用户在查询部分输入查询条件后，单击【打印报表】按钮，用户所添加的查询条件将被提交给数据处理页，处理页用select case判断隐藏域的值，进而确定怎样处理。传值程序代码如下：
<%
sql="dbo.tb_Linkman.id is not null"
if request("LinkmanDept")<>"全部" then
 sql=sql&" and dbo.tb_Linkman.LinkmanDept='"&request("LinkmanDept")&"'"
end if
if request("LinkmanDuty")<>"全部" then
 sql=sql&"  and dbo.tb_Linkman.LinkmanDuty='"&request("LinkmanDuty")&"'"
end if
if request("select2")&

首页 上一页 5 6 7 8 9 10 11 下一页 尾页 8/11/11

相关论文