www.gusucode.com > 盐城分类信息网asp源码程序 > axx.asp
<%
'***********************************
'本站由吉林信息网团队制作
'***********************************
'--------版权说明------------------
'吉林信息网官方网站：http://www.jl-e.com
'QQ:304133183
'***********************************
%><!--#include file="inc/conn.asp"-->
<!--#include file="inc/inc.asp"-->
<%
if request.cookies("cnmai")("username")<>"" or request.cookies("cnmai")("per")<>"" or request("cnmai")<>"" then
%>
<html>
<HEAD>
<title><%=title%>-我要发布信息</title>
<LINK href="images/at_news.css" type=text/css rel=stylesheet>
<SCRIPT LANGUAGE="JavaScript">
function textCounter(field, countfield, maxlimit)
{
if (field.value.length > maxlimit)
field.value = field.value.substring(0,maxlimit);
else
countfield.value = maxlimit - field.value.length;
}
</script>
<script>
function loadThreadFollow(t_id,b_id){
var targetImg =eval("document.all.followImg" + t_id);
var targetDiv =eval("document.all.follow" + t_id);
if ("object"==typeof(targetImg)){
if (targetDiv.style.display!='block'){
targetDiv.style.display="block";
}else{
targetDiv.style.display="none";
}
}
}
</script>
<SCRIPT language=javascript>
<!--
function CheckForm()
{
if(document.myform.class1.value.length<1)
{
alert("请选择一级分类!");
document.myform.class1.focus();
return false;
}
if(document.myform.class2.value.length<1)
{
alert("请选择二级分类!!");
document.myform.class2.focus();
return false;
}
if (document.myform.leixing.value.length<1)
{
alert("请选择信息类别！");
document.myform.leixing.focus();
return false;
}
if (document.myform.leixing.value.length>2)
{
alert("请把信息类别的字数控制在2以内！");
document.myform.leixing.focus();
return false;
}
if(document.myform.biaoti.value.length<3)
{
alert("信息标题没有填写或内容太少!");
document.myform.biaoti.focus();
document.myform.biaoti.select();
return false;
}
if (document.myform.memo.value.length<1)
{
alert("请您填写信息内容！");
document.myform.memo.focus();
return false;
}
if (document.myform.memo.value.length>1000)
{
alert("请把信息内容的字数控制在1000以内！");
document.myform.memo.focus();
document.myform.memo.select();
return false;
}
if (document.myform.name.value.length == 0) {
alert("请您填写联系人姓名！");
document.myform.name.focus();
return false;
}
var str="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ,./'[]{}`1234567890-=\~!@#$%^&*()_+|?><:";
var errorChar
errorChar = isCharsInBag(myform.name.value,str)
if (errorChar != "" )
{
alert('联系人姓名必须是中文！');
myform.name.focus();
return false;
}
function isCharsInBag (s, bag)
{
var i,c;
for (i = 0; i < s.length; i++)
{
c = s.charAt(i);//字符串s中的字符
if (bag.indexOf(c) > -1)
return c;
}
return "";
}
if(document.myform.name.value.length<2||document.myform.name.value.length>4){
alert("联系人姓名不能少于2字多于4字！");
document.myform.name.focus();
return false;
}
if(document.myform.dianhua.value.length<1)
{
alert("联系电话没有填写!");
document.myform.dianhua.focus();
document.myform.dianhua.select();
return false;
}
if(document.myform.email.value.length<1)
{
alert("电子邮箱没有填写!");
return false;
}
var filter=/^\s*([A-Za-z0-9_-]+(\.\w+)*@(\w+\.)+\w{2,3})\s*$/;
if (!filter.test(document.myform.email.value)) {
alert("邮件地址不正确,请重新填写！");
document.myform.email.focus();
document.myform.email.select();
return (false);
}
if(document.myform.dizhi.value.length<1)
{
alert("联系地址没有填写!");
document.myform.dizhi.focus();
return false;
}
if(document.myform.yzm.value.length<1)
{
alert("验证码没有填写!");
document.myform.CheckCode.focus();
document.myform.CheckCode.select();
return false;
}
}
//-->
</SCRIPT>
<SCRIPT language=javascript>
<!--
function CheckForm1()
{
if(document.myform1.class1.value.length<1)
{
alert("请选择一级分类!");
document.myform1.class1.focus();
return false;
}
if(document.myform1.class2.value.length<1)
{
alert("请选择二级分类!!");
document.myform1.class2.focus();
return false;
}
if (document.myform1.leixing.value.length<1)
{
alert("请选择信息类别！");
document.myform1.leixing.focus();
return false;
}
if (document.myform1.leixing.value.length>2)
{
alert("请把信息类别的字数控制在2以内！");
document.myform1.leixing.focus();
return false;
}
if(document.myform1.biaoti.value.length<3)
{
alert("信息标题没有填写或内容太少!");
document.myform1.biaoti.focus();
document.myform1.biaoti.select();
return false;
}
if(document.myform1.memo.value.length<3)
{
alert("信息内容没有填写或内容太少!");
document.myform1.memo.focus();
document.myform1.memo.select();
return false;
}
if (document.myform1.name.value.length == 0) {
alert("请您填写联系人姓名！");
document.myform1.name.focus();
return false;
}
var str="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ,./'[]{}`1234567890-=\~!@#$%^&*()_+|?><:";
var errorChar
errorChar = isCharsInBag(myform1.name.value,str)
if (errorChar != "" )
{
alert('联系人姓名必须是中文！');
myform1.name.focus();
return false;
}
function isCharsInBag (s, bag)
{
var i,c;
for (i = 0; i < s.length; i++)
{
c = s.charAt(i);//字符串s中的字符
if (bag.indexOf(c) > -1)
return c;
}
return "";
}
if(document.myform1.name.value.length<2||document.myform1.name.value.length>4){
alert("联系人姓名不能少于2字多于4字！");
document.myform1.name.focus();
return false;
}
if(document.myform1.dianhua.value.length<1)
{
alert("联系电话没有填写!");
document.myform1.dianhua.focus();
document.myform1.dianhua.select();
return false;
}
if(document.myform1.email.value.length<1)
{
alert("电子邮箱没有填写!");
return false;
}
var filter=/^\s*([A-Za-z0-9_-]+(\.\w+)*@(\w+\.)+\w{2,3})\s*$/;
if (!filter.test(document.myform.email.value)) {
alert("邮件地址不正确,请重新填写！");
document.myform.email.focus();
document.myform.email.select();
return (false);
}
if(document.myform1.yzm.value.length<1)
{
alert("验证码没有填写!");
document.myform1.CheckCode.focus();
document.myform1.CheckCode.select();
return false;
}
}
//-->
</SCRIPT>
</HEAD>
<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" marginwidth="0" marginheight="0">
<%call t()%>
<DIV id=content>
<DIV id=left>
<DIV class=leftborder>
<DIV class=ltitle><SPAN class=font> >> 服务协议</SPAN></DIV>
<DIV class=lcontent> <SPAN class=tableleft>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<p style="line-height: 150%; margin-top: 0; margin-bottom: 0">
<img border="0" src="image/x1.gif">请不要发布有害国家和他人形象的信息，造成后果我们将您的IP地址提供给公安部门。<p style="line-height: 150%; margin-top: 0; margin-bottom: 0">
<br>
<img border="0" src="image/x1.gif">请在指定的栏目内发布您的信息；请不要在标题加特殊字符；<font color="#FF0000">请不要重复发布信息，或同条信息同一天内连续发布。</font><p style="line-height: 150%; margin-top: 0; margin-bottom: 0">
<br>
<img border="0" src="image/x1.gif">请您认真审核您所发的帖子内容，不要发文不对题或已经有人发布过的帖子。转发帖子请注明来处。<p style="line-height: 150%; margin-top: 0; margin-bottom: 0">
<br>
<img border="0" src="image/x1.gif">与主题内容无关的回复或者“一字帖”，系统将会删除。<br>您发布的信息也许有人回复，请您常来关注!
</TBODY></TABLE></SPAN>
</DIV>
</DIV>
</DIV>
<!--left-->
<%if request("cnmai")="free" then%>
<DIV id=right>
<DIV class=navigation>
<table border="0" width="100%" id="table1" style="border-collapse: collapse">
<tr>
<td width="100%" colspan="0" class="td1" background="Images/menu_r.gif">
位置导航：<a href="/">首页</a>→游客免费发布信息</td>
</tr></table></DIV>
<DIV class=rightbody>
<DIV class=tags_calss>
<!--发布信息开始-->
<div align="center">
<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
maxLen = 1000;
function checkMaxInput(form) {
if (form.memo.value.length > maxLen)
form.remLen.value = 0;
else form.remLen.value = maxLen - form.memo.value.length;
}
// End -->
</SCRIPT>
<form action="axxchk.asp" name="myform" method="POST" style="line-height: 100%; margin-top: 0; margin-bottom: 0">
<div align="center">
<table width="99%" border="0" bordercolor="#FFFFFF" cellpadding="0" style="border-collapse: collapse">
<tr>
<td width="99%" align="center" class="tdx">
<span class=font1 style="height: 30; padding-top: 3px"><font size="4" color="#dd0066" face="黑体">[游客免费发布信息]</font></span>
</td>
</tr>
<tr>
<td height="26" width="90%" class="tdx">
<p style="margin-left: 150px">信息版块：<%
dim rsclass,sqlclass
username=request.cookies("cnmai")("username")
set rsclass=server.createobject("adodb.recordset")
sqlclass = "select * from class2 order by paixu desc"
rsclass.open sqlclass,conn,1,1
%><SCRIPT language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rsclass.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rsclass("class2"))%>","<%= trim(rsclass("class1"))%>","<%= trim(rsclass("id"))%>");
<%
count = count + 1
rsclass.movenext
loop
rsclass.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.myform.class2.length = 0;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.myform.class2.options[document.myform.class2.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</SCRIPT><%
sqlclass = "select * from class1 order by paixu desc"
rsclass.open sqlclass,conn,1,1
if rsclass.eof and rsclass.bof then
response.write "请先添加栏目。"
response.end
else
%><SELECT name="class1" onChange="changelocation(document.myform.class1.options[document.myform.class1.selectedIndex].value)" size="1">
<OPTION selected value=>分类</OPTION>
<%
do while not rsclass.eof
%><OPTION value="<%=trim(rsclass("id"))%>"><%=trim(left(rsclass("class1"),5))%></OPTION>
<%
rsclass.movenext
loop
end if
rsclass.close
%></SELECT>
<SELECT name="class2">
<OPTION selected value=>二级分类</OPTION>
</SELECT>
<font color="#FF0000" value="">*</font></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">信息标题：<%call leixs()%><input class=input type="text" maxlength="30" name="biaoti" size="40">
<font color="#FF0000">*</font></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">信息地区：<%call dix()%></td></tr>
<tr>
<td height="26" width="87%" class="tdx"><p style="margin-left: 150px">详细说明：<textarea rows="12" name="memo" class="regcss" cols="50" onKeyDown="checkMaxInput(this.form)" onKeyUp="checkMaxInput(this.form)"></textarea><br> <font color="#FF0000">*</font>
1000字以内 目前还可以写
<input class=input readonly type=text name=remLen size=4 maxlength=4 value="1000" style="border: 1 solid #888888"> 注册会员无字数限制
</td></tr>
<tr>
<td height="26" width="87%" class="tdx"><p style="margin-left: 150px">图片地址：<input class=input type="text" name="tupian" size="40"><br>
游客不能上传图片,<a href="reg.asp">我要注册成会员</a></td></tr>
<tr>
<td height="26" width="87%" class="tdx"><p style="margin-left: 150px"> 联系人：<input class=input type="text" name="name" size="15" maxlength="20"><font color="#FF0000">*</font>中文(2-4)</td>
</tr>
<tr>
<td height="26" width="87%" class="tdx"><p style="margin-left: 150px">联系电话：<input class=input type="text" name="dianhua" size="21" maxlength="40"><font color="#FF0000"> *</font>请使用数字</td>
</tr>
<tr>
<td height="26" width="87%" class="tdx"><p style="margin-left: 150px"> Email：<input class=input type="text" name="email" size="21" maxlength="40"><font color="#FF0000">*</font> QQ:<!--webbot bot="Validation" s-data-type="Number" s-number-separators="x." i-maximum-length="10" --><input class=input type="text" name="qq" size="12" maxlength="10"></td>
</tr>
<tr><td height="26" width="87%" class="tdx"><p style="margin-left: 150px">联系地址：<input class=input type="text" name="dizhi" size="40" maxlength="20"><font color="#FF0000"> *</font></td>
</tr>
<tr><td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">发布天数：<font face="宋体" size="2"><select name="days" size="1">
<option value="1">一天</option>
<option value="7">一周</option>
<option value="15" selected>半个月</option>
<option value="30">一个月</option>
</select></td>
</tr>
<tr><td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">验 证 码：<input class=input name="verifycode" type="text" size="14">
<img src="Code.asp"alt= "验证码,看不清楚?请点击刷新验证码" style="cursor : pointer;" onClick="this.src='Code.asp'" onKeyPress="if ((event.keyCode<48 &&event.keyCode!=13) || event.keyCode>57) event.returnValue=false">输入验证码,看不清楚?请点击图片刷新</td>
</tr>
<tr><td height="26" class="tdx" align="center">
<font face="宋体" size="2"><a href="reg.asp"> 注册用户可以使用4大道具,还可以推荐您的信息...</a></td>
</tr>
<tr>
<td height="44" width="87%">
<p align="center">
<input class="input2" type="submit" onClick="javascript:return CheckForm();" value="写好了，提交信息" name="B1"> <input class="input2" type="reset" value="重写" name="B2"></td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</div>
</form>
</div>
</DIV>
</DIV>
<!--底部-->
</td>
</tr>
</table>
</DIV>
<!--#include file="foot.asp"-->
<%else%>
<DIV id=right>
<DIV class=navigation>
<table border="0" width="100%" id="table1" style="border-collapse: collapse">
<tr>
<td width="100%" colspan="0" class="td1" background="Images/menu_r.gif">
位置导航：<a href="/">首页</a>→会员发布信息</td>
</tr></table></DIV>
<DIV class=rightbody>
<DIV class=tags_calss><form action="axxchk.asp" name="myform1" method="POST" style="line-height: 100%; margin-top: 0; margin-bottom: 0">
<div align="center">
<table width="99%" border="0" bordercolor="#FFFFFF" cellpadding="0" style="border-collapse: collapse">
<tr>
<td width="99%" align="center" class="tdx">
<span class=font1 style="height: 30; padding-top: 3px"><font size="4" color="#0066CC" face="黑体">[注册会员发布信息]</font></span>
</td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">信息版块：<%
username=request.cookies("cnmai")("username")
set rsclass=server.createobject("adodb.recordset")
sqlclass = "select * from class2 order by paixu desc"
rsclass.open sqlclass,conn,1,1
%><SCRIPT language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rsclass.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rsclass("class2"))%>","<%= trim(rsclass("class1"))%>","<%= trim(rsclass("id"))%>");
<%
count = count + 1
rsclass.movenext
loop
rsclass.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.myform1.class2.length = 0;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.myform1.class2.options[document.myform1.class2.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</SCRIPT><%
sqlclass = "select * from class1 order by paixu desc"
rsclass.open sqlclass,conn,1,1
if rsclass.eof and rsclass.bof then
response.write "请先添加栏目。"
response.end
else
%><SELECT name="class1" onChange="changelocation(document.myform1.class1.options[document.myform1.class1.selectedIndex].value)" size="1">
<OPTION selected value=>==分类==</OPTION>
<%do while not rsclass.eof
%><OPTION value="<%=trim(rsclass("id"))%>"><%=trim(mid(rsclass("class1"),1,5))%></OPTION>
<%
rsclass.movenext
loop
end if
rsclass.close
%></SELECT>
<SELECT name="class2">
<OPTION selected value=>==二级分类==</OPTION>
</SELECT>
<font color="#FF0000">*</font></td>
</tr>
<tr>
<%
set rs=server.createobject("adodb.recordset")
if request.cookies("cnmai")("com")<>"" then
sql = "select * from [com] where username='"&username&"'"
else
sql = "select * from [user] where username='"&username&"'"
end if
rs.open sql,conn,1,1
if rs.eof then
response.write "没有相关用户信息"
response.redirect "login.asp"
response.end
end if
%>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">信息标题：<%call leixs()%><input class=input type="text" maxlength="80" name="biaoti" size="31">
<font color="#FF0000">*</font><%if rs("a")>0 then%>
<select name="a">
<option style="COLOR: black" value="0" selected title="醒目您的信息，推荐使用[标题变色]需要花1个[变色道具]">鲜明标题</option>
<option style="background: #0000FF" value="0000FF"></option>
<option style="background: #330099" value="330099"></option>
<option style="background: #006600" value="006600"></option>
<option style="background: #ff33ff" value="ff33ff"></option>
<option style="background: #993366" value="993366"></option>
</select>
<%else%> <font color="#999999">没有变色道具,请[兑换道具]吧</font>
<%end if%></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">信息地区：<%call dix()%></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">信息内容：<textarea rows="12" name="memo" class="regcss" cols="50"></textarea>
<font color="#FF0000">*</font></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">图片链接地址：<input class=input type="text" name="tupian" size="32" id="tupian" maxlength="200"> <span id="followImg1" style="CURSOR: hand" title="选中上传店标图片" onClick="loadThreadFollow(1,5)">
无现成图片,</span><span id="followImg1" style="CURSOR: hand" onClick="loadThreadFollow(1,5)"><input type="checkbox" name="C3" value="ON"></span><span id="followImg1" style="CURSOR: hand" title="选中上传店标图片" onClick="loadThreadFollow(1,5)"><font color="#FF0000">上传图片</font></span></td>
</tr>
<tr style="display:none" id="follow1">
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">
<%if rs("c")>0 then%><iframe name="I1" frameborder="0" width="71%" height="30" scrolling="no" src="uploadxinxi.asp"></iframe><%else%>
没有图片上传道具，请[兑换道具]吧<%end if%>
</td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px"> 联系人：<input class=input type="text" name="name" size="13" maxlength="20" value="<%=rs("name")%>">
<%if request.cookies("cnmai")("com")<>"" then%>－<input class=input type="hidden" name="comper" value="com"><input class=input type="text" name="com" size="25" maxlength="20" value="<%=rs("com")%>"><%else%><%end if%><font color="#FF0000">*</font></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">联系电话：<input class=input type="text" name="dianhua" size="23" maxlength="40" value="<%=rs("dianhua")%>">
<font color="#FF0000">*</font>请使用数字</td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px"> Email：<input class=input type="text" name="email" size="23" maxlength="40" value="<%=rs("email")%>">
<font color="#FF0000">* </font>QQ:<!--webbot bot="Validation" s-data-type="Number" s-number-separators="x." i-maximum-length="10" --><input class=input type="text" name="qq" size="12" maxlength="10" value="<%=rs("QQ")%>"></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">联系地址：<input class=input type="text" name="dizhi" size="43" maxlength="20" value="<%=rs("dizhi")%>"></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">发布天数：<select name="days" size="1">
<option value="1">一天</option>
<option value="3">三天</option>
<option value="7">一周</option>
<option value="15">半个月</option>
<option value="30">一个月</option>
<option value="90" selected>三个月</option>
</select> 置顶排行：<%
b=rs("b")
%><%if b>0 then%><select name="b">
<option value="0">不使用</option>
<%for f=1 to b%>
<option value="<%=f%>"><%=f%></option>
<%next%>
</select>个
<img border="0" src="image/tj.gif" title="使您的信息排在最前，数字越大越靠前,使用需要花n个[置顶道具]" width="10" height="11">
<%else%> <font color="#999999">没有道具,请[兑换道具]吧</font>
<%end if%></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">验证通过：<%if rs("d")>0 then%><input class=input type="hidden" value="1" name="d" checked title="选中发布信息直接在页面显示，使用需要花1个[验证道具]">直接通过<%else%></font><input class=input type="hidden" value="0" name="d" checked><font color="#ACACAC">没有验证道具，请[兑换道具]吧</font><%end if%></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">是否推荐：<%if rs("vip")=1 then%><input type="radio" value="1" name="tui" title="选中推荐您的信息">推荐
<input type="radio" name="tui" value="0">不推荐<font color="#C0C0C0"><%else%></font><input type="radio" name="tui" value="0" checked><font color="#FF0000">您不是<a target="_blank" href="ab_help.asp">特约/VIP会员</a>，不能使用推荐，请联系我们推荐您的信息</font><%end if%></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 150px">验 证 码：<input class=input name="verifycode" type="text" size="14">
<img src="Code.asp"alt= "验证码,看不清楚?请点击刷新验证码" style="cursor : pointer;" onClick="this.src='Code.asp'" onKeyPress="if ((event.keyCode<48 &&event.keyCode!=13) || event.keyCode>57) event.returnValue=false"> 输入验证码,看不清楚?请点击图片刷新</td>
</tr>
<tr>
<td height="40" width="87%">
<p align="center">
<input class="input2" type="submit" onClick="javascript:return CheckForm1();" value="写好了，提交信息" name="B1"> <input class="input2" type="reset" value="重写" name="B2"></td>
</tr>
</table>
</div>
</form>
</div>
</DIV>
</DIV>
<!--底部-->
</td>
</tr>
</table>
<!--#include file="foot.asp"-->
<%
rs.close
set rs=nothing
closedb
end if
%>
</body>
</html>
<%
else
response.redirect "login.asp"
end if %><%
'***********************************
'本站由吉林信息网团队制作
'***********************************
'--------版权说明------------------
'吉林信息网官方网站：http://www.jl-e.com
'QQ:304133183
'***********************************
%>