<% If Not session("admin_loggedin" & strSUnique) = Session.SessionID then Response.Redirect "default.asp" If Not isEvents then Response.Write "
Events Log is disabled. Enable it in Admin Preferences" Else If lcase(Request.ServerVariables("REQUEST_METHOD")) = "post" then For I = 1 to 20 If Len(CStr(Request.Form("C" & I))) > 0 Then strSetEvents = strSetEvents & " " & Request.Form("C" & I) Next strSetEvents = Trim(strSetEvents) objConn.Execute("UPDATE " & tablPfx & "Main SET events = '" & strSetEvents & "';") Application("Events_Config" & strUnique) = Empty Response.Redirect "admin_econfig.asp" End If %>
Enable/Disable Logging Individual Events
type="checkbox" name="C1" value=1>- New Ads Posted type="checkbox" name="C6" value=6>- User Modified type="checkbox" name="C11" value=11>- Friend Form Used type="checkbox" name="C16" value=16>- Custom Event 1
type="checkbox" name="C2" value=2>- Ads Modified type="checkbox" name="C7" value=7>- User Activated type="checkbox" name="C12" value=12>- User Logged On type="checkbox" name="C17" value=17>- Custom Event 2
type="checkbox" name="C3" value=3>- Ads Expired type="checkbox" name="C8" value=8>- User Suspended type="checkbox" name="C13" value=13>- User Denied Logon type="checkbox" name="C18" value=18>- Custom Event 3
type="checkbox" name="C4" value=4>- Ads Deleted type="checkbox" name="C9" value=9>- User Deleted type="checkbox" name="C14" value=14>- Admin Logged On type="checkbox" name="C19" value=19>- Custom Event 4
type="checkbox" name="C5" value=5>- User Created type="checkbox" name="C10" value=10>- Admin Contacted type="checkbox" name="C15" value=15>- Admin Denied Logon type="checkbox" name="C20" value=20>- Custom Event 5


Note: For creating a Custom event see Admin Help manual.
On a site with heavy traffic select fewer number of events to log, as database will grow fast if every event is logged. Alternatively select a different events recycle period (default is 90 day). For changing recycle period see  "Events Log" page.
<% End If %>