<!--#include file="pysjzx_conn.asp"-->
<!--#include file="session.asp"-->
<%dim action,html
html=request("html")
action=request.QueryString("action")
Content=Request.Form("Content")
'将里面的链接换成本地链接
 aa="http://"&Request.ServerVariables("server_name")&Request.ServerVariables("path_info")
 'response.write aa&"<br>"
 'bb=request.servervariables("http_referer")
 'response.write aa&"<br>"
 'response.write bb&"<br>"
 'response.end
 'aa= mid(aa,1,len(aa)-12)
 aa= mid(aa,1,len(aa)-16)		'16=admin/savexx.asp
 'response.write aa&"<br>"
 'response.write bb&"<br>"
 'response.end
content=replace(content,aa,"")
session("content")=content
set rs=server.CreateObject("adodb.recordset")
select case action


'----------------修改关于我们----------------

case "about"
rs.Open "select about from help",conn,1,3
rs("about")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('关于我们修改成功');window.location.href='editxx.asp';</script>"
response.End


'----------------修改业务合作----------------

case "operation"
rs.Open "select operation from help",conn,1,3
rs("operation")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('业务合作修改成功');window.location.href='editxx.asp';</script>"
response.End


'----------------修改广告服务----------------

case "ad"
rs.Open "select ad from help",conn,1,3
rs("ad")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('广告服务修改成功');window.location.href='editxx.asp';</script>"
response.End


'----------------修改服务条款----------------

case "law"
rs.Open "select law from help",conn,1,3
rs("law")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('服务条款修改成功');window.location.href='editxx.asp';</script>"
response.End

'----------------修改客服中心----------------

case "service"
rs.Open "select service from help",conn,1,3
rs("service")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('客服中心修改成功');window.location.href='editxx.asp';</script>"
response.End

'----------------修改网站地图----------------

case "map"
rs.Open "select map from help",conn,1,3
rs("map")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('网站地图修改成功');window.location.href='editxx.asp';</script>"
response.End

'----------------升级为高级会员----------------

case "upgrade"
rs.Open "select upgrade from help",conn,1,3
rs("upgrade")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('升级为高级会员修改成功');window.location.href='editxx.asp';</script>"
response.End


'----------------汇款地址----------------

case "pay"
rs.Open "select pay from help",conn,1,3
rs("pay")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('汇款地址修改成功');window.location.href='editxx.asp';</script>"
response.End

'----------------注册会员条约----------------

case "ausgleich"
rs.Open "select ausgleich from help",conn,1,3
rs("ausgleich")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('注册会员条约修改成功');window.location.href='editxx.asp';</script>"
response.End


end select
%> 