📄 c_marketinfo.asp
字号:
Sub SaveData()
dim lcSubject '竞争者名称
dim lnerror '表示保存错误标志
dim lcYear,lcMonth,lcDay '保存的年、月、日
lnerror=1
lcSubject=document.forms(0).Subject.value
if lcSubject="" then
msgbox "市场情报报告主题不能为空！",48,"错误信息"
lnerror=0
end if
if lnerror=1 then '保存数据到数据库
document.forms(0).saveflag.value="1"
document.forms(0).Mode.value="<%=Mode%>"
document.forms(0).ID.value="<%=ID%>"
lcYear=document.forms(0).pYear.value
lcMonth=document.forms(0).pMonth.value
lcDay=document.forms(0).pDay.value
document.forms(0).ReportDate.value=lcYear+"-"+lcMonth+"-"+lcDay
document.forms(0).submit
end if
End Sub
</Script>
<!--#include file="../BaseInfo/PageData.Client"-->
<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()" unload="formend()">
<form method="GET" action="C_Marketinfo.asp" onsubmit="return FrontPage_Form1_Validator(this)" name="fn">
<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" cellspacing="0" width="100%" cellpadding="0" height="1">
<tr>
<td width="21%" align="right" height="1" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 200%"><font size="2">报告主题</font>
</td>
<td width="102%" height="1" colspan="3" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 200%; margin-left: 5"><font size="2">
<input type="text" name="Subject" size="68" ></font></p>
</td>
</tr>
<tr>
<td width="22%" align="right" height="8" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 200%"><font size="2">业 务 员</font>
</td>
<td width="35%" height="8" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 200%; margin-left: 5">
<input type="text" name="Sales" size="24" ReadOnly></p>
</td>
<td width="17%" align="center" height="8" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 200%" align="right"><font size="2">报告日期</font>
</td>
<td width="46%" height="8" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 200%; margin-left: 5">
<font size="2">
<select size="1" name="pYear" tabindex="3">
<% for i=1990 to 2010 %>
<option value="<%=i%>"><%=i%></option>
<% next %>
</select>年
<select size="1" name="PMonth" tabindex="3">
<% 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="PDay" > <% for i=1 to 9
b="0"+cstr(i) %>
<option value=<%=b%>>0<%=i%></option>
<% next %>
<% for i=10 to 31 %>
<option value="<%=i%>"><%=i%></option>
<% next %>
</select>日 </font>
</p>
</td>
</tr>
<tr>
<td width="21%" align="right" height="41" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 100%"><font size="2">竞争者产品动向</font>
</td>
<td width="102%" height="41" colspan="3" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 100%; margin-left: 5"><textarea rows="2" name="TraitPulse" cols="66"></textarea>
</td>
</tr>
<tr>
<td width="21%" align="right" height="4" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<p style="line-height: 100%"><font size="2">竞争者价格动向</font>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -