<%
fp = Server.MapPath("aspcount.txt")
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile(fp)
ct = Clng(a.ReadLine)
rem if Session("ct") = "" then
rem Session("ct") = ct
ct = ct + 1
a.close
Set a = fs.CreateTextFile(fp, True)
a.WriteLine(ct)
rem end if
a.Close
rem Response.Write ct
%>
Over 30
years of service and dedication.
Impeccable quality food prepared
by our Italian gourmet chef.
4 halls hosting from 70 to 700
guests, catering to all occasions,
social events, and business
functions.
