www.gusucode.com > 掌柜网店购物系统 4.0码程序 > admin/saveviphd.asp
<%@ 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 "<p align=center><font color=red>您没有此项目管理权限!</font></p>" 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") aa= mid(aa,1,len(aa)-19) '19=admin/saveviphd.asp content=replace(content,aa,"") session("content")=content set rs=server.CreateObject("adodb.recordset") rs.Open "select viphd from shop_config",conn,1,3 rs("viphd")=content rs.Update session("content")="" response.Write "<script language=javascript>alert('VIP活动页面修改成功');window.location.href='viphd.asp';</script>" response.End %>