<% Option Explicit %> <% NoCache() Dim rsPromotion Dim sqlPromotion Dim MainPic Dim PromoHeading Dim i Dim tDate Dim sDate Dim eDate Dim sMonths Dim catStatus Dim PID tDate=Date() sMonths = Array("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec") set rsPromotion = server.CreateObject("Adodb.Recordset") sqlPromotion = "SELECT tblPromocat.catname, tblPromocat.Status, tblProHeading.sDate, tblProHeading.eDate, tblProHeading.PTitle, tblPromotion.sno, tblPromotion.image1" sqlPromotion = sqlPromotion & " FROM tblProHeading INNER JOIN (tblPromocat INNER JOIN tblPromotion ON tblPromocat.sno = tblPromotion.catkey) ON tblProHeading.sno = tblPromotion.ProID" sqlPromotion = sqlPromotion & " Where tblPromotion.Status<>''" If request("PID") <> "" then sqlPromotion = sqlPromotion & " AND tblPromotion.sno=" & request("PID") End if sqlPromotion = sqlPromotion & " AND ((tblProHeading.sDate) <= #" & CDate(tDate) & "#)" sqlPromotion = sqlPromotion & " AND ((tblProHeading.eDate)>= #" & CDate(tDate) & "#)" sqlPromotion = sqlPromotion & " AND tblProHeading.pFlag=True" sqlPromotion = sqlPromotion & " Order by tblPromotion.Cat_Order ASC,tblProHeading.sDate Desc, tblProHeading.eDate Desc" 'Set the curson type to 1 so we can count the number of records returned rsPromotion.CursorType = 1 rsPromotion.open sqlPromotion, adoConn 'response.write(sqlPromotion) '=============================================== If Not rsPromotion.EOF then PID = rsPromotion("sno") catStatus = rsPromotion("Status") MainPic = rsPromotion("Image1") sDate = rsPromotion("sDate") eDate = rsPromotion("eDate") If request("ID") <> "" then PromoHeading = rsPromotion("catname") Else PromoHeading = rsPromotion("pTitle") End if End if %> Le Marché - Dubai - Promotions )">

Site Requirement :

We have noticed that Flash Player is not installed on your browser.

Download Flash Player

Le Marché Supermarket
Arabian Ranches,
Community Centre,
Emirates Road, Dubai, UAE.

Phone : +9714 3618358
Fax : +9714 3618373

 
 
 
 

 

 
Promotions <%If tDate >= sDate AND tDate <= eDate Then%>
&PID=<%=PID%>')">
<%End if%>
<% if not (rsPromotion.EOF AND rsPromotion.BOF) then %> <%Else%>
'TO SERVE YOU'


This slogan encompasses everything that Le Marche exists and aspires for. Le Marche carries forward the tradition of Geant of providing 'great shopping experience at the best price'. With over 65,000 products to choose from in a selling area of 5,000 square meters with wide aisles and customer friendly layout, it is a shopper's dream come true. With such a huge range to choose from, the entire household shopping can be done under one roof. There is something for everyone.

The Trendsetters of fortnightly promotions in Dubai, Geant Hypermarket, continue the trend by offering the same merchandise at Le Marche as well. Each fortnight, the people of Dubai are treated to a fresh promotion. The populace of Sitra and surrounding areas can reap the benefits of Geant closer to their home or work place without traveling the distance and negotiating the ever increasing traffic congestions on the Dubai roads. People can now grab the opportunity provided by the promotion to get about 250 products at a bargain price every fortnight.



The promotion page is being updated. Please visit again to view latest promotions or browse through site to view the latest happening in Le Marché - UAE

 
 
<%End if%>
 
<% rsPromotion.close Set rsPromotion = nothing adoConn.Close set adoConn = nothing %>