<% strID = request.querystring("id") if strID <> "" then lngID = sbDecrypt(strID) else lngID = "57962" end if strID = sbEncrypt(lngID) 'now store cookie for when the visitor comes back ref = lngID if ref <> "" then response.cookies("ref") = ref response.cookies("ref").expires = #July 4, 2020# end if response.redirect "affiliate_purchase_your_copy_of_spambat.asp?" & strID %>