% here="resources" title="Autumn - SavATree, Relationships and Professional Affiliations" desc="" keywords="" %> <% Dim paymentamount, discountexpires paymentamount = request("paymentamount") discountexpires = cdate(request("discountexpires")) If Date <= discountexpires then paymentamount = request("prevpaymentamount") Else paymentamount = request("paymentamount") End If %>