⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 g_clientinfo.asp

📁 一个很好的在线购物系统
💻 ASP
字号:

<!--#include file="../include/Pubconn.asp"-->
<%
'************************************
'Author: Ruphi Update Time:2001-08-27
'功能:显示客户的具体的信息,为公用程序。
'************************************


 %>
<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"> 
      </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='"&Request("ClientID") &"'",Pubconn,1,3%>
       <%if rskh.recordcount<=0 then%>
<center><font size="2">对不起,没有该客户的基本资料,<a href="javascript:history.go(-1)" >返回</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="102%" 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>        
          
   <%
   rsname.close
   set rsname=nothing
   rskh.close
   set rskh=nothing
   
   %>      
        
       
         
        
       
    <p align="center">     
    <a href="javascript:history.go(-1)" ><font size="2">返回</font></a>       
         
        
       
      
        
       
      
</BODY>      
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -