<%
// functions for LimGen centered around displaying ads
// this file requires random.asp be included
Function getAffiliateBanner()
haf_displayAdNumber = getRandomInt(1, 2)
Select Case haf_displayAdNumber
Case 1
// Amazon
getAffiliateBanner = "" & _
""
Case 2
// Amazon
getAffiliateBanner = "" & _
""
Case Else
// Amazon
getAffiliateBanner = "" & _
""
End Select
End Function
Function getCPMBanner()
// until we get a CPM contract, we will use affiliate banners
getCPMBanner = getAffiliateBanner()
End Function
Function getRightBarAd()
haf_displayRightAdNumber = getRandomInt(1, 2)
Select Case haf_displayRightAdNumber
Case 1
// amazon st pats
getRightBarAd = "" & _
""
Case 2
// amazon st pats
getRightBarAd = "" & _
""
// Amazon and Netflix
//getRightBarAd = "" & _
// " " & _
// ""
Case 3
// amazon st pats
getRightBarAd = "" & _
""
Case Else
// amazon st pats
getRightBarAd = "" & _
""
End Select
End Function
%>