<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
'insert this code in the campaign's receiving page
dim bodystring
bodystring = Request.ServerVariables("HTTP_REFERER")
if Request.QueryString("AD") <> "" and Request.QueryString("source") <> "" then
'Response.Write(Request.ServerVariables("HTTP_REFERER"))
' This is always a good idea when dealing with
' cookies! Especially cookies and a redirect!
Response.Buffer = True
' This script handles both the adding and deleting of cookies
Dim strCookieName ' The name of the cookie we're processing
Dim strCookieValue ' The value to be assigned to it
' Get the values passed in by the other script
strCookieName = "UWSCampaign"
If Request.Cookies("UWSCampaign") <> "" then
strCookieValue = "source=" & Request.QueryString("source") & "&date=" & NOW() & "&ad=" & Request.QueryString("AD") & "&URLreferral=" & bodystring & "&previousCookie=" & Request.Cookies("UWSCampaign")
else
strCookieValue = "source=" & Request.QueryString("source") & "&date=" & NOW() & "&ad=" & Request.QueryString("AD") & "&URLreferral=" & bodystring
end if
If strCookieName <> "" Then
If strCookieValue <> "" Then
Response.Cookies(strCookieName) = strCookieValue
Response.Cookies(strCookieName).Expires = Date() + 120
Response.Cookies(strCookieName).Path = "/"
End If
End If
end if
%>
Marine Biology Degree, Miami, Florida - Barry University
The South Florida environment provides opportunities for you to study
marine biology in exciting and unique areas, including the Florida
Everglades and the only reef in the continental United States .
Barry University - College of Arts and Sciences
Marine Biology
11300 NE 2nd Avenue, Miami Shores, FL 33161-6695
Phone number: 305-899-3100
Toll-free: 1-800-756-6000, ext. 3100
E-mail: admissions@mail.barry.edu
South Florida Natural Environment 
