请各位版主，高手给看下ASp网站为题
http://down.这个怎么不能发布信息呢，填写完成点击发布就是空白
填写的是这个
<!--#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>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=title%>-我要发布信息</title>
<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.biaoti.value.length<3)
{
alert("信息标题没有填写或内容太少!");
document.myform.biaoti.focus();
document.myform.biaoti.select();
return false;
}
if(document.myform.memo.value.length<3)
{
alert("信息内容没有填写或内容太少!");
document.myform.memo.focus();
document.myform.memo.select();
return false;
}
if(document.myform.name.value.length<1)
{
alert("联系人姓名没有填写!");
document.myform.name.focus();
document.myform.name.select();
return false;
}
if(document.myform.dianhua.value.length<1)
{
alert("联系电话没有填写!");
document.myform.dianhua.focus();
document.myform.dianhua.select();
return false;
}
if(document.myform.yzm.value.length<1)
{
alert("验证码没有填写!");
document.myform.yzm.focus();
document.myform.yzm.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.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<1)
{
alert("联系人姓名没有填写!");
document.myform1.name.focus();
document.myform1.name.select();
return false;
}
if(document.myform1.dianhua.value.length<1)
{
alert("联系电话没有填写!");
document.myform1.dianhua.focus();
document.myform1.dianhua.select();
return false;
}
if(document.myform1.yzm.value.length<1)
{
alert("验证码没有填写!");
document.myform1.yzm.focus();
document.myform1.yzm.select();
return false;
}
}
//-->
</SCRIPT>
</head>
<body topmargin="0">
<div align="center"><%call t()%><DIV class=h></DIV>
<table width="760" id="table1" bgcolor="#FFFFFF" style="padding:1px; " cellspacing="0" cellpadding="0">
<tr>
<td width="978" colspan="3"></td>
</tr>
<tr>
<td width="978" colspan="3"></td>
</tr>
<tr>
<td width="70%" class="td">
<%if request("cnmai")="free" then%>
<form action="axxchk.asp" name="myform" method="POST" style="line-height: 100%; margin-top: 0; margin-bottom: 0">
<div align="center">
<table width="100%" border="0" bordercolor="#FFFFFF" cellpadding="0" style="border-collapse: collapse">
<tr>
<td class=td1 colspan="2"> 位置导航：<a href="/">首页</a>→游客快速发布</td>
</tr>
<tr>
<td align="center" class=tdh rowspan="17" width="13%"> </td>
<td>
</td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 50px">信息版块：<%
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: 50px">信息标题：<%call leixs()%><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: 50px">信息地区：<%call dix()%></td></tr>
<tr>
<td height="26" width="87%" class="tdx"><p style="margin-left: 50px">详细说明：<textarea rows="5" name="memo" cols="39"></textarea><font color="#FF0000">*</font></td></tr>
<tr>
<td height="26" width="87%" class="tdx"><p style="margin-left: 50px">图片地址：<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: 50px"> 联系人：<input type="text" name="name" size="15" maxlength="20"><font color="#FF0000">*</font></td></tr>
<tr>
<td height="26" width="87%" class="tdx"><p style="margin-left: 50px">联系电话：<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: 50px"> Email：<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 type="text" name="qq" size="12" maxlength="10"></td>
</tr>
<tr><td height="26" width="87%" class="tdx"><p style="margin-left: 50px">联系地址：<input type="text" name="dizhi" size="40" maxlength="20"></td>
</tr>
<tr><td height="26" width="87%" class="tdx">
<p style="margin-left: 50px">发布天数：<font face="宋体" size="2"><select name="days" size="1">
<option value="1">一天</option>
<option value="7" selected>一周</option>
<option value="15">半个月</option>
</select></td>
</tr>
<tr><td height="26" width="87%" class="tdx">
<p style="margin-left: 50px">验 证 码：<input type=text name=yzm size=9> 请将<img src=yzm.asp title="看不清请刷新页面" border=0>输入框中</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 type="submit" onclick="javascript:return CheckForm();" value="写好了，提交信息" name="B1"> <input type="reset" value="重写" name="B2"></td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</div>
</form>
<%else%>
<form action="axxchk.asp" name="myform1" method="POST" style="line-height: 100%; margin-top: 0; margin-bottom: 0">
<div align="center">
<table width="100%" border="0" bordercolor="#FFFFFF" cellpadding="0" style="border-collapse: collapse">
<tr>
<td class=td1 colspan="2"> 位置导航：<a href="/">首页</a>→会员发布信息</td>
</tr>
<tr>
<td class=tdh align="center" rowspan="16" width="13%"> </td>
<td width="87%">
</td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 50px">信息版块：<%
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: 50px">信息标题：<%call leixs()%><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>
</select>
<%else%> <font color="#999999">没有变色道具,请[兑换道具]吧</font>
<%end if%></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 50px">信息地区：<%call dix()%></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 50px">信息内容：<textarea rows="9" name="memo" cols="44"></textarea>
<font color="#FF0000">*</font></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
图片链接地址：<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: 50px">
<iframe name="I1" frameborder="0" width="71%" height="30" scrolling="no" src="uploadxinxi.asp"></iframe></td>
</tr>
<tr>
<td height="26" width="87%" class="tdx">
<p style="margin-left: 50px"> 联系人：<input type="text" name="name" size="13" maxlength="20" value="<%=rs("name")%>">
<%if request.cookies("cnmai")("com")<>"" then%>－<input type="hidden" name="comper" value="com"><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: 50px">联系电话：<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: 50px"> Email：<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 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: 50px">联系地址：<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: 50px">发布天数：<select name="days" size="1">
<option value="1">一天</option>
<option value="3">三天</option>
<option value="7" selected>一周</option>
<option value="15">半个月</option>
<option value="30">一个月</option>
<option value="90">三个月</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: 50px">验证通过：<%if rs("d")>0 then%><input type="hidden" value="1" name="d" checked title="选中发布信息直接在页面显示，使用需要花1个[验证道具]">直接通过<%else%></font><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: 50px">是否推荐：<%if request.cookies("cnmai")("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: 50px">验 证 码：<input type=text name=yzm size=9> 请将<img src=yzm.asp title="看不清请刷新页面" border=0>输入框中</td>
</tr>
<tr>
<td height="40" width="87%">
<p align="center">
<input type="submit" onclick="javascript:return CheckForm1();" value="写好了，提交信息" name="B1"> <input type="reset" value="重写" name="B2"></td>
</tr>
</table>
</div>
</form>
<%
rs.close
set rs=nothing
closedb
end if
%></td>
<td valign="top" width="2%">
<img border="0" src="image/ax.gif" width="25" height="257"></td>
<td valign="top" width="25%" class="td">
</td>
</tr>
</table>
<!--#include file="foot.asp"-->
</div>
</body>
</html>
<%
else
response.redirect "login.asp"
end if %>
-------------------------------------------
点击提交后去这里
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/inc.asp"-->
<%
if session("addxinxi")<>"" then
if DateDiff("s",session("addxinxi"),Now())<30 then
Response.Write "<script language='javascript'>alert('系统保护：你提交数据太快，系统中止运行，请等待30秒钟！');history.back();</script>"
response.end
end if
end if
dim CheckCode
CheckCode=LCase(trim(Request.Form("yzm")))
if CheckCode<>LCase(CStr(Session("pSN"))) then
response.Write "<script language='javascript'>alert('验证码不正确！);history.back();</script>"
response.end
end if
username=request.cookies("cnmai")("username")
class1=trim(request("class1"))
class2=trim(request("class2"))
biaoti=CheckStr(trim(request("biaoti")))
sdays=trim(request("days"))
if right(request("tupian"),4)=".gif" or right(request("tupian"),4)=".bmp" or right(request("tupian"),4)=".jpg" or right(request("tupian"),5)=".jpeg" or request("tupian")="" then
else
Response.Write "<script language='javascript'>alert('请正确填写图片地址！');history.back();</script>"
response.end
end if
if username<>"" then
set rs=server.createobject("adodb.recordset")
if request("comper")="com" then
sql = "select * from [com] where username='"&username&"'"
else
sql = "select * from [user] where username='"&username&"'"
end if
rs.open sql,conn,1,3
rs("jf")=rs("jf")+jf_3
if len(request("a"))=6 and rs("a")>=1 then
rs("a")=rs("a")-1
end if
if request("b")>=1 and rs("b")>=1 then
rs("b")=rs("b")-int(request("b"))
end if
if request("tupian")<>"" and rs("c")>=1 then
rs("c")=rs("c")-1
end if
if request("d")="1"then
rs("d")=rs("d")-1
else
rs("d")=0
end if
rs.update
rs.close
set rs=nothing
end if
set rs=server.createobject("adodb.recordset")
sql = "select * from xinxi"
rs.open sql,conn,1,3
rs.addnew
rs("username")=username
rs("class1")=class1
rs("class2")=class2
rs("leixing")=request("leixing")
rs("biaoti")=biaoti
if request("dd")="1" then
'rs("zk")=request("zk")
end if
rs("diqu")=trim(request("diqu"))
'rs("jiage")=CheckStr(trim(request("jiage")))
rs("memo")=CheckStr(trim(request("memo")))
rs("name")=CheckStr(trim(request("name")))
rs("dianhua")=CheckStr(trim(request("dianhua")))
rs("email")=CheckStr(trim(request("email")))
rs("qq")=CheckStr(trim(request("qq")))
rs("dizhi")=CheckStr(trim(request("dizhi")))
if request("tupian")="" then
rs("tupian")=0
else
rs("tupian")=CheckStr(trim(request("tupian")))
end if
if username<>"" then
rs("com")=CheckStr(trim(request("com")))
rs("a")=request("a")
rs("b")=request("b")
rs("yz")=request("d")
rs("tuijian")=request("tui")
end if
rs("fbsj")=now()
rs("dqsj")= dateadd("d", sdays, now)
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip="" Then
userip=Request.ServerVariables("REMOTE_ADDR")
end if
rs("ip")=userip
rs.update
session("addxinxi")=now()
id=rs("id")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
if username<>"" then
''''''''''''''''''生成html开始''''''''''''''''''''''''''
ServerURL=CStr(Request.ServerVariables("SCRIPT_NAME"))
n=InStrRev(ServerURL,"/") '从右边第一个字符起查找"_"的位置,n为返回值
ServerURL=left(ServerURL, n)'显示从左边数第"n"个字符前面的字符,
ServerURL="http://"&Request.ServerVariables("SERVER_NAME")&""&ServerURL&"x.asp?cnmai="&id&""
Set Mail1 = Server.CreateObject("CDO.Message")
Mail1.CreateMHTMLBody ServerURL,31
AA=Mail1.HTMLBody
Set Mail1 = Nothing
set objfso = Server.CreateObject("Scripting.FileSystemObject")
set htmout = objfso.CreateTextFile(server.mappath("html/"&id&".htm"))
AA=replace(AA,"uptupian/","../uptupian/")
AA=replace(AA,"img/","../img/")
AA=replace(AA,"link.asp","../link.asp")
AA=replace(AA,"links.asp","../links.asp")
AA=replace(AA,"index.asp","../index.asp")
AA=replace(AA,"te.asp","../te.asp")
AA=replace(AA,"foot.asp","../foot.asp")
AA=replace(AA,"foot.asp","../foot.asp")
AA=replace(AA,"user.asp","../user.asp")
AA=replace(AA,"x_hf.asp","../x_hf.asp")
AA=replace(AA,"reg.asp","../reg.asp")
AA=replace(AA,"login.asp","../login.asp")
AA=replace(AA,"axx.asp","../axx.asp")
AA=replace(AA,"com_e_x.asp","../com_e_x.asp")
AA=replace(AA,"x.asp","../x.asp")
AA=replace(AA,"html/","")
AA=replace(AA,"ab_book.asp","../ab_book.asp")
AA=replace(AA,"ab_ads.asp","../ab_ads.asp")
AA=replace(AA,"ab_about.asp","../ab_about.asp")
AA=replace(AA,"ab_help.asp","../ab_help.asp")
htmout.write replace(AA,"image/","../image/")
htmout.close
set htmout=nothing
set objfso=nothing
''''''''''''''''''生成html结束''''''''''''''''''''''''''
Response.Write "<script language='javascript'>alert('您的信息发布成功了');</script>"
else
''''''''''''''''''生成html开始''''''''''''''''''''''''''
ServerURL=CStr(Request.ServerVariables("SCRIPT_NAME"))
n=InStrRev(ServerURL,"/") '从右边第一个字符起查找"_"的位置,n为返回值
ServerURL=left(ServerURL, n)'显示从左边数第"n"个字符前面的字符,
ServerURL="http://"&Request.ServerVariables("SERVER_NAME")&""&ServerURL&"x.asp?cnmai="&id&""
Set Mail1 = Server.CreateObject("CDO.Message")
Mail1.CreateMHTMLBody ServerURL,31
AA=Mail1.HTMLBody
Set Mail1 = Nothing
set objfso = Server.CreateObject("Scripting.FileSystemObject")
set htmout = objfso.CreateTextFile(server.mappath("html/"&id&".htm"))
AA=replace(AA,"uptupian/","../uptupian/")
AA=replace(AA,"link.asp","../link.asp")
AA=replace(AA,"links.asp","../links.asp")
AA=replace(AA,"index.asp","../index.asp")
AA=replace(AA,"user.asp","../user.asp")
AA=replace(AA,"reg.asp","../reg.asp")
AA=replace(AA,"login.asp","../login.asp")
AA=replace(AA,"axx.asp","../axx.asp")
AA=replace(AA,"com_e_x.asp","../com_e_x.asp")
AA=replace(AA,"x.asp","../x.asp")
AA=replace(AA,"html/","")
AA=replace(AA,"ab_book.asp","../ab_book.asp")
AA=replace(AA,"ab_ads.asp","../ab_ads.asp")
AA=replace(AA,"ab_about.asp","../ab_about.asp")
AA=replace(AA,"ab_help.asp","../ab_help.asp")
htmout.write replace(AA,"image/","../image/")
htmout.close
set htmout=nothing
set objfso=nothing
''''''''''''''''''生成html结束''''''''''''''''''''''''''
Response.Write "<script language='javascript'>alert('(游客)您的信息发布成功了,我们将在24小时内审核通过');</script>"
end if
response.write "<meta http-equiv=refresh content=""1;URL=index.asp"">"
response.end
%>