www.gusucode.com > 超文本多用户论坛程序 1.1 > bbs/xgaddsave.asp
<!--#include file="conn.asp"--> <!--#include file="gyhs.asp"--> <head> <title><%=request.cookies("mc")%></title> <meta name="keywords" content="<%=request.cookies("gjz")%>"> </head> <body topmargin=0> <!--#include file="gyym.asp"--> <% wbfz menu=request("menu") id=request("id") %> <% Dim sContent1, i For i = 1 To Request.Form("47").Count sContent1 = sContent1 & Request.Form("47")(i) Next %> <% sContent1=Replace(sContent1,"'","''") sContent1=Replace(sContent1,"""","") %> <% if menu="tz" then sql="update zwtizi set cncount='"&sContent1&"' where id="&id&" and ltbh='"<bh&"'" conn.execute(sql) end if if menu="htz" then sql="update zwhtz set htcount='"&sContent1&"' where id="&id&" and ltbh='"<bh&"'" conn.execute(sql) end if %> <table class="a2" cellSpacing="1" cellPadding="4" width="97%" align="center" border="0"> <tr class="a3"> <td height="25"> <img src="imgs/Forum_nav.gif" width="9" height="9"> <a href="index.asp?ltbh=<%=ltbh%>"><%=request.cookies("mc")%></a> >> 帖子修改成功 </td> </tr> </table> </p> <SCRIPT>valigntop()</SCRIPT> <table class="a2" cellSpacing="0" cellPadding="0" width="97%" align="center" border="0"> <tr> <td height="106"> <table cellSpacing="1" cellPadding="6" width="100%" border="0"> <tr> <td class="a1" align="middle" width="100%" height="20"><b>论坛提示信息</b></td> </tr> <tr bgColor="#ffffff"> <td vAlign="top" align="left" height="122"><b> </b> <table cellSpacing="0" cellPadding="5" width="100%" border="0"> <tr> <td width="83%"><ul> <li>帖子修改成功 </li> <li><a href="index.asp?ltbh=<%=ltbh%>"> 返回论坛首页</a> </li> </ul> </td> <td width="17%"> <img height="97" src="imgs/succ.gif" width="95"></td> </tr> </table> </td> </tr> </table> </td> </tr> </table> <SCRIPT>valignbottom()</SCRIPT> </p> <% call bq dbjl.close set dbjl=nothing %> <%dbclose%>