📄 buyother.asp
字号:
<% ModuleCode="M0910" %>
<!--#include file="../../../Include/Reference.asp"-->
<%
Call PrintPageHead
%>
<!--#include file="../../../Include/connect.asp"-->
<%
strSQL="Select a.*, b.STName from v_ProdInfo a, T_DNS_ServiceType b where a.STCode=b.STCode and a.ProdCode='" & Request.QueryString("ID") & "' and a.ProdStat<>'3'"
Set Rs= Server.CreateObject("ADODB.Recordset")
Rs.open strSQL,Cn,1,1
If Rs.Eof Then
Response.Write "<br><br><br><br><p align='center'>无法购买该产品</p>"
Rs.Close
Cn.Close
Call PrintPageBottom
Response.End
end if
%>
<script language="javascript">
<!--
function shopcheck()
{
//检查非空
if (!CheckEmpty(form9.Key1, "关键词")) return false;
if (!CheckEmpty(form9.Key2, "开户金额")) return false;
if (!CheckInteger(form9.Key2, "开户金额")) return false;
if (form9.Key2.value<300){
alert("开户金额不能少于300.");
form9.Key2.focus();
return false;
}
if (!CheckEmpty(form9.Key3, "公司或网站名称")) return false;
if (!CheckEmpty(form9.Key4, "URL 地址")) return false;
if (!CheckEmpty(form9.Key5, "简介")) return false;
if (!CheckEmpty(form9.Key6, "联系人姓名")) return false;
if (!CheckEmpty(form9.Key7, "联系电话")) return false;
if (!CheckEmpty(form9.Key8, "传真号码")) return false;
if (!CheckEmpty(form9.Key9, "省份")) return false;
if (!CheckEmpty(form9.Key10, "邮政编码")) return false;
if (!CheckEmpty(form9.Key11, "通信地址")) return false;
if (document.form9.BuyYear.value=="")
{
alert ("必须输入购买年限！");
document.form9.BuyYear.focus();
return false;
}
ii=0;
bString="0123456789";
while (ii<document.form9.BuyYear.value.length)
{
if (bString.indexOf(document.form9.BuyYear.value.substring(ii,ii+1))==-1)
{
alert("购买年限必须是数字");
document.form9.BuyYear.focus();
return false;
}
ii=ii+1;
}
if (!document.form9.agreement.checked)
{
alert('您尚未阅读并接受相关产品购买协议.');
return false;
}
//全部通过
return true;
}
-->
</script>
<table align=center border=0 width="100%">
<tr>
<td>
<font color="<%=Opt_Font_TitleColor%>" class="titletext"><strong>购买<%=Rs("STName")%>类产品</strong></font>
</td>
</tr>
<tr>
<td>
<form name="form9" method="post" action="BuyOtherDo.asp" onSubmit="return shopcheck()">
<input type="hidden" name="ProdCode" value="<%=Rs("ProdCode")%>">
<table width="98%" border=0 cellpadding=4 cellspacing=1 bgcolor="<%=Opt_Table_BGColor%>">
<tbody>
<tr>
<td width=16% align=right bgcolor="<%=Opt_TR_BGColor%>">产品名称</td>
<td width="84%" bgcolor="<%=Opt_TD_BGColor2%>">
<%=Rs("ProdName")%>
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>" valign=top>产品信息</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<%=Rs("ProdInfo")%>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">其他说明</td>
<td bgcolor="<%=Opt_TD_BGColor2%>"><%=Rs("ProdMemo")%></td>
</tr>
<%
'推广
if request("ST")="4" then
%>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">关键词</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="100" name="Key1" size="50" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">开户金额</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="100" name="Key2" size="6" type=text class="input" value=""> [最低为 300 元]
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">公司（或网站）名称</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="100" name="Key3" size="50" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">URL 地址</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="100" name="Key4" size="50" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">简介</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="200" name="Key5" size="50" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">联系人姓名</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="100" name="Key6" size="30" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">联系电话</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="50" name="Key7" size="20" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">传真号码</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="50" name="Key8" size="20" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">省份</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="50" name="Key9" size="20" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">邮政编码</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="6" name="Key10" size="6" type=text class="input" value="">
</td>
</tr>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>">通信地址</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength="200" name="Key11" size="50" type=text class="input" value="">
</td>
</tr>
<%
end if
%>
<tr>
<td align=right bgcolor="<%=Opt_TR_BGColor%>"> 租用年限</td>
<td bgcolor="<%=Opt_TD_BGColor2%>">
<input maxlength=5 name=BuyYear size=3 type=text class="input" value="1">
×
<select name="ProdYear" size=1 class="input">
<%
Set Rs1= Server.CreateObject("ADODB.Recordset")
strSQL="Select * from T_DNS_ProdPrice Where ProdCode='" & Rs("ProdCode") & "' and LevelCode='" & Session("UserLevel") & "' order by ProdYear"
Rs1.open strSQL,Cn
while not Rs1.eof
%>
<option value="<%=Rs1("ProdYear")%>"><%=Rs1("ProdYear")%>年/<%=Rs1("ProdPrice")%>元</option>
<%
Rs1.movenext
wend
Rs1.Close
%>
</select>
</td>
</tr>
<tr>
<td colspan="2" bgcolor="<%=Opt_TD_BGColor2%>">
<input name=agreement type=checkbox value="Y">
我接受<a href=http://4e.china-channel.com/vhost_attorn.asp target = _blank>《相关产品购买协议》</a>
</td>
</tr>
</tbody>
</table>
<br><center>
<input name="ST1" type="hidden" value="<%=request("ST")%>">
<input type="submit" name="Submit" value="购 买" class="button">
<input type="submit" name="bnCancel" value="取消" class="button">
</center>
</form>
</td>
</tr>
</table>
<%
Rs.Close
Cn.Close
Set Rs1=nothing
Set Rs2=nothing
Set Cn=nothing
Call PrintPageBottom
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -