Request.ServerVariables hvorfor virker dette ikke?

Den udskriver ikke engang referer, hvor jeg springer til siden fra en anden href! Hvad er galt?

<%=Application("Request.ServerVariables('HTTP_REFERER') ")%>
<%
Dim rs__MMColParam
rs__MMColParam = "NULL"
if (Application("Request.ServerVariables('HTTP_REFERER') ")  <> "") then rs__MMColParam = Application("Request.ServerVariables('HTTP_REFERER') ")
%>
<%
set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_webhotel_STRING
rs.Source = "SELECT *  FROM hent_domain  WHERE domain = '" + Replace(rs__MMColParam, "'", "''") + "'"
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 3
rs.Open()
rs_numRows = 0
%>