📄 sk_crm_client_detail.asp
字号:
<!--#include file="conn.asp" -->
<%
dim filename,download
SK_mclass=request("SK_mclass")
dd=session("dd")
if session("name")="" or session("dd")="" or int(dd)<>int(SK_mclass) then
Response.Write("<script>alert(""非法登陆，请确认密码的正确性！\n或者已经被管理员锁定！"");history.back();</script>")
response.end
end if
filename="SK_CRM_client_list.asp"
dim msearchword
msearchword=Request("search")
vestid=Request("id")
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
if SK_mclass="" then
SK_mclass="1"
end if
SK_Follow_cust_s=request("cust_s")
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.3790.2993" name=GENERATOR></HEAD>
<BODY leftMargin=0 topMargin=0 marginheight="0">
<LINK href="images/style.css" type=text/css rel=stylesheet>
<TABLE cellSpacing=0 cellPadding=0 width="100%">
<TBODY>
<TR>
<TD class=td>
<DIV align=left>您现在的位置：CRM >> 公司管理 >> 公司详细资料</DIV></TD></TR></TBODY></TABLE>
<%
if session("chayue")="0" then
sql="select * from SK_customer where vest_s="&request("SK_sclass")&" and id="&request("cust_s")&" and vest_m="&session("dd")&""
else
sql="select * from SK_customer where vest_s="&request("SK_sclass")&" and id="&request("cust_s")&" and com_kongzhi='"&session("name")&"'and vest_m="&session("dd")&""
end if
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
com_id=rs("id")
com_vest=rs("vest_s")
com_zy2=rs("zy")
com_diqu2=rs("com_diqu")
com_name=rs("com_name")
com_ename=rs("com_ename")
com_sclass=rs("vest_s")
com_address=rs("com_address")
com_address2=rs("com_address2")
com_address3=rs("com_address3")
com_zip=rs("com_zip")
com_phone=rs("com_phone")
com_fax=rs("com_fax")
com_email=rs("com_email")
com_fuzeren=rs("com_fuzeren")
com_job=rs("com_job")
com_hangye=rs("com_hangye")
com_guimo=rs("com_guimo")
com_product=rs("com_product")
SK_sclass=rs("vest_s")
com_web=rs("com_web")
com_content=rs("content")
com_kongzhi=rs("com_kongzhi")
com_mobile=rs("com_mobile")
com_msn=rs("com_msn")
com_skype=rs("com_skype")
com_icq=rs("com_icq")
com_qq=rs("com_qq")
com_time=rs("time")
rs.close
%>
<%
MaxPerPage=int(session("fenye"))
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
if session("chayue")="0" then
if Request("cust_s")<>"" then
sql="select * from SK_cust_user where cust_s = "&Request("cust_s")&" and vest_m ="&session("dd")&" order by id desc;"
else
sql="select * from SK_cust_user where vest_m ="&SK_mclass&" order by id desc;"
end if
else
if Request("cust_s")<>"" then
sql="select * from SK_cust_user where cust_s = "&Request("cust_s")&" and kongzhi='"&session("name")&"'and vest_m ="&session("dd")&" order by id desc;"
else
sql="select * from SK_cust_user where vest_m ="&SK_mclass&" and kongzhi='"&session("name")&"'order by id desc;"
end if
end if
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
<TABLE borderColor=#ffffff cellSpacing=0 borderColorDark=#ffffff cellPadding=3 width="100%" borderColorLight=#dfdfdf border=1>
<TBODY>
<TR>
<TD height=20><B>单位基本信息<%if session("quanxian")>=2 then%> - <a href="SK_CRM_cust_add.asp?company=<%=com_name%>&id=<%=com_id%>&SK_sclass=<%=request("SK_sclass")%>">增加联系人</a><%end if%> - <a target="main" href="vbscript:history.back()" style="text-decoration: none">返回上页</a></B></TD>
</TR>
<TR>
<TD height=20>
<%
if com_zy2="0" then
com_zy= "初步"
end if
if com_zy2="1" then
com_zy= "一般"
end if
if com_zy2="2" then
com_zy="重要"
end if
%>
<TABLE borderColor=#ffffff cellSpacing=0 borderColorDark=#ffffff
cellPadding=3 width="100%" borderColorLight=#dfdfdf border=1>
<TBODY>
<TR align=middle height=22>
<TD width="20%" align="right">公司名称</TD>
<TD align="left"><%if session("quanxian")>=2 then%><a href="SK_CRM_client_edit.asp?SK_mclass=<%=session("dd")%>&SK_sclass=<%=com_vest%>&id=<%=com_id%>"><%end if%><%=com_name%><%if session("quanxian")>=2 then%></a><%end if%>
重要度：<%=com_zy%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>公司名称2</TD>
<TD align="left"><%=com_ename%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>公司网址</TD>
<TD align="left"><a href="http://<%=com_web%>" target="_blank"><%=com_web%></a></TD>
</TR>
<TR align=middle height=22>
<TD align=right>所在洲</TD>
<TD align="left"><%=com_diqu2%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>国家或地区</TD>
<TD align="left"><%set folderrs=server.createobject("adodb.recordset")
foldersql="select * from SK_sclass,SK_customer where vest ="&Request("SK_mclass")&" and sclass_id="&com_vest&" "
folderrs.open foldersql,conn,1,1
response.write folderrs("sclass_folder")
folderrs.close
set folderrs=nothing
%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>公司详细地址1</TD>
<TD align="left"><%=com_address%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>公司详细地址2</TD>
<TD align="left"><%=com_address2%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>公司详细地址3</TD>
<TD align="left"><%=com_address3%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系电话</TD>
<TD align="left"><%=com_phone%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系传真</TD>
<TD align="left"><%=com_fax%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>邮政编码</TD>
<TD align="left"><%=com_zip%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系人</TD>
<TD align="left"><%=com_fuzeren%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>职务</TD>
<TD align="left"><%=com_job%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系人手机</TD>
<TD align="left"><%=com_mobile%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系人Email</TD>
<TD align="left"><a href="mailto:<%=com_email%>"><%=com_email%></a></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系人MSN</TD>
<TD align="left"><%=com_msn%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系人ICQ</TD>
<TD align="left"><%=com_icq%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系人Skype</TD>
<TD align="left"><%=com_skype%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>联系人QQ</TD>
<TD align="left"><%=com_qq%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>所属行业</TD>
<TD align="left"><%=com_hangye%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>经营产品</TD>
<TD align="left"><%=com_product%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>公司规模</TD>
<TD align="left"><%=com_guimo%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>重 要 度</TD>
<TD align="left"><%=com_zy%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>备注(公司其他信息)</TD>
<TD align="left"><%=com_content%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>录入人</TD>
<TD align="left"><%=com_kongzhi%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>录入时间</TD>
<TD align="left"><%=com_time%></TD>
</TR>
</TBODY></TABLE>
<%
showdi
else
totalPut=rs.recordcount
totalPut=rs.recordcount
if currentpage<1 then
currentpage=1
end if
if (currentpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if currentPage=1 then
showContent
showpage totalput,MaxPerPage,"SK_CRM_client_list.asp"
showdi
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (currentPage-1)*MaxPerPage
dim bookmark
bookmark=rs.bookmark
showContent
showpage totalput,MaxPerPage,"SK_CRM_client_list.asp"
showdi
else
currentPage=1
showContent
showpage totalput,MaxPerPage,"SK_CRM_client_list.asp"
showdi
end if
end if
rs.close
end if
set rs=nothing
sub showContent
dim i
i=0
%>
<TABLE borderColor=#ffffff cellSpacing=0 borderColorDark=#ffffff cellPadding=3 width="100%" borderColorLight=#dfdfdf border=1>
<tr>
<td height="30"><B>单位基本信息</B></td>
</tr>
</table>
<%
if com_zy2="0" then
com_zy= "初步"
end if
if com_zy2="1" then
com_zy= "一般"
end if
if com_zy2="2" then
com_zy="重要"
end if
%>
<TABLE borderColor=#ffffff cellSpacing=0 borderColorDark=#ffffff
cellPadding=3 width="100%" borderColorLight=#dfdfdf border=1>
<TBODY>
<TR align=middle height=22>
<TD width="20%" align="right">公司名称</TD>
<TD align="left"><%if session("quanxian")>=2 then%><a href="SK_CRM_client_edit.asp?SK_mclass=<%=session("dd")%>&SK_sclass=<%=com_vest%>&id=<%=com_id%>"><%end if%><%=com_name%><%if session("quanxian")>=2 then%></a><%end if%> 重要度：<%=com_zy%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>公司网址</TD>
<TD align="left"><a href="<%=com_web%>" target="_blank"><%=com_web%></a></TD>
</TR>
<TR align=middle height=22>
<TD align=right>所在洲</TD>
<TD align="left"><%=com_diqu2%></TD>
</TR>
<TR align=middle height=22>
<TD align=right>国家或地区</TD>
<TD align="left"><%set folderrs=server.createobject("adodb.recordset")
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -