<%
If Request.Cookies("ReferringURL") = "" Then
ReferringURL = Request.ServerVariables("HTTP_REFERER")
If ReferringURL <> "" Then
If left(ReferringURL,11)="http://www." then
ReferringURL = Right(ReferringURL,len(ReferringURL)-11)
elseif left(ReferringURL,12) = "https://www." then
ReferringURL = Right(ReferringURL,len(ReferringURL)-12)
elseif left(ReferringURL,7)="http://" then
ReferringURL = Right(ReferringURL,len(ReferringURL)-7)
end if
'Updated Code Below To Remove Error 10-5-04
If instr(ReferringURL,"/") >=2 Then
ReferringURL = left(ReferringURL,instr(ReferringURL,"/")-1)
End If
Response.Cookies("ReferringURL")= ReferringURL
Response.Cookies("ReferringURL").Expires=date()+90
else
Response.Cookies("Referring URL")= "UnKnown Referrer"
Response.Cookies("ReferringURL").Expires=date()+90
end if
End If
%>
ImaginationX : Caribbean Nights ScreenSaver Free Download
Caribbean Nights ScreenSaver
Version 1.00
Fully animated beach scene. Birds fly by as a
sailboat slowly drfits by in the distance. Dolphins
jump in the clear blue water as a cardinal sits
gracefully on a lush palm tree. The sounds of exotic
birds chirpping fill the air as...
