📄 g_execbrow1.asp
字号:
<!--#include file="../include/Pubconn.asp"-->
<!--#include file="../include/PubFun.asp"-->
<% username=Getuser()%>
<%
'*********************************
'
'Author:Ruphi Update Time:2001-08-22
'功能说明：对已执行过的计划查看其详细内容。（执行审核中）
'
'******************************
%>
<%
Pid=request("ID")
wid=request("wid")
sid=request("sid")
set cx1=server.createobject("ADODB.RecordSet")
sql="Select * from G_TblClosePlan Where ID="&Pid
cx1.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>
<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"><b><font size="3">
</font><font size="2">客户计划执行浏览</font></b></font></b><hr width="40%" size="1" align="left">
</td>
</tr>
</table>
<table border="1" width="100%" cellspacing="0" height="26" bgcolor="#F7F4E5">
<tr>
<td width="658" height="23" align="right" colspan="4" bordercolor="#F7F4E5" >
<% str1="select * from A_StuffInfo Where StuffNum='"&cx1("StuffNum")&"'"
set rsname=Pubconn.execute(str1)
%>
<p align="left">
<font size="2"><%=rsname("Name")%>行动计划：
</font>
</td>
</tr>
<tr>
<td width="119" height="19" align="right" bordercolor="#F7F4E5" >
<font size="2">计划跟进日期</font>
</td>
<td width="154" height="19" bordercolor="#F7F4E5" >
<input type="text" name="txtywy1" size="15" tabindex="1" value="<%=cx1("Closedate")%>" style="background-color: #edefef" readonly>
</td>
<td width="116" height="19" align="right" bordercolor="#F7F4E5" >
<font size="2">计划跟进时间</font>
</td>
<td width="257" height="19" bordercolor="#F7F4E5" >
<input type="text" name="txtywy1" size="19" tabindex="2" readonly style="background-color: #edefef" value="<%=cx1("Closedate")%>">
</td>
</tr>
<tr>
<td width="119" height="23" align="right" bordercolor="#F7F4E5">
<font size="2">计划客户名称</font>
</td>
<% mysql="select * from D_ClientInfo where ClientNum='"&cx1("ClientNum")&"'"
set rscust=pubconn.execute(mysql)
%>
<td width="535" height="23" colspan="3" bordercolor="#F7F4E5">
<input type="text" name="khxh" size="41" value="<%=RScust("ClientName")%>" readonly style="background-color: #edefef" tabindex="3"> </td>
</tr>
<tr>
<td width="119" height="23" align="right" bordercolor="#F7F4E5" >
<font size="2">计划跟进对象</font>
</td>
<td width="154" height="23" bordercolor="#F7F4E5">
<input type="text" name="txtywy3" size="15" tabindex="4" value="<%=cx1("LinkMan")%>" style="background-color: #edefef" readonly>
</td>
<td width="116" height="23" align="right" bordercolor="#F7F4E5" >
<font size="2">对象职务</font>
</td>
<td width="257" height="23" bordercolor="#F7F4E5">
<input type="text" name="txtywy3" size="19" tabindex="5" value="<%=cx1("ObjectDuty")%>" style="background-color: #edefef" readonly>
</td>
</tr>
<tr>
<td width="119" height="23" align="right" bordercolor="#F7F4E5" >
<font size="2">跟进方式</font>
</td>
<td width="154" height="23" bordercolor="#F7F4E5">
<input type="text" name="txtywy5" size="16" tabindex="6" style="background-color: #edefef" value="<%=cx1("CloseMode")%>" readonly>
</td>
<td width="116" height="23" align="right" bordercolor="#F7F4E5">
<font size="2">跟进目的
</font>
</td>
<td width="257" height="23" bordercolor="#F7F4E5">
<input type="text" name="txtywy5" size="31" tabindex="7" style="background-color: #edefef" value="<%=cx1("ClosePurpose")%>" readonly>
</td>
</tr>
<tr>
<td width="658" height="23" colspan="4" bordercolor="#F7F4E5">
<p align="left">
<font size="2">计划执行情况：
</font>
</td>
</tr>
<tr>
<td width="119" height="23" align="right" bordercolor="#F7F4E5">
<font size="2">问题
</font>
</td>
<td width="154" height="23" bordercolor="#F7F4E5">
<p align="left">
<input type="text" name="txtRemark" size="17" value="<%=cx1("ExecProblem")%>" tabindex="10" style="background-color: #edefef" readonly>
</td>
<td width="116" height="23" bordercolor="#F7F4E5">
<p align="right">
<font size="2">下一步对策
</font>
</p>
</td>
<td width="257" height="23" bordercolor="#F7F4E5">
<p align="left">
<input type="text" name="txtRemark2" size="17" tabindex="10" value="<%=cx1("NextMeasure")%>" style="background-color: #edefef" readonly>
</td>
</tr>
<tr>
<td width="119" height="23" align="right" bordercolor="#F7F4E5" >
<font size="2">备注
</font>
</td>
<td width="535" height="23" colspan="3" bordercolor="#F7F4E5">
<p align="left">
<input type="text" name="txtRemark1" size="69" tabindex="10" value="<%=cx1("ExecRemark")%>" style="background-color: #edefef" readonly>
</td>
</tr>
</table>
<%
rsname.close
set rsname=nothing
cx1.close
set cx1=nothing
%>
<p align="left">
<a href="G_execsh.ASP?WeekID=<%=wid%>&txtstuff=<%=sid%>">
<font size="2">返回</a> <a href="javascript:window.print()">打印</a>
</font>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -