<%@ LANGUAGE = VBScript.Encode %>
<!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('網絡超時或您還沒有登陸！');window.location.href='login.asp';</script>"
response.End
else
if session("flag")>1 then
response.Write "<div align=center><font size=80 color=red><b>您沒有此項目管理權限！</b></font></div>"
response.End
end if
end if
%>
<%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 "huikuanfangshi"
rs.Open "select huikuanfangshi from shop_config",conn,1,3
rs("huikuanfangshi")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('付款方式修改成功');window.location.href='editxx.asp';</script>"
response.End
'//////////////////////////////
case "jiaoyitiaokuan"
rs.Open "select jiaoyitiaokuan from shop_config",conn,1,3
rs("jiaoyitiaokuan")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('交易條款修改成功');window.location.href='editxx.asp';</script>"
response.End
'//////////////////////////////
case "yunshushuoming"
rs.Open "select yunshushuoming from shop_config",conn,1,3
rs("yunshushuoming")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('運輸說明修改成功');window.location.href='editxx.asp';</script>"
response.End
'//////////////////////////////
case "gouwuliucheng"
rs.Open "select gouwuliucheng from shop_config",conn,1,3
rs("gouwuliucheng")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('購物流程修改成功');window.location.href='editxx.asp';</script>"
response.End
'//////////////////////////////
case "changjianwenti"
rs.Open "select changjianwenti from shop_config",conn,1,3
rs("changjianwenti")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('常見問題修改成功');window.location.href='editxx.asp';</script>"
response.End
'//////////////////////////////
case "baomi"
rs.Open "select baomi from shop_config",conn,1,3
rs("baomi")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('保密和安全修改成功');window.location.href='editxx.asp';</script>"
response.End
'//////////////////////////////
case "shouhoufuwu"
rs.Open "select shouhoufuwu from shop_config",conn,1,3
rs("shouhoufuwu")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('商品銷售和售后服務修改成功');window.location.href='editxx.asp';</script>"
response.End
'//////////////////////////////
case "shiyongfalv"
rs.Open "select shiyongfalv from shop_config",conn,1,3
rs("shiyongfalv")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('適用法律和版權聲明修改成功');window.location.href='editxx.asp';</script>"
response.End
'//////////////////////////////
case "regtiaoyue"
rs.Open "select regtiaoyue from shop_config",conn,1,3
rs("regtiaoyue")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('注冊條約修改成功');window.location.href='editxx.asp';</script>"
response.End
case "songhuofeiyong"
rs.Open "select songhuofeiyong from shop_config",conn,1,3
rs("songhuofeiyong")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('送貨方式及費率修改成功');window.location.href='editxx.asp';</script>"
response.End
case "gongzuoshijian"
rs.Open "select gongzuoshijian from shop_config",conn,1,3
rs("gongzuoshijian")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('我們的工作時間修改成功');window.location.href='editxx.asp';</script>"
response.End
case "jifen"
rs.Open "select jifen from shop_config",conn,1,3
rs("jifen")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('積分獎勵修改成功');window.location.href='editxx.asp';</script>"
response.End
case "vip"
rs.Open "select vip from shop_config",conn,1,3
rs("vip")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('VIP特惠修改成功');window.location.href='editxx.asp';</script>"
response.End
case "about"
rs.Open "select about from shop_config",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 "lxwm"
rs.Open "select lxwm from shop_config",conn,1,3
rs("lxwm")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('聯系我們修改成功');window.location.href='editxx.asp';</script>"
response.End
case "jtcg"
rs.Open "select jtcg from shop_config",conn,1,3
rs("jtcg")=content
rs.Update
session("content")=""
response.Write "<script language=javascript>alert('集團采購修改成功');window.location.href='editxx.asp';</script>"
response.End
end select
%>