<% ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''''' This code goes on the casino home page, which should be configured as an ASP page ''''''' ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Dim serverNames(10) Dim numServerNames Dim serverLen Dim bUseCameFrom CameFrom=Request.ServerVariables("HTTP_REFERER") if (Len(CameFrom) > 0) then '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''' Change the parameters below per casino ''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''' How many base URLs for the web site are there? ''''''' numServerNames = 2 ''''' List all possible base URLs for the web site here ''''' serverNames(0) = "http://www.888luckyonlinecasino.com" serverNames(1) = "http://888luckyonlinecasino.com" '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''' Change the parameters above per casino ''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '''''' This makes sure that we only save external referrers ''''' bUseCameFrom = true for i=0 to numServerNames-1 serverLen = Len(serverNames(i)) if Left(CameFrom,serverLen) = serverNames(i) then bUseCameFrom = false exit for end if next '''''' This saves the external HTTP referrer ''''' if bUseCameFrom then Session("camefrom")=CameFrom end if end if '''' This saves an explicit referrer (from=##) '''''' ExplicitCameFrom=Request("from") if Len(ExplicitCameFrom) > 0 then Session("explicitcamefrom")=ExplicitCameFrom end if %> 888 Lucky Online Casino

About Us

Experience the thrill of Vegas from your own home. Our fully licensed and insured casino offers Real Time Gaming software that provides each player with extremely realistic and fast paced Las Vegas style gaming. 888 Lucky Online Casino has the highest percentage payouts on the internet.

Experience the thrill of REAL MONEY $$$ wagering from the comfort of your home or simply Play for Fun.