📄 e_clientdetail.asp
字号:
<!--#include file="../include/Pubconn.asp"-->
<%
'************************************
'Author: Ruphi Update Time:2001-08-27
'功能:显示客户的具体的信息,为公用程序。
'************************************
khxh=request("khxh")
if khxh="" then
response.write "<center>请先选择客户!<a href=javascript:window.close()>关闭</a></center>"
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>单据查询</title><link href="../cread.css" rel="stylesheet" type="text/css">
</head>
<script language="VBscript">
sub close1()
window.close()
end sub
</script>
<body bgcolor="#FFFFFF" >
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="100%"><b><font size="3"><img border="0" src="../pic/it_22.gif" width="34" height="15">
</font><font size="2">客户信息浏览</font></b><hr width="40%" size="1" align="left">
</td>
</tr>
</table>
<%
set rskh=server.CreateObject("adodb.recordset")
rskh.open "select * from D_clientInfo where clientnum='"&khxh&"'",Pubconn,1,3%>
<%if rskh.recordcount<=0 then%>
<center><font size="2">对不起,没有该客户的基本资料,<a href="javascript:window.close()" >关闭</a> <b> </b> </font></center><center><b><font size="2"> </font></b></center><%Response.End %>
<%end if%>
<%
'找出部门的名称
set bm=server.createobject("adodb.recordset")
sql="select * from A_departInfo where departcode='"&rskh("departcode")&"'"
bm.open sql,pubconn,1
%>
<table border=1 cellspacing=0 width="100%" height="30%" bgcolor="#F7F4E5">
<tr>
<td align="right" width="92" height="23" bordercolor="#F7F4E5">客户序号</td>
<td width="133" height="23" bordercolor="#F7F4E5"><input type="text" size=16 name="m_id" readonly value="<%=rskh("clientnum")%>" style="background-color: #edefef"></td>
<td align="right" width="69" height="23" bordercolor="#F7F4E5">客户名称</td>
<td width="128" height="23" bordercolor="#F7F4E5"><input type="text" size=20 name="m_name" readonly value="<%=rskh("clientname")%>" style="background-color: #edefef"></td>
<td align="right" width="61" height="23" bordercolor="#F7F4E5">所属部门</td>
<td width="141" height="23" bordercolor="#F7F4E5"><input type="text" size="20"name="m_BelongDepart" readonly value="<%=bm("name")%>" style="background-color: #edefef"></td>
</tr>
<tr>
<td align="right" width="92" height="23" bordercolor="#F7F4E5">地址</td>
<td width="133" height="23" bordercolor="#F7F4E5"><input type="text" size=17 name="M_Address" readonly value="<%=rskh("Address")%>" style="background-color: #edefef"></td>
<td align="right" width="69" height="23" bordercolor="#F7F4E5">电话</td>
<td width="128" height="23" bordercolor="#F7F4E5"><input type="text" size=20 name="m_Telophone" readonly value="<%=rskh("Telophone")%>" style="background-color: #edefef"></td>
<td align="right" width="61" height="23" bordercolor="#F7F4E5">传真</td>
<td width="141" height="23" bordercolor="#F7F4E5"><input type="text" size=20 name="m_fax" value="<%=rskh("fax")%>" readonly style="background-color: #edefef" ></td>
</tr>
<tr>
<td align="right" width="92" height="28" bordercolor="#F7F4E5">E-Mail</td>
<td width="133" height="28" bordercolor="#F7F4E5"><input type="text" size=17 name="E-mail" value="<%=rskh("E_mail")%>" readonly style="background-color: #edefef"></td>
<td align="right" width="69" height="28" bordercolor="#F7F4E5">网址</td>
<td width="128" height="28" bordercolor="#F7F4E5"><input type="text" size=20 name="m_NetAddress" value="<%=rskh("NetAddress")%>" readonly style="background-color: #edefef"></td>
<td align="right" width="61" height="28" bordercolor="#F7F4E5">总经理</td>
<td width="141" height="28" bordercolor="#F7F4E5"><input type="text" size=20 name="m_Manager" value="<%=rskh("Manager")%>" readonly style="background-color: #edefef"></td>
</tr>
<tr>
<td align="right" width="92" height="23" bordercolor="#F7F4E5">客户类型</td>
<td width="133" height="23" bordercolor="#F7F4E5"><input type="text" name="m_type" value="<%=rskh("type")%>" size="17" readonly style="background-color: #edefef"></td>
<td align="right" width="69" height="23" bordercolor="#F7F4E5">客户级别</td>
<td width="128" height="23" bordercolor="#F7F4E5"><input type="text" name="m_level" value="<%=rskh("level")%>" readonly style="background-color: #edefef"></td>
<td align="right" width="61" height="23" bordercolor="#F7F4E5">区域</td>
<td width="141" height="23" bordercolor="#F7F4E5"><input type="text" name="m_area" value="<%=rskh("area")%>" readonly style="background-color: #edefef"></td>
</tr>
<tr>
<td align="right" width="92" height="23" bordercolor="#F7F4E5">行业</td>
<td width="133" height="23" bordercolor="#F7F4E5"><input type="text" size=18 name="m_Occupation" value="<%=rskh("Occupation")%>" readonly style="background-color: #edefef"></td>
<td align="right" width="69" height="23" bordercolor="#F7F4E5">年营业额</td>
<td width="128" height="23" bordercolor="#F7F4E5"><input type="text" size=20 name="m_IncomePerYear" value="<%=rskh("IncomePerYear")%>" readonly style="background-color: #edefef"></td>
<td align="right" width="61" height="23" bordercolor="#F7F4E5">资产规模</td>
<td width="141" height="23" bordercolor="#F7F4E5"><input type="text" size=20 name="m_AssetScale" value="<%=rskh("AssetScale")%>" style="background-color: #edefef"></td>
</tr>
<tr>
<td align="right" width="92" height="23" bordercolor="#F7F4E5">效益状况</td>
<td width="133" height="23" bordercolor="#F7F4E5"><input type="text" size=17 name="m_BenefitStatus" value="<%=rskh("BenefitStatus")%>" readonly style="background-color: #edefef"></td>
<td width="69" height="23" bordercolor="#F7F4E5">
<p align="right">
信息来源
</p>
</td><td width="128" height="23" bordercolor="#F7F4E5"><input type="text" size=20 name="m_InformationSource" value="<%=rskh("InformationSource")%>" readonly style="background-color: #edefef" ></td>
<%
set rsname=server.createobject("adodb.recordset")
sql="select * from A_stuffInfo where stuffnum='"&rskh("stuffnum")&"'"
rsname.open sql,pubconn,1
if not rsname.eof then
ywy=rsname("name")
else
ywy=rskh("stuffnum")
end if
%>
<td align="right" width="61" height="23" bordercolor="#F7F4E5">业务员</td>
<td width="141" height="23" bordercolor="#F7F4E5"><input type="text" size=20 name="m_Careeror" value="<%=ywy%>" readonly style="background-color: #edefef" ></td>
</tr>
<tr>
<td align="right" width="92" height="23" bordercolor="#F7F4E5">备注</td>
<td colspan=5 width="548" height="23" bordercolor="#F7F4E5"><input type="text" size=90 name="m_remark" value="<%=rskh("remark")%>" readonly style="background-color: #edefef"></td>
</tr>
</table>
<p align="center">
<a href="javascript:window.close()" ><font size="2">关闭</font></a>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -