<!--#include file="Conn.asp"--><%Checklogin()%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>管理区域</title>
<link rel="stylesheet" href="css/common.css" type="text/css" />
<link rel="stylesheet" href="css/alert.css" type="text/css" />
<script language="javascript" src="system/js/jquery-1.7.2.min.js"></script>
<script type="text/javascript" src="js/js.js"></script>
</head>
<body class="clear">
<!--#include file="panel.asp"-->
<%
tagName=Request.QueryString("tagName")
employeeId=Request.QueryString("employeeId")
If employeeId="" or Not IsNumeric(employeeId) Then
employeeId=0
End If
If tagName="" or IsNull(tagName) Then
response.redirect "customer.asp"
End If
%>
<div id="man_zone">
<div class="fastSelect clear">
<H1>标签:<%=tagName%></H1>
</div>
<div width="100%" border="0" cellpadding="3" cellspacing="1" class="table2">
<div class="theader">
<div class="col2" >序号</div>
<div class="col3">客户编号</div>
<div class="col4">渠道来源</div>
<div class="col5">区域</div>
<div class="col6">客户类型</div>
<div class="col7">跟进阶段</div>
<div class="col8">录入时间</div>
<div class="col10">操作</div>
</div>
<%
Set Rs=Server.CreateObject("ADODB.RecordSet")
Set Rs1=Server.CreateObject("ADODB.RecordSet")
sqlStr="Select id,cs_code,cs_from,cs_country,cs_type,cs_deal,cs_addtime,cs_tel,cs_email,cs_whatsapp,cs_wechat,cs_linkedin,cs_facebook,cs_alibaba ,cs_note From customer Where cs_belong="&employeeId&" and id in (select customerId from tagTable where tagName='"&tagName&"')"
Rs.Open sqlStr,Conn,1,1
Do while Not Rs.bof and Not Rs.eof
TempNum=TempNum+1
%>
<div class="tline">
<div class="col2" ><%=TempNum%></div>
<div class="col3 slidepanel"><%=Rs("cs_code")%></div>
<div class="col4">
<%Rs1.Open "select ch_name from qudao where id="&Rs("cs_from")&"",conn,1,1
IF Not Rs1.bof and Not Rs1.eof Then
Response.write Rs1("ch_name")
Else
Response.write "未填写"
End If
Rs1.Close
%>
</div>
<div class="col5">
<%Rs1.Open "select countryName from country where id="&Rs("cs_country")&"",conn,1,1
IF Not Rs1.bof and Not Rs1.eof Then
Response.write Rs1("countryName")
Else
Response.write "未填写"
End If
Rs1.Close
%>
</div>
<div class="col6">
<%Rs1.Open "select businessType from clientType where id="&Rs("cs_type")&"",conn,1,1
IF Not Rs1.bof and Not Rs1.eof Then
Response.write Rs1("businessType")
Else
Response.write "未填写"
End If
Rs1.Close
%>
</div>
<div class="col7"><%If Rs("cs_deal")=3 then
response.write "<span style='color:red;'>成交</span>"
elseif Rs("cs_deal")=2 then
Response.write "明确需求"
elseif Rs("cs_deal")=1 then
Response.write "背景调查"
else
Response.write "无响应"
End IF
%></div>
<div class="col8"><%=Rs("cs_addtime")%></div>
<div class="col10" >修改</div>
</div>
<div class="notepanel clear">
<div class="noteItem">
联系方式
</div>
<div class="lx">
<div class="tel"><%=Rs("cs_tel")%></div>
<div class="mail"><a href="mailto:<%=Rs("cs_email")%>"><%=Rs("cs_email")%></a></div>
<div class="whatsapp"><%=Rs("cs_whatsapp")%></div>
<div class="wechat"><%=Rs("cs_wechat")%></div>
<div class="linkedin"><%=Rs("cs_linkedin")%></div>
<div class="facebook"><%=Rs("cs_facebook")%></div>
<div class="alibaba"><%=Rs("cs_alibaba")%></div>
</div>
<div class="noteItem2">
备注
</div>
<div class="notecontent">
<%=HtmlUncode(Rs("cs_note"))%>
</div>
</div>
<%
Rs.MoveNext
Loop
%>
</div>
<%Rs.Close:Set Rs=Nothing:Set Rs1=Nothing:Conn.Close:Set Conn=Nothing%>
</div>
</body>
</html>