post_artsave.asp

都市星空BBS系统 v1.1(SQL)

<%
'==============================================================================
'软件名称：星空社区 VER 1.0.15
'当前版本：starcity club V1.0.15
'最新更新：2004.9
'==============================================================================
'Copyright (C) 2002-2004 Googln.com  All rights reserved.
'商业注册联系：010-64410364
'技术支持QQ：6370639(限商业用户) 
'程序开发：Googln Studio(BeiJing)
'Email:[e-mail]
'论坛支持：星空社区(http://www.starcity.cn/bbs)
'官方网站：www.Googln.com  演示站点：www.starcity.cn/bbs  都市星空：www.starcity.cn 阳光商城:www.sunmall.com.cn
'==============================================================================
'免费版本请在首页保留版权信息，并做上本站LOGO友情连接
'都市星空在线保留此程序的法律追究权利
'==============================================================================
%>
<!--#include file="include/conn.asp"-->
<!-- #include file="inc.asp" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
if session("id")="" or isempty(session("id")) then
	show_error("您不是本站会员，或者登录超时，请重新登录")
end if

boardid=trim(request("boardid"))
pic=trim(request("pic"))
title=trim(request("title"))
content=trim(request("content"))

if boardid="" or pic="" or title="" or content="" then
	show_error("请输入完全！")
end if

if mailmsg="" then mailmsg=0

'不能重复发布
set rs=server.createobject("adodb.recordset")
sqltext="select boardid,rootid,pic,title,author from db_bbs where boardid=" & boardid & " and rootid=0 and pic='"&pic&"' and title='"&title&"' and author='"&session("memberno")&"'"

rs.open sqltext,conn,1,3
if not rs.eof then
	show_error("请不要重复发布相同的主题!")
end if
rs.close

'新增回复
sql="select * from db_bbs"
rs.open sql,conn,1,3
rs.addnew
rs("boardid")=boardid
rs("title")=title
rs("content")=content
rs("pic")=pic
rs("author")=session("username")
rs.update
rs.close
sql="update db_user set integral=integral+5 where username='"&session("username")&"'" 
conn.execute sql
sqlcount="update db_user set TopicCount=TopicCount+1 where username='"&session("username")&"'"
conn.execute sqlcount
%>
<script language=Javascript>
<!--
alert("帖子发表成功！");
window.location="read_art_sub.asp?boardid=<%=Request("boardid")%>"
-->
</script>