?? fksave.asp
字號:
<!--
┌─ o91.com───────────────┐
│ 動感購物商務(wù)平臺WWW.SNSN.NET版權(quán)所有 │
│ 設(shè)計:模糊視線13855119911 QQ:9912515 │
└────────────────────┘
-->
<!--#include file="conn.asp"-->
<%
if request.form("name")="" then
response.Write "<script LANGUAGE='javascript'>alert('請?zhí)顚懩男彰?#039;);history.go(-1);</script>"
response.End
end if
if request.form("content")="" then
response.Write "<script LANGUAGE='javascript'>alert('請?zhí)顚懩牧粞耘c建議');history.go(-1);</script>"
response.End
end if
if request.form("temp")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('非法操作!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
'由于表單被重復提交(標志為session("antry")為空)引起
else
iname=request.Form("name")
iqq=request.Form("qq")
iemail=request.Form("email")
iurl=request.form("url")
isex=request.form("sex")
icontent=request.form("content")
%>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_guestshop where (id is null)",conn,1,3
rs.addnew
rs("name")=iname
rs("qq")=iqq
rs("email")=iemail
rs("url")=iurl
rs("sex")=isex
rs("content")=icontent
rs("time")=now()
rs.update
rs.close
set rs=nothing
session("antry")="" '提交成功,清空session("antry"),以防重復提交??!
end if
%>
<meta http-equiv="refresh" content="1;URL=fk.asp">
<title>留言成功</title>
<p> </p>
<p> </p>
<p> </p>
<table width="62%" border="0" align="center">
<tr>
<td align="center"><p> <img src="images/loading.gif" width="94" height="27"><br>
<br>
<font size="2">留言成功,1秒鐘后返回!</font></p>
</td>
</tr>
</table>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -