<%@ Language=VBScript %> <% ' make a 'database' of images and captions npics = 4 dim pic(3, 2) pic(0, 0) = "ramadhan_A.jpg" pic(0, 1) = "May you live to see another year!" PIC(1, 0) = "ramadhan_B.jpg" pic(1, 1) = "Ramadhan Mubarak!" pic(2, 0) = "ramadhan_C.jpg" pic(2, 1) = "May Allah look favorably upon your fasting and answer your prayers!" pic(3, 0) = "ramadhan_D.jpg" pic(3, 1) = ""O you who believe! Fasting is prescribed for you as it was prescribed for those before you, that you may become pious".? (Holy Qur'an, 2:183)" imgloc = "http://jinn450/ECards/images/" cardloc = "http://jinn450/ECards/images/cards/" %> Virtual Cards -- Ramadhan Occasion
<% for p = 0 to npics-1 step 2 leftpic = pic(p, 0) leftcaption = pic(p, 1) rightpic = pic(p+1, 0) rightcaption = pic(p+1, 1) %> <%next%>
Select your favorite Ramadhan card
<%=leftcaption%>
>
<%=rightcaption%>
<%=leftcaption%> <%=rightcaption%>

 

Send A Virtual CardPrevious