<%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset1__MMColParam Recordset1__MMColParam = "si" If (Request("MM_EmptyValue") <> "") Then Recordset1__MMColParam = Request("MM_EmptyValue") End If %> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_prodotti_STRING Recordset1.Source = "SELECT * FROM prodotti WHERE offerta = '" + Replace(Recordset1__MMColParam, "'", "''") + "' ORDER BY nome ASC" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> Gardenia di Minutolo Vincenzo - Produzione dolciaria
  Gardenia Produzione Dolciaria di Vincenzo Minutolo, C.so Vittorio Emanuele   - Bagnara Calabra (RC) - Tel. 0966474347
   

-----di Minutolo Vincenzo----------

L'AZIENDA

AREA CLIENTI

AREA RIVENDITORI

CONTATTACI

HOME

<% If Not Recordset1.EOF Or Not Recordset1.BOF Then %> <% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %> <% End If ' end Not Recordset1.EOF Or NOT Recordset1.BOF %>
 
 

Ormai sono quarant'anni che la nostra azienda opera nel settore dolciario, offrendo ai nostri clienti prodotti di alta qualitÓ realizzati nel rispetto dei metodi tradizionali che da sempre costituiscono la lavorazione.

Passione, professionalitÓ e fantasia sono i motti che da sempre ci contraddistinguono nella produzione di un'ampia e variegata gamma di specialitÓ calabresi.

 
 

PRODOTTI TIPICI

IL TORRONE

IL TORRONE - LISTINO

ALTRI DOLCI NATALIZI

I DOLCI DEL CARNEVALE

I DOLCI DELLA PASQUA

PASTI SECCHI

DOLCI FRESCHI

BISCOTTERIA

ALTRI PRODOTTI TIPICI

 
 

AREA RISERVATA

 
log:
psw:

 

 

 

Realizzazione: Vincenzo Calabr˛                                                                                     Sito ottimizzato per I.E 5.0 o sup - Risoluzione video 1024X768

<% Recordset1.Close() Set Recordset1 = Nothing %>