if request("action")="tianjia" then
ip=cstr(Request.Servervariables("HTTP_X_FORWARDED_FOR"))
If ip="" Then ip=cstr(Request.Servervariables("REMOTE_ADDR"))
set rs=server.createobject("adodb.recordset")
sql="select * from GuestBook where (GuestId is null)"
rs.open sql,conn,1,3
rs.addnew
rs("GuestTitle")=request("title")
rs("GuestContent")=request("content")
rs("KeShi")=request("keshi1")
rs("JiBing")=request("jibing1")
rs("GuestIP")=ip
rs.update
set rs=nothing
conn.close
set conn=nothing
response.write "" & Chr(13)
Response.End
end if
%>
