<%
if session("firstKitchen")="" then
session("firstKitchen")="no"
sql="select AccessCount, AccessTime from cKetchenPageCnt order by AccessCount DESC"
set dbConn=server.CreateObject("adodb.connection")
strConn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=E:\shared\database\yamada-udon.mdb"
dbConn.Open strConn
set rs=dbConn.Execute(sql)
sql="insert into cKetchenPageCnt (AccessCount, AccessTime) " _
&"values("&rs("AccessCount")+1&", #"&date&" "&time()&"#)"
dbConn.Execute(sql)
end if
%>