Culinary Institute Alain and Marie LeNotre - featuring training and continuing school education in baking program, bread school, chef career, chef program, chef school, cooking education, cooking through intensive, hands on culinary classes, with a low student-teacher ratio.

Request Information

Required Field

First Name :

Last Name:

Email Address:

Day Telephone:

Evening Telephone:

Best Time to Contact:

Morning Afternoon Evening

Address:

City:

State:

Postal Code:

Country:

Date of Birth (MM/DD/YYYY):

	How did you hear about us?: Time of day you wish to attend: Morning Classes Evening Classes When are you available to start classes?:		What is your employment status?: Are you a: What year did you graduate?:
	Would you like us to mail you an information packet? : Yes No Your area of interest is?: What are your personal Goals?:

<% ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 'Ben Shaw 'Code connects to excel spreadsheet to retrive dates for upcoming events '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Dim adoCon Dim rstCC, rstWD, rstOH, rstCR Const I=1 On Error Resume Next ' Connect to Spreadsheet Set adoCon = Server.CreateObject("ADODB.Connection") adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("events.mdb") If Err.Number = 0 Then ' Create Recordsets Set rstCC = Server.CreateObject("ADODB.Recordset") Set rstWD = Server.CreateObject("ADODB.Recordset") Set rstOH = Server.CreateObject("ADODB.Recordset") Set rstCR = Server.CreateObject("ADODB.Recordset") rstCC.LockType = 2 rstWD.LockType = 2 rstOH.LockType = 2 rstCR.LockType = 2 ' Get Recordset rstCC.Open "SELECT ChefClub.* FROM ChefClub;", adoCon rstWD.Open "SELECT WineDinner.* FROM WineDinner;", adoCon rstOH.Open "SELECT OpenHouse.* FROM OpenHouse;", adoCon rstCR.Open "SELECT CollegeRec.* FROM CollegeRec;", adoCon ' Get Next Date from spreadsheet 'While rstCC(1) < Date() 'rstCC.MoveNext 'wend While rstOH(1) < Date() rstOH.MoveNext wend While rstCR(1) < Date() rstCR.MoveNext wend While rstWD(1) < Date() rstWD.MoveNext wend ' Print Results %>

Chef's Club
<% Response.Write Split(FormatDateTime(rstCC("Date"),1), "day, ")(1) %>
<% Response.Write (rstCC.Fields.Item(I+1).Value ) %>

<% if datediff("d", Date(), cdate(rstCR("Date"))) < 60 then %> College Recruitment Day
<%= Split(FormatDateTime(rstCR("Date"),1), "day, ")(1) %> <% end if %>

Wine Tasting Class
<% Response.Write Split(FormatDateTime(rstWD("Date"),1), "day, ")(1) %>

<% if date() < cdate("08/30/08") then %>

Summer Camp
See Dates

<% end if %> <% if date() < cdate("08/23/08") then %>

Saturday Chef's Camp
See Dates

<% end if %>

10 Year Anniversary Celebration
*By Invitation Only
May 14, 2008

Champagne & Chocolat Scholarship Gala
September 5, 2008

<%End If ' Close Up rstCC.Close Set rstCC = Nothing rstWD.Close Set rstWD = Nothing rstOH.Close Set rstOH = Nothing adoCon.Close Set adoCon = Nothing %>

cooking school, houston cooking school, culinary institute, houston texas culinary institute, french culinary arts, pastry chef school, baking program, chef program, chef school houston texas, cooking education, french cooking school, houston texas cooking school, houston cooking program, cooking school houston, cooking schools in houston texas, houston texas culinary institute, houston culinary program, french cooking school, french pastry school, pastry chef school, houston pastry school, houston texas baking program, houston texas catering program, cooking program, houston texas cooking program, texas cooking school, houston texas cooking school, texas culinary academy, texas culinary arts, houston texas culinary institute, houston texas culinary program, houston texas pastry chef school