<% response.buffer=true %> <% ' PAGE VARIABLES title="Chicago Kitchen, Recipes from Lake Michigan : Lake Magazine" prefix="/" bg="/bg/bg_oldchicago.gif" ad="none" %> <%= title %> onLoad="window.open('/promo_subscribe.asp','test','height=285,width=500,titlebar=no,status=no,toolbar=no,menubar=no,location=no');"<% end if %>>
Chicago Kitchen
An American food experience, with homegrown specialties, such as an authentic Chicago hot dog, and family recipes reflecting cultures of the city's major immigrant populations. You can also find recipes that have "traveled" with those who arrived here from other U.S. regions, and innovative new dishes that take ques from Chicago's culinary scene.

<% mySQL="SELECT * FROM RecipesTB WHERE (Status='Publish' OR Status='Featured') AND (SourceType='Chicago Kitchen')" Set query=Server.CreateObject("ADODB.Recordset") query.Open mySQL, Connect, adOpenStatic, adLockOptimistic if NOT query.EOF then ' CREATE RANDOM NUMBER Randomize Timer / RND intRangeSize=query.RecordCount sngRandomValue = intRangeSize * RND() varRandomNumber=Int(sngRandomValue) + 1 query.Move varRandomNumber-1 %> Featured Recipe
><%= query("Name") %>
<%= query("Description") %>
Source: <%= query("Source") %>

>View
<% end if %>

<% if Request.QueryString("action")<>"search" then %>
Browse Categories
Categories
<% Set filesys=CreateObject("Scripting.FileSystemObject") Set txtfile=filesys.OpenTextFile(Server.MapPath("\inc_var_category_recipes.txt"),1,0) Do Until txtfile.AtEndOfStream category=txtfile.Readline %> ><%= category %>
<% Loop txtfile.Close %>
>Latest Additions
<% if Request.QueryString("cat")="" then varCategory="latest recipes" else varCategory=Request.QueryString("cat") end if %> <% mySQL="SELECT * FROM RecipesTB WHERE (Status='Publish' OR Status='Featured') AND (SourceType='Chicago Kitchen')" if varCategory<>"latest recipes" then mySQL=mySQL & " AND (Category LIKE '%" & varCategory &"%')" end if mySQL=mySQL & " ORDER BY Date DESC, RecID DESC" Set query=Server.CreateObject("ADODB.Recordset") query.Open mySQL, Connect, adOpenStatic, adLockOptimistic if NOT query.EOF then z=Request.QueryString("z") query.Move z end if endnum=10 if (z+endnum)>=query.RecordCount then endz=query.RecordCount else endz=z+endnum end if if z=0 then z=1 else z=z+1 end if %> <% 'MAKE HALF TITLE BOLD varTitle=varCategory %>
<%= UCASE(varUnboldTitle) %> <%= UCASE(varBoldTitle) %>
<%= query.RecordCount %> listings found
Showing listings <%= z %> to <%= endz %>

<% if query.EOF then %> We're sorry, but we currently don't have any recipes entered for <%= varCategory %>. Please check back soon! <% end if %> <% y= 0 %> <% do until query.EOF or y=endnum %>
><%= query("Name") %>
Source: <%= query("Source") %>
<% query.MoveNext y=y+1 if x=0 then x=1 else x=0 end if %> <% loop %>
<% if z=>endnum then %> <% z=z-endnum-1 if z<=0 then z=0 end if %> &z=<%= z %>#browse>Previous <% end if %> <% if NOT query.EOF then %> <% z=Request.QueryString("z") z=z+y %> &z=<%= z %>#browse>Next <% end if %>
<% else %> <%' SEARCH RESULTS %>
Search Results
Your search results are displayed on the right. If you want to expand your search, try searching again or browsing the categories below.

Categories
<% Set filesys=CreateObject("Scripting.FileSystemObject") Set txtfile=filesys.OpenTextFile(Server.MapPath("\inc_var_category_recipes.txt"),1,0) Do Until txtfile.AtEndOfStream category=txtfile.Readline %> ><%= category %>
<% Loop txtfile.Close %>
>Latest Additions

<% if Request.QueryString("sql")="ny" then mySQL="SELECT * FROM RecipesTB WHERE (Status='Publish' OR Status='Featured') AND (SourceType='Chicago Kitchen')" if Request.Form("Category")<>"" then mySQL=mySQL & " AND (Category LIKE '%" & Request.Form("Category") &"%')" end if if Request.Form("Keywords")<>"" then keywords=Request.Form("Keywords") mySQL=mySQL & " AND (Name LIKE '%" & chr(32) & keywords & chr(32) & "%' OR Name LIKE '%" & chr(32) & keywords & "' OR Name LIKE '" & keywords & chr(32) & "%' OR Description LIKE '%" & chr(32) & keywords & chr(32) & "%' OR Description LIKE '%" & chr(32) & keywords & "' OR Description LIKE '" & keywords & chr(32) & "%' OR Instructions LIKE '%" & chr(32) & keywords & chr(32) & "%' OR Instructions LIKE '%" & chr(32) & keywords & "' OR Instructions LIKE '" & keywords & chr(32) & "%' OR Source LIKE '%" & chr(32) & keywords & chr(32) & "%' OR Source LIKE '%" & chr(32) & keywords & "' OR Source LIKE '" & keywords & chr(32) & "%')" end if mySQL=mySQL & " ORDER BY Date DESC, RecID DESC" Response.Cookies("SQLRecipeSearch")=mySQL else mySQL=Request.Cookies("SQLRecipeSearch") end if 'response.write mySQL Set query=Server.CreateObject("ADODB.Recordset") query.Open mySQL, Connect, adOpenStatic, adLockOptimistic if NOT query.EOF then z=Request.QueryString("z") query.Move z end if endnum=10 if (z+endnum)>=query.RecordCount then endz=query.RecordCount else endz=z+endnum end if if z=0 then z=1 else z=z+1 end if %> <% 'MAKE HALF TITLE BOLD varTitle="Recipe Search Results" %>
<%= UCASE(varUnboldTitle) %> <%= UCASE(varBoldTitle) %>
<%= query.RecordCount %> listings found
Showing listings <%= z %> to <%= endz %>

<% if query.EOF then %> We're sorry, but no listings were found with your search criteria. Please try searching again. <% end if %> <% y= 0 %> <% do until query.EOF or y=endnum %>
><%= query("Name") %>
Source: <%= query("Source") %>
<% query.MoveNext y=y+1 if x=0 then x=1 else x=0 end if %> <% loop %>
<% if z=>endnum then %> <% z=z-endnum-1 if z<=0 then z=0 end if %> &z=<%= z %>&action=search#browse>Previous <% end if %> <% if NOT query.EOF then %> <% z=Request.QueryString("z") z=z+y %> &z=<%= z %>&action=search#browse>Next <% end if %>
<% end if %>

Search Recipes
Looking for that perfect recipe? Use our search tool! You can enter keywords or even ingredients.

Keyword 
Category 
Share Recipes
Do you have a great family recipe from the "old country" or a new creation that favors Midwest-grown or made ingredients? Please submit your recipe!

Related Links
Slow Food U.S.A. is an educational organization dedicated to stewardship of the land and ecologically sound food production; to the revival of the kitchen and the table as centers of pleasure, culture, and community; to the invigoration and proliferation of regional, seasonal culinary traditions; and to living a slower and more harmonious rhythm of life.