📄 c_salesum.asp
字号:
End sub
'****************************************表单初始化查询********************************************
Sub formini()
document.forms(0).vYear.value="<%=vYear%>"
document.forms(0).eYear.value="<%=eYear%>"
document.forms(0).eMonth.value="<%=eMonth%>"
document.forms(0).vMonth.value="<%=vMonth%>"
'调整设置的时间值
if document.forms(0).vYear.value="" then document.forms(0).vYear.value=year(now())
if document.forms(0).eYear.value="" then document.forms(0).eYear.value=year(now())
if document.forms(0).eMonth.value="" then
lceMonth=month(now())
if lceMonth<10 then
document.forms(0).eMonth.value="0"+cstr(lceMonth)
else
document.forms(0).eMonth.value=cstr(lceMonth)
end if
end if
Count1=<%=Count1%>
Count2=<%=Count2%>
Call DepartCodeIni()
Call Stuffini()
document.forms(0).departid.value="<%=departID%>"
document.forms(0).sales.value="<%=sales%>"
End Sub
'****************************************形成查询条件***********************************************
Sub SearchClick()
dim lcvYear,lcvMonth,lceYear,lceEnd '开始和结束的查询条件
dim lcDepart,lcStuff '部门编码和员工编码
dim lcCondition '形成的查询条件
lcvYear=document.forms(0).vYear.value
lcvMonth=document.forms(0).vMonth.value
lceYear=document.forms(0).eYear.value
lceMonth=document.forms(0).eMonth.value
lnerror=1
if lceYear<lcvYear then
msgbox "输入的时间段有错误：终止时间大于起始时间",48,"错误信息"
else
if lcvMonth<>"" and lceMonth<>"" and lceMonth<lcvMonth then
msgbox "输入的时间段有错误：终止时间大于起始时间",48,"错误信息"
else
lcCondition="pYear>='"+lceYear+"' AND pYear<='"+lceYear+"'"
if lcvMonth<>"" then
lcCondition=lcCondition+" And pMonth>='"+lcvMonth+"'"
end if
if lceMonth<>"" then
lcCondition=lcCondition+" And pMonth<='"+lceMonth+"'"
end if
lcDepart=document.forms(0).departid.value
if lcDepart<>"" then
lcCondition=lcCondition+" AND DepartID='"+lcDepart+"'"
end if
lcStuff=document.forms(0).Sales.value
if lcStuff<>"" then
lcCondition=lcCondition+" AND "+"Sales='"+lcStuff+"'"
End if
document.forms(0).Condition.value=lcCondition
fn.submit()
end if
end if
End Sub
Sub backpage()
history.back(-1)
End Sub
</Script>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>促销统计分析</title>
</head>
<body bgcolor="#FFFFFF" onload="formini()">
<form method="GET" action="C_SaleSum.asp" name="fn">
<table border="0" width="100%" cellspacing="0" cellpadding="0" height="33">
<tr><td height="33"><b><font size="3"><img border="0" src="../pic/it_22.gif">
</font><font size="2">市场活动统计分析</font></b></td></tr>
</table>
<table border="1" width="100%" cellspacing="0" cellpadding="0" height="38">
<tr>
<td width="100%" height="36">
<table border="0" width="100%" cellpadding="0" cellspacing="0" height="60">
<tr>
<td width="100%" height="35" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p align="left" style="margin-left: 20"><font size="2" face="宋体">请选择查询时间段</font><font size="2"><font face="宋体">：</font>
<select size="1" name="vYear" tabindex="3"> <% for i=1990 to 2010 %>
<option value=<%=i%>><%=i%></option>
<% next %>
</select>年
<select size="1" name="vMonth" tabindex="3">
<option value="">不限</option>
<% for i=1 to 9
b="0"+cstr(i) %>
<option value=<%=b%>>0<%=i%></option>
<% next %>
<% for i=10 to 12 %>
<option value="<%=i%>"><%=i%></option>
<% next %>
</select>月 至
<select size="1" name="eYear" tabindex="3"> <% for i=1990 to 2010 %>
<option value=<%=i%>><%=i%></option>
<% next %>
</select> 年
<select size="1" name="eMonth" tabindex="3">
<option value="" >不限</option>
<% for i=1 to 9
b="0"+cstr(i) %>
<option value=<%=b%>>0<%=i%></option>
<% next %>
<% for i=10 to 12 %>
<option value="<%=i%>"><%=i%></option>
<% next %>
</select>月 </font></td>
</tr>
<tr>
<td width="100%" height="25" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p align="left" style="margin-left: 20"><font size="2" face="宋体">请选择公司/部门：
<select size="1" name="DepartID" onchange="departcodeclick()" style="width:130;">
<option value="">请选择...</option>
</select> 请选择业务员：<select size="1" name="Sales" onchange="stuffcodeclick()" style="width:130;">
<option value="">请选择...</option>
</select>
</font>
<input type="button" value="确定" name="Search" onclick="SearchClick()" tabindex="4" class=hand style="background-color: #D1D1D1; border-style: solid; border-width: 1"> </td>
</tr>
</table>
</td>
</tr>
</table>
<table border="0" width="100%" cellpadding="0" cellspacing="0" height="77">
<tr>
<td width="200%" height="15">
</td>
</tr>
<tr>
<td width="200%" height="165">
<table border="1" cellpadding="0" cellspacing="0" width="100%">
<tr bgcolor="#f7f7f7">
<td width="19%" align="center" height="23">
<p style="line-height: 150%"><font size="2">活动次数</font></td>
<td width="89%" align="center" height="23">
<p style="line-height: 150%; margin-left: 10" align="left"><font size="2"><%=Keyitem(1)%></font></td>
</tr>
<tr bgcolor="#EDEBEC" >
<td width="19%" align="center" height="23">
<p style="line-height: 150%"><font size="2">计划费用(元)</font></td>
<td width="89%" height="23">
<p style="line-height: 150%; margin-left: 10"><font size="2"><%=Keyitem(2)%></font></td>
</tr>
<tr bgcolor="#f7f7f7">
<td width="19%" align="center" height="23">
<p style="line-height: 150%"><font size="2">实际费用(元)</font></td>
<td width="89%" height="23">
<p style="line-height: 150%; margin-left: 10"><font size="2"><%=Keyitem(3)%></font></td>
</tr>
<tr bgcolor="#EDEBEC" >
<td width="19%" align="center" height="23">
<p style="line-height: 150%"><font size="2">销售总额(元)</font></td>
<td width="89%" height="23">
<p style="line-height: 150%; margin-left: 10"><font size="2"><%=Keyitem(4)%></font></td>
</tr>
<tr bgcolor="#f7f7f7">
<td width="19%" align="center" height="23">
<p style="line-height: 150%"><font size="2">投入人员数</font></td>
<td width="89%" height="23">
<p style="line-height: 150%; margin-left: 10"><font size="2"><%=Keyitem(5)%></font></td>
</tr>
<tr bgcolor="#EDEBEC" >
<td width="19%" align="center" height="16">
<p style="line-height: 150%"><font size="2">客户参加人数</font></td>
<td width="89%" height="16">
<p style="line-height: 150%; margin-left: 10"><font size="2"><%=Keyitem(6)%></font></td>
</tr>
<tr bgcolor="#f7f7f7">
<td width="19%" align="center" height="16">
<p style="line-height: 150%"><font size="2">消费者参加人数</font></td>
<td width="89%" height="16">
<p style="line-height: 150%; margin-left: 10"><font size="2"><%=Keyitem(7)%></font></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="33">
<p><font size="2"><a href="c_tjcx.asp">返 回</a></font>
</td>
</tr>
</table>
<input type="hidden" name="DelFlag" value="">
<input type="hidden" name="Curpage" value="">
<input type="hidden" name="Condition" value="">
<input type="hidden" name="URL" value="">
</form>
<p><br>
<font size="2" face="宋体"><b><br>
</b></font></p>
</body>
</html>
<%'*********************************页面结束 ***************************************************************%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -