📄 e_returndetail.asp

📁 一个很好的在线购物系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页



<!--#include file="../include/Pubconn.asp"-->
<!--#include file="../include/PubCode.asp"-->
<!--#include file="../include/PubFun.asp"--> 
<%
 username=Getuser()
userclass=TableVisitor("E_infoReturn",username)
if userclass<1 then
   response.write "<center>抱歉，您没有此项操作权限！<a href=E_returnbrow.asp>返回</a>"
   response.end
end if

%>


<%
'***********************************
'Author:Ruphi  Update Time:2001-08-19
'功能说明： 客户跟进计划录入界面
'***********************************
ID=request("ID")

set rsfk=Server.CreateObject("ADODB.RecordSet")
SQL="select *  from E_infoReturn where ID="&cint(ID)
rsfk.open sql,Pubconn,1  
   set mykh=Server.CreateObject("ADODB.RecordSet")
   sql="select *  from D_ClientInfo where ClientNum='"&rsfk("ClientNum")&"'"
   mykh.open sql,Pubconn,1
   if not mykh.eof then
      khmc=mykh("ClientName")
      telephone=mykh("telophone")
   end if 
    '找出产品的有关的内容
    set rssp=Server.Createobject("ADODB.recordset")
    sql="select *  from A_ProductInfo where ProdCode='"&rsfk("ProdCode")&"'"
    rssp.open sql,Pubconn,1
    if not rssp.eof then
       cpmc=rssp("ProdName")
       ggxh=rssp("Model")+"-"+rssp("stanDard")
       
   end if 
 '找出对应的制单人的名称
     set rsperson=Server.CreateObject("ADODB.RecordSet")
     sql="select Name from A_StuffInfo where Stuffnum='"&rsfk("zdr")&"'"
     rsperson.open sql,Pubconn,1
     if not rsperson.eof then
        MC=rsperson("Name")
     else
        MC=""
     end  if 
'Response.write userclass&"--"&rsfk("zdr")
 'response.write rsfk("zdr")&"--"&session("userid")  
%>


<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>客户跟进计划</title>

<link href="../cread.css" rel="stylesheet" type="text/css">
</head>
<script language="vbscript">
  sub khxx()
  khxh=document.form1.khxh.value
  window.open "E_Clientdetail.asp?khxh="+khxh,"客户信息","menubar=no,status=no,width=600,height=500,scrollbars=yes" 
 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>                
         
            
          
<form method="POST" action="E_returnInfo.asp" name="form1" >           
           
          
<table border="1" width="100%" cellspacing="0" height="24"  bgcolor="#F7F4E5">            
  <tr>         
         
         
    <td width="84" height="23" bgcolor="#F7F4E5" bordercolor="#F7F4E5" >                                                                   
     
     <p align="right">     
     单据编号     
     
     </p>     
     
    </td>                                                                           
    <td width="229" height="23" bgcolor="#F7F4E5" bordercolor="#F7F4E5">                                                                           
                                                                                 
                                                                         
    <p align="left">      
    <input type="text" name="djbh" size="15" value="<%=rsfk("BillID")%>"  readonly style="background-color: #edefef">          
          
    <td width="79" height="23" align="right" bgcolor="#F7F4E5" bordercolor="#F7F4E5" >                                                                                                                                                                                                
     <font size="2">制单人    
     </font>    
    </td>                                                                                                                                                                                                    
    <td width="312" height="23" bgcolor="#F7F4E5" bordercolor="#F7F4E5">                                                                                                                                                                                                 
    <input type="text" name="zdr" size="15" readonly style="background-color: #edefef" tabindex="9" value="<%=MC%>" >                                                                                                                                                                                                                                  
                                                                                                                                                                                                                                  
    </td>                                                                                                                                                                                                    
         
  </tr>         
  <tr>
12 下一页
⌨️ 快捷键说明

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