configsave.asp

☆☆网吧客户留言簿☆☆ 管理用户名和密码都是:admin 演示：http://www39.websamba.com/51rose/netbarbook/

<!--#include file="common.asp"-->
<%
  if Trim(session("mangflag"))="" or Trim(session("timeflag"))="" then
    Response.redirect("noadmto.asp")
  end if
%>
<%
  content=HtmlEncode(Request.form("ncont"))

  set rs=Server.CreateObject("ADODB.Recordset")
  sqlstr="select * from Config"

  rs.open sqlstr,conn,1,3
  if not rs.eof then
    rs("GB_Name")=Request.form("GBName")
    rs("Logo_IMG")=Request.form("LogoIMG")
    rs("CopyRight")=Request.form("CopyTXT")
    rs("Guest_Num")=Request.form("GNum")
    if request.Form("NewsV")=1 then
      rs("News_View")=1
	else
	  rs("News_View")=0
    end if
	if request.Form("ifNeedAuditing")=1 then
      rs("ifNeedAuditing")=1
	else
	  rs("ifNeedAuditing")=0
    end if
    if request.Form("ASkin")=1 then
      rs("AlterSkin")=1
	else
	  rs("AlterSkin")=0
    end if
	rs("News_Label")	= Request.form("NewsLabel")
	rs("SkinStr")		= Request.form("Skin")
	rs("Link_one")	 	= Request.Form("Link_one")
	rs("Link_two") 		= Request.Form("Link_two")
	rs("Link_three") 	= Request.Form("Link_three")
  rs.update
  end if
 
  rs.close
  set rs=nothing
  conn.close
  set conn=nothing
%>
<%	  
  Response.Write("<script language=javascript>alert('恭喜!数据以保存设置成功，稍候返回管理区！');location.href='manage.asp';</script>")

  'Response.redirect("config.asp")
  'Response.redirect("state.asp?state=guestsuc")
%>