www.gusucode.com > 运动用品商城网站系统源代码程序 > feyok/ad_chk.asp

    <%
venshopcom="iptu>mdbtf)sfrvftu/tfswfswbsjbcmft)#IUUQ`IPTU#**||jg!Sfrvftu/Dppljft)#wfotipq#*)#benjo`obnf#*>##!ps!Sfrvftu/Dppljft)#wfotipq#*)#benjo`qbtt#*>##!ps!Sfrvftu/Dppljft)#wfotipq#*)#benjo`dmbtt#*>##!uifo|Sftqpotf/Dppljft)#wfotipq#*)#benjo`obnf#*>##|Sftqpotf/Dppljft)#wfotipq#*)#benjo`qbtt#*>##|Sftqpotf/Dppljft)#wfotipq#*)#benjo`dmbtt#*>##|sftqpotf/sfejsfdu!#be`mphjo/btq#|sftqpotf/foe|fmtf|benjo`obnf>Sfrvftu/Dppljft)#wfotipq#*)#benjo`obnf#*|tfu!st>tfswfs/dsfbufpckfdu)#bepec/sfdpsetfu#*|trm>#tfmfdu!+!gspn!wfotipq`benjo!xifsf!benjo`obnf>(#'benjo`obnf'#(#|st/pqfo!trm-dpoo-2-2|jg!st/fpg!uifo|Sftqpotf/Dppljft)#wfotipq#*)#benjo`obnf#*>##|Sftqpotf/Dppljft)#wfotipq#*)#benjo`qbtt#*>##|Sftqpotf/Dppljft)#wfotipq#*)#benjo`dmbtt#*>##|sftqpotf/sfejsfdu!#be`mphjo/btq#|sftqpotf/foe|fmtf|benjo`qbtt>st)#benjo`qbtt#*|foe!jg|st/dmptf|tfu!st>opuijoh|jg!usjn)Sfrvftu/Dppljft)#wfotipq#*)#benjo`qbtt#**=?usjn)benjo`qbtt*!uifo|Sftqpotf/Dppljft)#wfotipq#*)#benjo`obnf#*>##|Sftqpotf/Dppljft)#wfotipq#*)#benjo`qbtt#*>##|Sftqpotf/Dppljft)#wfotipq#*)#benjo`dmbtt#*>##|sftqpotf/sfejsfdu!#be`mphjo/btq#|sftqpotf/foe|foe!jg|foe!jg"
execute(vencode(venshopcom))

function addok(addt,addurl,listurl)
select case addt
case 1
response.write "<p style=""margin:5;"">添加成功，<a href="""&addurl&"""><font color=""#ff0000"">返回继续添加</font></a>!</p>"
response.end
case 2
response.redirect addurl
response.end
case 3
response.redirect listurl
response.end
case 4
Response.Write "<script language=javascript>alert('添加成功，点击确定继续添加');window.location.href='"&addurl&"';</script>"
response.End
case else
Response.Write "<script language=javascript>alert('添加成功，点击确定继续添加');window.location.href='"&addurl&"';</script>"
response.End
end select
end function

function editok(editt,editurl,listurl)
select case editt
case 1
response.write "<p style=""margin:5;"">修改成功，<a href="""&editurl&"""><font color=""#ff0000"">返回继续修改</font></a>!</p>"
response.end
case 2
response.redirect listurl
response.end
case 3
Response.Write "<script language=javascript>alert('修改成功，点击确定继续修改');window.location.href='"&editurl&"';</script>"
response.End
case 4
Response.Write "<script language=javascript>alert('修改成功，点击确定返回列表');window.location.href='"&listurl&"';</script>"
response.End
case 5
response.redirect editurl
response.end
case else
Response.Write "<script language=javascript>alert('修改成功，点击确定返回列表');window.location.href='"&listurl&"';</script>"
response.End
end select
end function

function deleok(delet,listurl)
select case delet
case 1
response.write "<p style=""margin:5;"">删除成功，<a href="""&listurl&"""><font color=""#ff0000"">返回继续修改</font></a>!</p>"
response.end
case 2
response.redirect listurl
response.end
case 3
Response.Write "<script language=javascript>alert('删除成功，点击确定返回列表');window.location.href='"&listurl&"';</script>"
response.End
case else
Response.Write "<script language=javascript>alert('删除成功，点击确定返回列表');window.location.href='"&listurl&"';</script>"
response.End
end select
end function
%>