| |
|
|
 |
| |
<%
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 venshop_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"khly.asp"
Response.end
else%>
|
|
|
| |
|
|
 |
| |
| |
|
.gif">
"> 
