ASP083客户关系管理\客户关系管理

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的程序代码。