vote.asp

功能强大 首发! 演示地址:http://jsice.com QQ:3300828 运行环境： Internet Information Server 5.x or 6.0 （ii

<!--#include file="../conn.asp"-->
<%
Response.Buffer = true
Response.Expires = -1
%><!--#include file="../inc/config.asp"--><%
set rs4=server.createobject("adodb.recordset")
sql4="select top 1 * from [vote_class] where class=0 order by id desc"
rs4.open sql4,conn,1,1
if rs4.eof and rs4.bof then
	response.write "document.write(""暂无调查!"");"
else
%>
document.write("<table width=100% border=0 align=center cellpadding=0 cellspacing=4>");
document.write("	<tr>");
document.write("		<td height=20 bgcolor=#EFEFEF align=center><%=rs4("title")%></td>");
document.write("	</tr>");
document.write("</table>");
document.write("<table width=100% height=125 border=0 align=center cellpadding=0 cellspacing=0>");
document.write("	<form name=form method=post action=<%=SiteSystemPath%>save.asp?info=vote&cndb=site&id=<%=rs4("id")%>>");
document.write("		<tr>");
document.write("			<td valign=top>");<%
			  set rs3=server.createobject("adodb.recordset")
			  sql3="select * from [vote] where vote_title="&rs4("id")
			  rs3.open sql3,conn,1,1
			  if rs3.eof and rs3.bof then
			  		response.write "document.write(""还没有投票项目!"");"
				else
				i=1
				do while not rs3.eof%>
document.write("			<table width=100% border=0 cellspacing=0 cellpadding=3 align=center>");
document.write("				<tr>");
document.write("					<td width=16% align=left>");
									<%if rs4("choice")=1 then%>
document.write("						<input name=choice type=radio value=<%=rs3("id")%>>");
									<%end if%>
									<%if rs4("choice")=0 then%>
document.write("						<input name=choice type=checkbox id=choice value=<%=rs3("id")%>>");
									<%end if%>
document.write("					</td>");
document.write("					<td width=84% align=left><%=rs3("vote_name")%> </td>");
document.write("				</tr>");
document.write("			</table>");
			<%rs3.movenext
				loop
				rs3.close
			set rs3=nothing
			end if%>
document.write("			<table width=100% border=0 cellpadding=0 cellspacing=0>");
document.write("				<tr>");
document.write("					<td align=center>");
document.write("					<input name=ids2 type=hidden value=<%=rs4("id")%>>");
document.write("					<input type=submit value='提 交'>&nbsp;&nbsp;&nbsp;");
document.write("					<input type=button value='查 看' onclick=window.open('<%=SiteSystemPath%>voteshow.asp?info=site&id=<%=rs4("id")%>','','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=560,height=390');>");
document.write("					</td>");
document.write("				</tr>");
document.write("			</table>");
document.write("			</td>");
document.write("		</tr>");
document.write("	</form>");
document.write("</table>");
<%end if
rs4.close
set rs4=nothing%>