edit.asp

来自「一个FLASH投票源代码,支持多种定义,并附有后台管理」· ASP 代码 · 共 33 行

<!--#include file="pathcheck.asp"-->
<!--#include file="isy.asp"-->
<!--#include file="conn.asp"-->
<% 
thisid=Trim(Request.Form("voteid"))
voteco=Trim(Request.Form("voteco"))
bg_color=Trim(Request.Form("bg_color"))
word_color=Trim(Request.Form("word_color"))
word_size=Trim(Request.Form("word_size"))

sql="select * from votepro where id="&thisid
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
if rs.eof then Response.Redirect("rep.asp?operate=rsf")

rs("voteco")=voteco
for i=1 to 5
thisdate=Trim(Request.Form("cs"&i))
thisnum=Trim(Request.Form("cs"&i&"_num"))
if thisdate="" then thisdate=null
'if thisnum="" then thisnum=0
rs("cs_"&i)=thisdate
rs("cs_"&i&"_num")=thisnum
next
if bg_color<>"" then rs("bg_color")=bg_color
if word_color<>"" then rs("word_color")=word_color
if word_size<>"" then rs("word_size")=word_size

rs.update
closers
closedb
response.Redirect("rep.asp?operate=edit")
%>