www.gusucode.com > 全球营销软件站整站源码4月最新数据 4.0源码程序 > 801wyxqf\8\removecache.asp
<!--#include file="config.asp"--> <% Dim Rs,p p = NewAsp.CheckInput(Request("p"),2) Set Rs = NewAsp.Execute("SELECT * FROM [NC_Admin] WHERE isLock=0 And password='" & NewAsp.Checkstr(p) & "'") If Not (Rs.BOF And Rs.EOF) Then Application.Contents.RemoveAll Response.Write "<script>alert('更新缓存成功!');</script>" End If Set Rs = Nothing NewAsp.PageEnd() %>