<% DIM logo_alt,logo_title logo_alt = "Italian Recipes from Tasty Tuscany Cooking School Course" logo_title = "Tasty Tuscany - The perfect source of authentic and traditional Italian Recipes from Italy!" %> Italian Recipes from Italy - FREE Traditional Tuscany Recipes <% Set cnn1 = Server.CreateObject("ADODB.Connection") openStr = "driver={Microsoft Access Driver (*.mdb)};" & _ "dbq=" & Server.MapPath("database/data.mdb") cnn1.Open openStr,"","" sql = "SELECT * FROM recipe_categories order by ID" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, cnn1, 3, 3 sql2 = "SELECT * FROM recipes order by Category" Set rs2 = Server.CreateObject("ADODB.Recordset") rs2.Open sql2, cnn1, 3, 3 Dim recipe_array(17),recipe_list for temp = 0 to 16 x = temp + 1 SAME = True do while NOT rs2.EOF and SAME=TRUE If rs2("category") = x Then recipe_list = recipe_list & "

" & vbcrlf rs2.MoveNext else same = false end if Loop recipe_array(temp) = recipe_list recipe_list = "" Next %>

Italian Recipes from Italy - Traditional Tuscany Recipes

Site Map

Tasty Tuscany

Italian Recipes From Tuscany Italy

<% Dim navigator,count,count2 count2 = 0 count = 1 navigator = "" %>

Italian Recipes

<%= MonthName(Month(Date)) & " " & Day(Date) & ", " & Year(Date) %>

Tasty Tuscany

Patrizia & Paolo Vecchia
Podere il Poggione
Via Agliati 123,
56036, Agliati - Palaia
Pisa, Italy
Email Us

Web Master Services

<% Response.Cookies("mt")("pagetitle") = "Italian Recipes Index Page" Server.Execute("/statistics/track.asp") %>