poll.asp

来自「电子商务网络购物系统」· ASP 代码 · 共 29 行

<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<tr bgcolor="#FFFFFF">
         <td>&nbsp;</td>
         <td>&nbsp;</td>
        </tr>
	<tr bgcolor="#FFFFFF">
         <td align="right" height="22" class="text">投票主题*:</td>
         <td height="22"><input name="pollQuestion" type="text" size="30" maxlength="41"></td>
        </tr><%
For intPollLoopCounter = 1 to intMaxPollChoices

%>
        <tr bgcolor="#FFFFFF">
         <td align="right" height="22" class="text"><%
        Response.Write("投票选项" & " ")
	Response.Write(intPollLoopCounter)
	If intPollLoopCounter < 3 Then Response.Write("*")

	%>:</td>
         <td height="22"><input name="choice<% = intPollLoopCounter %>" type="text" size="30" maxlength="41"></td>
        </tr><%
Next

%>	<tr bgcolor="#FFFFFF">
         <td align="right" height="22" class="text">&nbsp;</td>
         <td height="22" class="text">&nbsp;<input type="checkbox" name="multiVote" value="True">多选投票
		&nbsp;<input type="checkbox" name="pollReply" value="True">投票不接受回复</td>
        </tr>