votemodify.asp
来自「能进行网上购物的需求」· ASP 代码 · 共 98 行
ASP
98 行
<!--#include file="conn.asp"-->
<%
if session("admin_name")="" then
response.redirect "default.asp"
end if
dim id,DateAndTime,i,sql
id=request.QueryString("id")
set rs=server.createobject("adodb.recordset")
sql="select * from vote where id="&id
rs.open sql,conn,1,1
if rs.eof then
response.write "<meta http-equiv=""refresh"" content=""2;url=javascript:history.go(-1)"">"
response.write("<table width=400 border=0 cellspacing=0 cellpadding=0 align=center>")
response.write("<tr><td>操作错误！</td></tr>")
response.write(" <tr><td><a href=vbscript:history.back()>回去重来</a>,2秒钟后自动返回</td></tr>")
response.write("</table>")
Response.End
else
Title=rs("Title")
Title_ename=rs("Title_ename")
Title_fname=rs("Title_fname")
DateAndTime=rs("DateAndTime")
end if
%>
<head>
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../images/css.css" rel=stylesheet>
<style>
td{font-size:9pt;line-height:120%;color:#353535}
body{font-size:9pt;line-height:120%}
a:link { color: #000000; text-decoration: none }
a:visited { color: #000000; text-decoration: none }
a:active { color: #000000; text-decoration: none }
a:hover { color: #336699; text-decoration: none; position: relative; right: 0px; top: 1px }
</style>
<title>投票管理</title>
<SCRIPT language="JavaScript" type="text/javascript">
function IsDigit()
{
return ((event.keyCode >= 48) && (event.keyCode <= 57));
}
</script>
</head>
<body bgcolor="#FFFFCC" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="1" cellpadding="2" vspace="0" hspace="0" bgcolor="#FFFFFF">
<tr bgcolor="#FFCC33">
<td height="27" bgcolor="#FFCC33" background="images/admin_bg_1.gif">.:: 您可以在这里进行站内投票的相关操作</td>
</tr>
</table>
<table border="0" width="100%" cellspacing="0" cellpadding="1" align=center>
<tr>
<td align=center valign=top width="100%">
<table border="1" width="100%" cellspacing="0" cellpadding="0" style="border-collapse: collapse" align=center bordercolor="#336699">
<form method="POST" action="voteSave.asp?id=<%=id%>">
<tr bgcolor="#E8F1FF">
<td width="100%" height="20" colspan=2 align=center><b>修 改 网 站
投 票</b> 发布时间：<%=DateAndTime%></td>
</tr>
<tr bgcolor="#E8F1FF">
<td width="15%" align="right">主题：</td>
<td width="85%">
简体<input type="text" name="Title" value="<%=Title%>" size="20" style="font-family: 宋体; font-size: 9pt">
繁体<input type="text" name="Title_fname" value="<%=Title_fname%>" size="20" style="font-family: 宋体; font-size: 9pt">
英文<input type="text" name="Title_ename" value="<%=Title_ename%>" size="20" style="font-family: 宋体; font-size: 9pt"></td>
</tr>
<%for i=1 to 5%>
<tr bgcolor="#E8F1FF">
<td align="right">选项<%=i%>：</td>
<td>
简体<input type="text" name="select<%=i%>" value="<%=rs("select"&i)%>" size="20" style="font-family: 宋体; font-size: 9pt">
繁体<input type="text" name="select_fname<%=i%>" value="<%=rs("select_fname"&i)%>" size="20" style="font-family: 宋体; font-size: 9pt">
英文<input type="text" name="select_ename<%=i%>" value="<%=rs("select_ename"&i)%>" size="20" style="font-family: 宋体; font-size: 9pt">
票数：<input type="text" name="answer<%=i%>" value="<%=rs("answer"&i)%>" size="5" style="font-family: 宋体; font-size: 9pt"></td>
</tr>
<%next%>
<tr bgcolor="#E8F1FF">
<td colspan=2 align=center>
<input type="hidden" value="edit" name="act">
<input type="button" value=" 返 回 " onclick="javascript:history.go(-1)" style="font-family: 宋体; font-size: 9pt">
<input type="submit" value=" 修 改 " name="cmdok" style="font-family: 宋体; font-size: 9pt">
<input type="reset" value=" 清 除 " name="cmdcancel" style="font-family: 宋体; font-size: 9pt">
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing%>
</center>
</body></html>⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?