<%user=request("user")
if user<>"" then%>
<%
face=request.form("p1")+request.form("p2")
if request.form("p1")="" or request.form("p2")="" then
face="m01"
end if
name=trim(request.form("name"))
if name="" then
name="不愿留名的过客"
end if
email=request.form("email")
url=request.form("url")
if url="http://" then
url=""
end if
show=request.form("show")
ly=request.form("ly")
'**********检查是否填写了所有项，如果不是侧自动返回申请页面
if ly="" then
errmsg=errmsg & "※ 请填写留言[内容]！\n"
end if
if len(name)>15 then
errmsg=errmsg & "※ 我没见过这么长的[名字]哟！\n"
end if
if request.cookies("ly")=ly then
errmsg=errmsg & "※ 请不要重复提交相同的留言！\n"
end if
if errmsg<>"" then
Conn.Close
Set conn = nothing
Set rsc = nothing
response.write("")
response.end
end if
'**********检查结束**********
response.cookies("ly")=ly
set rs=server.createobject("adodb.recordset")
sql="select * from book where (id is null)"
rs.open sql,conn,1,3
rs.addnew
rs("user")=user
rs("name")=name
rs("face")=face
rs("email")=email
rs("url")=url
rs("show")=show
rs("ly")=ly
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
