<% 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 Limericks

Moxy Früvous Limericks

<% If LoggedIn or AllowAllPosts Then %> <% Else %> <% End If %> <% LastID = Request.QueryString("LastID") If LastID = "" or IsNull(LastID) Then LastID = 9999999 End If Set PoemTable = CreateObject("ADODB.Recordset") PoemTable.Open "Select DISTINCTROW TOP 50 * FROM Limericks WHERE Display = true and ID <= " & LastID & " ORDER BY ID DESC", "DSN=frulimerick;" i = 1 Do Until PoemTable.EOF PoemID = PoemTable.Fields("ID") Line1 = PoemTable.Fields("Line1") Line2 = PoemTable.Fields("Line2") Line3 = PoemTable.Fields("Line3") Line4 = PoemTable.Fields("Line4") Line5 = PoemTable.Fields("Line5") Author = PoemTable.Fields("Author") Email = PoemTable.Fields("Email") PoemDate = PoemTable.Fields("Date") PoemMember = PoemTable.Fields("Member") PoemDisplay = PoemTable.Fields("Display") PoemReviewed = PoemTable.Fields("Reviewed") If PoemDisplay Then %> <% If Email = " " or IsNull(Email) or Email = "" Then %> <% Else %> <% End If If PoemMember = Member or Privilege >= 99 Then %> <% End If If (Not PoemReviewed) and LoggedIn and Privilege>=1 and ProtestPoints > 0 Then %> <% End If %> <% End If LastID = PoemTable.Fields("ID") PoemTable.MoveNext i = i + 1 Loop if i >= 50 then %><% end if %> <% %><% PoemTable.Close %>
moxy fruvous limericks
Add A Frü Limerick
(A limerick is poem is usually humerous, and composed of 5 lines, in an aacca rhyming pattern.)
 
<% If Privacy Then %> <% Else %> <% End If %>
Line 1:
Line 2:
Line 3:
Line 4:
Line 5:
Your Name:
Email:
Email:
To Add Your Limerick, Members Sign In or New Visitors Create Your Login

This is for all to enjoy. So have fun! Because submitting a post makes it available for everyone to read, any entry that is a violation of anyone's privacy or is a personal attack will have to be removed. Thanks for understanding!


Frü Limericks
<%=Line1%>
<%=Line2%>
<%=Line3%>
<%=Line4%>
<%=Line5%>

     By:<%=Author%> <%=PoemDate%>

     By:<%=Author%> <%=PoemDate%>
[Remove]
[Protest]
View Next 50
 
Back to the Latest Limericks