?? adg_delete.asp
字號(hào):
<!--#include file="passinc.asp" -->
<%
dim id
id = trim(request("id"))
sc = trim(Request("sc"))
mdel = trim(Request("mdel"))
dim ads
set ads = server.createobject("easymail.Addresses")
ads.Load Session("wem")
if mdel = "1" then
themax = ads.GroupCount
i = 0
do while i < themax
cmdstr = trim(request("checkdel" & i))
if cmdstr <> "" then
ads.RemoveGroupByNickName cmdstr
end if
i = i + 1
loop
else
ads.RemoveGroupByIndex id
end if
ads.Save
set ads = nothing
response.redirect "adg_brow.asp?sc=" & sc & "&" & getGRSN()
%>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -