<%
session("root")=""
rs.open "Select * From Root",conn,1,3
name=Request.Form("name")
password=Request.Form("password")
If rs.Eof then
else
if rs("ac")=name and rs("password")=password then
session("root")="root"
if Request.Cookies("guestbookRootFace")="" then
Response.Cookies("guestbookRootFace")="ruri.gif"
Response.Cookies("guestbookRootFace").Expires=DateAdd("d",3650,Date)
End if
Response.Redirect "GuestBook.asp"
Else
session("root")=""
End if
End if
If session("root")="" then
Response.Write "