saveusersetup.asp

蓝芒3.0A最新所有功能完整破解版

<!--#include file="passinc.asp" -->

<%
dim ei
set ei = server.createobject("easymail.UserMessages")
'-----------------------------------------
ei.Load Session("wem")


if trim(request("checkauto")) <> "" then
	ei.UseAutoReply = true
else
	ei.UseAutoReply = false
end if


if trim(request("checkautoforward")) <> "" then
	ei.UseAutoForward = true
else
	ei.UseAutoForward = false
end if

if trim(request("checklocalsave")) <> "" then
	ei.LocalSave = true
else
	ei.LocalSave = false
end if

ei.AutoForwardTo = trim(request("AutoForwardTo"))



ei.AutoReplySubject = trim(request("subject"))
ei.AutoReplyText = trim(request("text"))


ei.Save

set ei = nothing


response.redirect "ok.asp?" & getGRSN() & "&gourl=showusersetup.asp"
%>