&Refer=<%=CharStripper(lcase(Request.ServerVariables("HTTP_REFERER")))%>"> <% 'HTTP_HOST = 'Domain Name Function CharStripper(DaString) DaString = Replace(DaString,"%","") DaString = Replace(DaString,"<","") DaString = Replace(DaString,">","") DaString = Replace(DaString,"{","") DaString = Replace(DaString,"}","") DaString = Replace(DaString,"[","(") DaString = Replace(DaString,"]",")") DaString = Replace(DaString,";",",") CharStripper = LCase(DaString) End Function %>