% Response.Buffer = TRUE %>
<%
playground_GetMemberInfo MemberID, Member, ScreenName, EMail, Privacy, Block, Privilege, ProtestPoints
If MemberID <> 0 Then
LoggedIn = true
End If
playground_GetAdminOptions SiteAvailable, AllowAllPosts, ModeratorPrivs, ProtestPointsMax
if Not SiteAvailable then
Response.Redirect("playgroundNotAvailable.asp")
end if
%>
Moxy Früvous Playground Protest
Protest
|
|
|
<%
TableName = Request.QueryString("Obj")
DbName = Request.QueryString("DSN")
ID = Request.QueryString("ID")
Set ATable = CreateObject("ADODB.Recordset")
ATable.Open "Select * From " & TableName & " WHERE ID=" & ID, "DSN=" & DBName & ";"
If Not ATable.EOF Then
Reviewed = ATable.Fields("Reviewed")
Else
NotFound = true
End If
ATable.Close
If Reviewed or NotFound Then
%>
This entry can't be protested because it has already been reviewed or it can't be found.
<%
Else
%>
Protest an Entry
You current have <%=ProtestPoints%> Moderator Point(s).
Only submit this form if the entry is inappropriate for this site and does not follow the guidelines established for our community, such as:
- spam, flames, or personal attacks
- private information that should not be public
- inappropriate, non-Fruvous topics
The protest process is:
1. You lose 1 point for each protest you submit.
1. Any entry receiving <%=ProtestPointsMax%> protests will be removed from the site.
2. All protests will be reviewed by the community moderators.
3. If the protests are upheld, the entry will remain removed or changed.
4. If the protests are overturned, the entry will be posted back to the site.
<%
End If
%>
|