📄 e_reindetail.asp
字号:
<!--#include file="../include/Pubconn.asp"-->
<!--#include file="../include/PubFun.asp"-->
<%
username=Getuser()
userclass=TableVisitor("E_Clientcomplain",username)
if userclass<1 then
response.write "<center>抱歉，您没有此项操作权限！<a href=E_reinbrow.asp>返回</a>"
response.end
end if
%>
<%
'***********************************
'Author:Ruphi Update Time:2001-08-19
'功能说明： 客户跟进计划录入界面
'***********************************
ID=request("ID")
set rsts=Server.CreateObject("ADODB.RecordSet")
sql="select * from E_Clientcomplain where id="&cint(ID)
rsts.open sql,Pubconn,1
khmc=khname(rsts("ClientNum"))
'找出产品的有关的内容
set rssp=Server.Createobject("ADODB.recordset")
sql="select * from A_ProductInfo where ProdCode='"&rsts("prodcode")&"'"
rssp.open sql,Pubconn,1
if not rssp.eof then
cpmc=rssp("ProdName")
ggxh=rssp("Model")+"-"+rssp("standard")
end if
%>
<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_reinInfo.asp" name="form1" >
<table border="1" width="100%" cellspacing="0" height="24" bgcolor="#F7F4E5">
<tr>
<td width="88" height="23" bgcolor="#F7F4E5" bordercolor="#F7F4E5" >
<p align="right">
<font size="2">
单据编号
</font>
</p>
</td>
<td width="200" height="23" bgcolor="#F7F4E5" bordercolor="#F7F4E5">
<p align="left">
<input type="text" name="djbh" size="15" value="<%=rsts("BillID")%>" readonly style="background-color: #edefef">
<td width="68" height="23" align="right" bgcolor="#F7F4E5" bordercolor="#F7F4E5" >
<font size="2">受理人
</font>
</td>
<td width="292" height="23" bgcolor="#F7F4E5" bordercolor="#F7F4E5">
<input type="text" name="slr" size="15" readonly style="background-color: #edefef" value="<%=Pname(rsts("DisposePerson"))%>" >
</td>
</tr>
<tr>
<td width="88" height="23" align="right" bgcolor="#F7F4E5" bordercolor="#F7F4E5">
<font size="2">客户序号
</font>
</td>
<td width="200" height="23" bgcolor="#F7F4E5" bordercolor="#F7F4E5">
<input type="text" name="khxh" size="17" value="<%=rsts("ClientNum")%>" readonly style="background-color: #edefef" >
<td width="68" height="23" align="right" bgcolor="#F7F4E5" bordercolor="#F7F4E5" >
<font size="2"><a href="#" onclick="khxx()">客户名称</a>
</font>
</td>
<td width="292" height="23" bgcolor="#F7F4E5" bordercolor="#F7F4E5" >
<input type="text" name="khmc" size="32" value="<%=khmc%>" readonly style="background-color: #edefef">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -