bbs_add_save.asp

应用于高等院校党团思想教育

<%@ Language=VBScript %>
<!-- #include file = "../include/conn_bbs.asp" -->
<!-- #include file = "../include/conn_user.asp" -->
<%
str="Insert Into user(ctype,User,Name,Email,Subject,Comment,Password) Values('"
str=str & request("ctype") & "','"
str=str & request("user") & "','"
str=str & request("name") & "','"
str=str & request("email") & "','"
str=str & request("subject") & "','"
str=str & request("comment") & "','"
str=str & request("password") & "')"
Conn_BBS.execute(str)
Conn_User.execute("update user set cash=cash+100, Allure=Allure+50 where name='" & request("name") & "'")
%>
<script language="VBScript">
  msgbox "BBS 建立成功！",,"成功！"
  location.href="main.asp"
</script>