<%
'' REFERER-RSS.ASP
'' Sean P. Nolan
'' http://www.yaywastaken.com/
''
'' This code is free for you to use as you see fit. Copy it, rewrite it,
'' run it yourself, whatever. But no warranties or guarantees either. Who
'' knows what the hell it does. Not me, that's for sure!
''
'' Get recent referers as RSS 0.91 feed. Params are:
''
'' site - name of requested site (as given to referer.asp)
'' url - url of requested site
'' maxitems - optional max on number of items to retrieve; default 10
'' qry - "recent" or "popular", defines which type of list to fetch
'' maxlen - optional; truncate TITLES to this length
'' maxwordlen - optional; breaks words in TITLE longer than this w/spaces
'' notitle - optional; display raw URLs instead of TITLE tags
'' daysago - optional; if qry is "popular" date range to search in days
''
%>
<!--#include file="referer-inc.asp" -->
<%
Dim g_knex
Response.ContentType = "text/xml"
If (Application("fucked") <> "") Then
Set g_knex = Nothing
Else
Set g_knex = GetDatabaseConnection
End If
Response.Write GetRefererRSS(g_knex)
%>