savecwords.asp

冬日阳光小型留言本 v2.0

<!--#include file="conn.asp"-->
<%if session("admin")="" then
else
word=request.form("word")
if word="" then
response.write"没填字呢。。。<a href=javascript:history.go(-1)>返回</a>"
else
set check=conn.execute("select * from cover where word='"&word&"'")
on error resume next
if check.eof and check.bof then%>
<%set save=conn.execute("insert into cover(word)values('"&word&"')")
set save=nothing
response.redirect"cwords.asp"
else
set de=conn.execute("delete*from cover where word='"&word&"'")
set de=nothing
response.write"你已经成功得恢复了 "'"&word&"'" "
end if
end if
end if%>