📄 g_statebrow.asp
字号:
<!--#include file="../include/Pubconn.asp"-->
<!--#include file="../include/PubFun.asp"-->
<% username=Getuser()%>
<%
sh=request("sh") '判断是否审核
set ztbg=Server.CreateObject("ADODB.RecordSet")
sql="select * from G_TblCloseState where ID="&cint(request("ID"))
ztbg.open sql,Pubconn,1
%>
<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 con()
riv=document.form1.khxh.value
window.open"G_contender.asp?par_id="+riv,"竞争者信息","menubar=no,status=no,width=600,height=500,scrollbars=yes"
end sub
sub khxq()
khxh=document.form1.khxh.value
window.open"G_Clientneed.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">
</font><font size="2">状态报告浏览</font></b><hr width="40%" size="1" align="left">
</td>
</tr>
</table>
<table border="1" width="100%" cellspacing="0" height="1" bgcolor="#F7F4E5">
<tr><form name="form1" action="" method="post">
<td width="101" height="7" align="right" bordercolor="#F7F4E5">
<font size="2">客户名称</font>
</td>
<td width="177" height="7" bordercolor="#F7F4E5">
<input type="hidden" name="khxh" value="<%=ztbg("ClientNum")%>">
<%
set rskh=Server.CreateObject("ADODB.RecordSet")
sql="select * from D_ClientInfo where ClientNum='"&ztbg("ClientNum")&"'"
rskh.open sql,pubconn,1
%>
<input type="text" name="khmc" vaule="" size="20" value="<%=rskh("ClientName")%>" readonly style="background-color: #edefef" >
</td>
<td width="120" height="7" align="right" bordercolor="#F7F4E5">
<font size="2">客户级别
</font>
</td>
<td width="304" colspan="3" height="7" bordercolor="#F7F4E5">
<input type="text" name="kh" vaule="" size="20" value="<%=ztbg("ClientLevel")%>" readonly style="background-color: #edefef" >
</td>
</tr>
<tr>
<td width="101" height="23" align="right" bordercolor="#F7F4E5">
<font size="2">业务员
</font>
</td>
<td width="177" height="23" bordercolor="#F7F4E5">
<p align="left">
<% set rs1=Server.CreateObject("ADODB.RecordSet")
sql="select * from A_StuffInfo where StuffNum='"&ztbg("StuffNum")&"'"
rs1.open sql,Pubconn,1
%>
<input type="text" name="kh" vaule="" size="17" value="<%=rs1("Name")%>" readonly style="background-color: #edefef" >
</p>
</td>
<td width="120" height="23" align="right" bordercolor="#F7F4E5">
<font size="2">报告日期
</font>
</td>
<td width="304" colspan="3" height="23" bordercolor="#F7F4E5">
<input type="text" name="kh" vaule="" size="11" value="<%=ztbg("ReportDate")%>" readonly style="background-color: #edefef" >
</td>
</tr>
<tr>
<td width="101" height="23" align="right" bordercolor="#F7F4E5">
<font size="2">接近客户
</font>
</td>
<td width="177" height="23" bordercolor="#F7F4E5">
<input type="text" name="kh" vaule="" size="14" value="<%=ztbg("CloseState")%>" readonly style="background-color: #edefef" >
</td>
<td width="120" height="23" align="right" bordercolor="#F7F4E5">
<font size="2">调查
</font>
</td>
<td width="135" height="23" bordercolor="#F7F4E5">
<input type="text" name="kh" vaule="" size="10" value="<%=ztbg("InquiryState")%>" readonly style="background-color: #edefef" >
</td>
<td width="62" height="23" align="right" bordercolor="#F7F4E5">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -