<% Set conn = Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") conn.open dsn rs.open "SELECT AfUsername, status from AF_Users where AfUsername = '" & session("AfUsername") & "'", conn,1,3 if not rs.eof then UserStatus=rs("status") else UserStatus=0 end if rs.close if UserStatus=0 then rs.open "SELECT * FROM AF_Constants where ConStatus = " & UserStatus & "", conn,1,3 else rs.open "SELECT * FROM AF_Constants where ConstantsID = " & UserStatus & "", conn,1,3 end if if not rs.eof then ActivTiersDetails=rs("ActivTiersDetails") Tier2Commission=rs("Tier2Commission") Tier3Commission=rs("Tier3Commission") Tier4Commission=rs("Tier4Commission") Tier5Commission=rs("Tier5Commission") Tier6Commission=rs("Tier6Commission") Tier7Commission=rs("Tier7Commission") end if rs.close sql="SELECT * from AF_Tiers where tier7 = '" & session("AfUsername") & "'" rs.Open sql, conn if not rs.eof then upline1=rs("AfUsername") end if rs.close sql="SELECT * from AF_Tiers where tier6 = '" & session("AfUsername") & "'" rs.Open sql, conn if not rs.eof then upline2=rs("AfUsername") end if rs.close sql="SELECT * from AF_Tiers where tier5 = '" & session("AfUsername") & "'" rs.Open sql, conn if not rs.eof then upline3=rs("AfUsername") end if rs.close sql="SELECT * from AF_Tiers where tier4 = '" & session("AfUsername") & "'" rs.Open sql, conn if not rs.eof then upline4=rs("AfUsername") end if rs.close sql="SELECT * from AF_Tiers where tier3 = '" & session("AfUsername") & "'" rs.Open sql, conn if not rs.eof then upline5=rs("AfUsername") end if rs.close sql="SELECT * from AF_Tiers where tier2 = '" & session("AfUsername") & "'" rs.Open sql, conn if not rs.eof then upline6=rs("AfUsername") end if rs.close %>

Your Upline Network

<%if upline1="" and upline2="" and upline3="" and upline4="" and upline5="" and upline6="" then UplineEmpty=1%> You were not referred to <%=sitename%>'s Affiliate Program by anyone.

Your Upline is empty.

<%end if%>
<%if upline1<>"" then%> <%end if%> <%if upline2<>"" then%> <%end if%> <%if upline3<>"" then%> <%end if%> <%if upline4<>"" then%> <%end if%> <%if upline5<>"" then%> <%end if%> <%if upline6<>"" then%> <%end if%>
<%if ActivTiersDetails= 1 then %>
<%=upline1%>
<% else %><% end if%>
<%if ActivTiersDetails= 1 then %>
<%=upline2%>
<% else %><% end if%>
<%if ActivTiersDetails= 1 then %>
<%=upline3%>
<% else %><% end if%>
<%if ActivTiersDetails= 1 then %>
<%=upline4%>
<% else %><% end if%>
<%if ActivTiersDetails= 1 then %>
<%=upline5%>
<% else %><% end if%>
<%if ActivTiersDetails= 1 then %>
<%=upline6%>
<% else %><% end if%>
<%if UplineEmpty<>1 then%> <%end if%>