⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 edit_save.asp

📁 8款下载系统源代码 2003-3-11 21:37:45 433 949k · 都很常见: 猛虎山庄、燕衔泥(飞扬的软件第二版用的就是他
💻 ASP
字号:
<%
response.buffer="True"
If request.cookies("member")="" Then
Response.redirect"../"
End If
%>
<!--#include file="conn.asp"-->
<%
dim rs,sql,voteID,clear,votename
votename=request.form("votename")
clear=request.form("clear")
voteID=request("voteID")
set rs=Server.CreateObject("Adodb.Recordset")
sql="select voteID,votename,s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,n1,n2,n3,n4,n5,n6,n7,n8,n9,n10 from vote where voteID="&voteID
rs.open sql,conn,1,3
rs("votename")=votename
rs("s1")=request.form("s1")
rs("s2")=request.form("s2")
rs("s3")=request.form("s3")
rs("s4")=request.form("s4")
rs("s5")=request.form("s5")
rs("s6")=request.form("s6")
rs("s7")=request.form("s7")
rs("s8")=request.form("s8")
rs("s9")=request.form("s9")
rs("s10")=request.form("s10")
If clear<>"" Then
rs("n1")=0
rs("n2")=0
rs("n3")=0
rs("n4")=0
rs("n5")=0
rs("n6")=0
rs("n7")=0
rs("n8")=0
rs("n9")=0
rs("n10")=0
End If
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.cookies("mode")=request.form("mode")
response.cookies("ip")=request.form("ip")
response.cookies("voteID")=request("voteID")
response.redirect"success.asp"
%>

<head>
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
</head>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -