📄 tel.asp
字号:
<!--#include file ="date.asp"-->
<!--#include file ="conn.asp"-->
<style type="text/css">
<!--
.STYLE2 {font-size: 18px}
.STYLE3 {
font-size: 18px;
font-weight: bold;
color: #FFFFFF;
}
a:link {
text-decoration: none;
}
a:visited {
text-decoration: none;
}
a:hover {
text-decoration: none;
}
a:active {
text-decoration: none;
}
body {
background-color: #ECF2FF;
margin-left: 0px;
margin-right: 0px;
}
.STYLE5 {
font-size: 12px;
color: #000055;
}
body,td,th {
font-size: 12px;
}
.STYLE29 {font-size: 12px; font-weight: bold; }
-->
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<BODY leftmargin="10" topmargin="0">
<p align="center" class="STYLE2">
<table width="100%" height="35" border="0" background="image/top.gif" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"><span class="STYLE3">新增电话客户</span></div></td>
</tr>
</table>
<% if request("action")="save" then
nam=session("cname")
set rr=server.CreateObject("adodb.recordset")
wwdsql="select * from tel"
rr.open wwdsql,conn,1,3
rr.addnew
rr("seller")=nam
rr("name")=request.form("name")
rr("tel")=request.form("tel")
rr("customer")=request.form("customer")
rr("date")=request.form("date")
rr("time1")=request.form("time1")
rr("time2")=request.form("time2")
rr("remark")=request.form("remark")
rr("yixiang")=request.form("yixiang")
rr.update
%>
<br><br>保存成功！
<br><br>
<%
else
%>
<table width="661" height="26" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#CCCCCC" bgcolor="#CEDEFB">
<tr>
<%user=session("cname")
lev=session("leve")
bran="营销部"
exec="select * from che where branch='"&bran&"' order by id"
set ds=server.createobject("adodb.recordset")
ds.open exec,conn,1,1
i=1
Do While Not ds.Eof
%><td >
<div align="center">
<a href="tel.asp?id=<%=ds("cname")%>">
<%
nam=ds("cname")
response.Write nam
i=i+1
%>的客户</a></div>
</td>
<%
ds.MoveNext
Loop
%></tr>
</table>
<strong>
<form name="form1" method="post" action="tel.asp?action=save">
<p align="center">
<table width="90%" height="105" border="1" align="center" cellpadding="0" cellspacing="0">
<tr height="35">
<td width="53"><span class="STYLE29">公司名称</span></td>
<td width="142"><input name="name" type="text" size="20"></td>
<td width="53"><strong>联系人</strong></td>
<td width="58"><input name="customer" type="text" size="6"></td>
<td width="38"><strong>电话</strong></td>
<td width="110"><input name="tel" type="text" size="12"></td>
<td width="60"><strong>联系时间</strong></td>
<td colspan="2"><input name="date" type="text" onClick="popUpCalendar(this, form1.date, 'yyyy-mm-dd')" value="<%=date()%>" size="10" readonly="">
<input name="time1" type="text" size="4">
-
<input name="time2" type="text" size="4"></td>
</tr>
<tr height="65">
<td><span class="STYLE29">情况简介</span></td>
<td colspan="6"><textarea name="remark" cols="60" rows="4"></textarea></td>
<td width="70"><strong>意向度</strong></td>
<td width="104"><select name="yixiang">
<option value="0" selected>0</option>
<option value="30">30%</option>
<option value="60">60%</option>
<option value="90">90%</option>
</select></td>
</tr>
</table>
<br>
<label>
<div align="center">
<input type="submit" name="Submit4" value="提交">
<input type="reset" name="Submit5" value="重置">
</div>
</label>
</form></strong>
<%
if request("id")<>"" then
user=request("id")
else
user=session("cname")
end if
if session("leve")<5 then
exec="select * from tel where seller='"&user&"' order by date desc"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<table width="90%" height="58" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#999999" bgcolor="#CEDEFB">
<tr>
<td width="31" height="32" background="image/headerbg.gif"><div align="center" class="STYLE14">编号</div></td>
<td width="137" background="image/headerbg.gif"><div align="center" class="STYLE14">单位名称</div></td>
<td width="56" background="image/headerbg.gif"><div align="center" class="STYLE14">联系人</div></td>
<td width="98" background="image/headerbg.gif"><div align="center" class="STYLE14">联系电话</div></td>
<td width="127" background="image/headerbg.gif"><div align="center" class="STYLE14">联系时间</div></td>
<td width="363" background="image/headerbg.gif"><div align="center" class="STYLE14">情况简介</div> </td>
<td width="52" background="image/headerbg.gif"><div align="center" class="STYLE14">意向度</div></td>
</tr>
<%
for i=1 to rs.recordcount
if rs.eof then
exit for
end if
%>
<tr>
<td height="24" bgcolor="#FFFFFF"><div align="center" class="STYLE13"><%=i%></div></td>
<td bgcolor="#FFFFFF"><div align="center" class="STYLE13"><%=rs("name")%> </div></td>
<td bgcolor="#FFFFFF"><div align="center" class="STYLE13"><%=rs("customer")%> </div></td>
<td bgcolor="#FFFFFF"><div align="center" class="STYLE13"><%=rs("tel")%> </div></td>
<td bgcolor="#FFFFFF"><div align="center" class="STYLE13"><%response.write month(rs("date"))&"."&day(rs("date"))&" "&rs("time1")&"-"&rs("time2") %></div></td>
<td bgcolor="#FFFFFF"><div align="center" class="STYLE13"><%=rs("remark")%>
</div></td>
<td bgcolor="#FFFFFF"><div align="center" class="STYLE13"><%=rs("yixiang")%>% </div></td>
</tr>
<%rs.movenext
next%>
<% end if%>
</table>
<br>
<%end if%>
<table width="100%" height="18" border="0" background="image/bottom.gif" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="bottom"><div align="center"><span class="STYLE5">版权所有 杰尔康</span> <br />
</div></td>
</tr>
</table>
</BODY>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -