📄 vote.asp
字号:
<%
set rs4=server.createobject("adodb.recordset")
sql4="select top 1 * from vote_class order by id desc"
rs4.open sql4,conn,1,3
if rs4.eof and rs4.bof then
response.write "暂无调查!"
else
%>
<table width=100% border=0 align=center cellpadding=0 cellspacing=4>
<tr>
<td height=20 bgcolor=#EFEFEF align=center>
<%=rs4("title")%></td>
</tr>
</table>
<table width=100% height=125 border=0 align=center cellpadding=0 cellspacing=0>
<form name=form method=post action=admin/votedeal.asp?id=<%=rs4("id")%>>
<tr>
<td valign=top><%
set rs3=server.createobject("adodb.recordset")
sql3="select * from vote where vote_title="&rs4("id")
rs3.open sql3,conn,1,3
if rs3.eof and rs3.bof then
response.write "您还没有添加投票项目!"
else
i=1
do while not rs3.eof%>
<table width=100% border=0 cellspacing=0 cellpadding=3 align=center>
<tr>
<td width=16% align=left><%if rs4("choice")=1 then%>
<input name=choice type=radio value=<%=rs3("id")%>>
<%end if%> <%if rs4("choice")=0 then%>
<input name=choice type=checkbox id=choice value=<%=rs3("id")%>>
<%end if%> </td>
<td width=84% align=left><%=rs3("vote_name")%>
</td>
</tr>
</table>
<%rs3.movenext
loop
rs3.close
set rs3=nothing
%>
<table width=100% border=0 cellpadding=0 cellspacing=0>
<tr>
<td align=center>
<input name=ids2 type=hidden id=ids2 value=<%=rs4("id")%>>
<input type="submit" value="提 交" name="B3" class="stbtm">
<input type="button" value="查 看" class="stbtm" onclick="window.open("admin/voteshow.asp?id=<%=rs4("id")%>","","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=560,height=390");">
</td>
</tr>
</table>
</td>
</tr>
</form>
</table>
<%end if
end if%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -