Report on ALL Referrers?

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic


<tr class="normal"> 

     <td colspan="8">

        <%=query%>

        </td>

</tr>


               <select name="IdRefer">

            <option value="0">All Referrers</option>

               <%do while not rsCustRef.eof%>


if IdRefer=0 then

     mySQL="SELECT Name,IdRefer FROM Referrer;"

else

     mySQL="SELECT Name,IdRefer FROM Referrer WHERE IdRefer=" & IdRefer

end if


do while not rs1.eof

     Referrer=rs1("Name")

     newIdRefer=rs1("IdRefer")

if IdRefer=0 then

     query="SELECT orders.idorder,orders.idcustomer,orders.total,orders.shipmentDetails,orders.paymentDetails,orders.taxAmount,orders.discountDetails,orders.orderDate,orders.processDate,orders.shipDate,orders.ord_VAT FROM Orders INNER JOIN customers ON (orders.idcustomer=customers.idcustomer) WHERE (orders.IDRefer =" & newIDRefer & " OR customers.IDRefer =" & newIDRefer & ") AND ((orders.orderStatus>2 AND orders.orderStatus<5) OR (orders.orderStatus>6 AND orders.orderStatus<9) OR (orders.orderStatus=10 OR orders.orderStatus=12)) " & TempSQL1 & TempSQL2 & TempSpecial & " ORDER BY " & tmpD & " DESC;"

else

     query="SELECT orders.idorder,orders.idcustomer,orders.total,orders.shipmentDetails,orders.paymentDetails,orders.taxAmount,orders.discountDetails,orders.orderDate,orders.processDate,orders.shipDate,orders.ord_VAT FROM Orders INNER JOIN customers ON (orders.idcustomer=customers.idcustomer) WHERE (orders.IDRefer =" & IDRefer & " OR customers.IDRefer =" & IDRefer & ") AND ((orders.orderStatus>2 AND orders.orderStatus<5) OR (orders.orderStatus>6 AND orders.orderStatus<9) OR (orders.orderStatus=10 OR orders.orderStatus=12)) " & TempSQL1 & TempSQL2 & TempSpecial & " ORDER BY " & tmpD & " DESC;"

end if