<%@ Language=VBScript %> <%'Response.Buffer = false%> <% Response.ContentType = "application/vnd.ms-excel" %> <% function renderXML() do while not rs.eof %> <% Response.Flush %> <%=rs("WINDOWS")%> <%=rs("FORMNUMBER")%> "><%=rs("GAMENAME")%> <%=rs("CASES")%> <%=rs("SEALTYPE")%> <%=Round(rs("PRICE"),2)%> <%=rs("TICKETCOUNT")%> <%=rs("PACK")%> <%=Round(MakeNotNull(rs("PAYOUTAMOUNT")),2)%> <%=Round(MakeNotNull(rs("PROFIT")),2)%> <%=Formatnumber(rs("RATIO"),1)%> <%=Round(rs("PAYOUTPERCENT"),1)%> <%=rs("TIER1TICKETS")%> <%=rs("TIER1PAYOUT")%> <%=rs("TIER2TICKETS")%> <%=rs("TIER2PAYOUT")%> <%=MakeNotNull(rs("BOTTOMTIERPAYOUT"))%> <%=rs("MULTITIERTICKETS")%> <%=rs("MULTITIERPAYOUT")%> <%=rs("LASTSALEAMOUNT")%> <%=Switch(rs("SEALCARD"))%> <%=rs("TIER3TICKETS")%> <%=rs("TIER3PAYOUT")%> <%=rs("TIER4TICKETS")%> <%=rs("TIER4PAYOUT")%> <%=rs("TIER5TICKETS")%> <%=rs("TIER5PAYOUT")%> <%=rs("TIER6TICKETS")%> <%=rs("TIER6PAYOUT")%> <%=rs("TIER7TICKETS")%> <%=rs("TIER7PAYOUT")%> <%=rs("TIER8TICKETS")%> <%=rs("TIER8PAYOUT")%> <%=rs("TIER9TICKETS")%> <%=rs("TIER9PAYOUT")%> <%=rs("TIER10TICKETS")%> <%=rs("TIER10PAYOUT")%> <% rs.MoveNext loop end function %> <%renderList()%> <%=renderXML()%>
Note: List includes some custom games which may not be available to you. In addition, the laws that determine the legality of these products change constantly. It is the responsibility of the buyer to determine which products are legal in any given area.
Tabs Form Game Cases Type Price Count Pack Payout Profit Ratio Payout % # Top Top Tier # 2nd 2nd Tier Bottom $ Multi-Win Multi-Top Last Sale Dollars Seal-Card # 3rd 3rd Tier # 4th 4th Tier # 5th 5th Tier # 6th 6th Tier # 7th 7th Tier # 8th 8th tier # 9nd 9th Tier # 10th 10th Tier