|
|
<%
if request("action")="post" then
venip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If venip="" Then venip=Request.ServerVariables("REMOTE_ADDR")
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from norshop_gb"
rs.open sql,conn,1,3
rs.Addnew
rs("name")=DelStr(Request("name"))
rs("email")=DelStr(Request("email"))
rs("oicq")=DelStr(Request("oicq"))
rs("content")=DelStr(Request("content"))
rs("photo")=DelStr(Request("photo"))
rs("ip")=venip
rs("riqi")=date()
rs.Update
rs.Close
Set rs=Nothing
Response.Redirect"gb.asp"
else%>
| 首页 - 留言簿 - 添加留言 |
|
|
|
|