% if seclevel = 0 then sqlstring = "select m.*, p.*, r.*, d.* from promotion_data d inner join mirthuser m on m.record_id = d.user_id inner join mirthpromo p on p.record_id = d.promo_id inner join rep r on r.record_id = d.rep_id order by m.promodate desc;" else sqlstring = "select m.*, p.*, r.*, d.* from promotion_data d inner join mirthuser m on m.record_id = d.user_id inner join mirthpromo p on p.record_id = d.promo_id inner join rep r on r.record_id = d.rep_id where m.record_id = " & uid & " order by m.promodate desc;" end if fn = fname & " " & lname %>
Welcome, <%=fn%> |
|
<%
'set recset = nothing
'set recset = myConn.Execute(sqlstring)
'if recset.BOF and recset.EOF then
' response.write("You Currently Have Zero Promos Booked ") 'else ' response.write("Here Are All Promos Booked for You: ") ' while not recset.EOF ' ' recset.moveNext ' wend 'end if %> |