asp投票系统asp投票系统这么难做?

ASP投票系统中的UPDATE语法怎么用？怎么老是出错？

<% sql="update tablename set count=count+1 where id=1" 意思是 将 表（tablename） 中 id=1 的 count 字段 在原始基础上加1 %>

咱们aspcms的投票系统能不能支持上千人在接受投票,上万人投票

KINGCMS的老版ASP还蛮好用的，模板安装比较简单 其他的开源的ASP的CMS还蛮多的，又很多固化功能的用起来比较简单，不需会太多代码什么的

用jsp做一个简单的投票系统

<title>查看调查</title> <link href="t1.css" rel="stylesheet" type="text/css"> </head> <body> <table width="30%" border="0" class="t1"> <tr> <td colspan="2"><div align="center">调查结果</div></td> </tr> <tr> <td width="18%">JSP</td> <td width="82%"><img src="bar.gif" width=<%=voteFlo[0]%> height=8><%=vote.voteNum[0]%></td> </tr> <tr> <td>ASP</td> <td><img src="bar.gif" width=<%=voteFlo[1]%> height=8><%=vote.voteNum[1]%></td> </tr> <tr> <td>PHP</td> <td><img src="bar.gif" width=<%=voteFlo[2]%> height=8><%=vote.voteNum[2]%></td> </tr> <tr> <td>其他</td> <td><img src="bar.gif" width=<%=voteFlo[3]%> height=8><%=vote.voteNum[3]%></td> </tr> <tr> <td colspan="2"><div align="center"><a href="javascript:window.close();">关闭窗口</a></div></td> </tr> </table> </body> </html>

index.jsp:

<%@ page contentType="text/html; charset=gb2312" language="java" import="java.sql.*" errorPage="" %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>投票</title> <link href="t1.css" rel="stylesheet" type="text/css"> </head> <script language="javascript"> function cw() {window.open("see.jsp","mywindow","toolbar=no,left==200,width=270,height=350,menubar=no,systemMenu=no"); } </script> <body> <table width="15%" height="250" align="left"> <tr> <td><form name="form1" method="post" action="vote.jsp"> <table width="100%" height="250" border="1" align="center" bordercolor="#9966CC" class="t1"> <tr> <td><div align="left">你所使用的开发语言</div></td> </tr> <tr> <td><input type="radio" name="lang" value="0"> JSP</td> </tr> <tr> <td><input type="radio" name="lang" value="1"> ASP</td> </tr> <tr> <td><input type="radio" name="lang" value="2"> PHP</td> </tr> <tr> <td><input type="radio" name="lang" value="3"> 其他 </td> </tr> <tr> <td><div align="center"> <input name="vote" type="image" src="poll.gif" width="40" height="20" border="0"> <a href="javascript:cw()"><img src="see.gif" width="40" height="20" border="0"></a></div></td> </tr> </table> </form></td> </tr> </table> </body> </html>

asp投票系统这么难做?

<% Language=VBScript %> <!--#include file="adovbs.inc"--> <% Dim strConnect （注：指定数据库路径） strConnect = "DRIVER={Microsoft ess Driver (*.mdb)};DBQ=" & Server.MapPath ("/asp/poll/poll.mdb") & ";DefaultDir=" & Server.MapPath("/asp/poll") & ";DriverId=25;FILE=MS ess;MaxBufferSize=512;PageTimeout=5" Const iWidth = 200 （注：定义投票接口表格宽度） Set objConn = Server.CreateObject("ADODB.Connection")（注：建立数据库连结） objConn.Open strConnect （注：开启数据库连结） Dim objRS Set objRS = Server.CreateObject("ADODB.Recordset")（注：建立数据库对象集合） 　　上面完成了投票调查系统原始程序vote.asp，为了让利用这个网上投票调查系统所得的结果更具真实性，下面将要建议一个检测系统，检查访问者今天是否已经投过票了。

Dim strVoted strVoted = Request.Cookies("Voted")（注：利用Cookies值判定访问者是否投过票） Dim strSQL %> 　　为了不让访问者在同一天内重复投票，所以我们用了一个Request.Cookies("Voted") 来限制访问者一天只能投一次票，这样子的方法比较能够看出投票结果的客观性，如何控制Cookies，这个在下面我向大家介绍： <BODY> <% if strVoted = "Yes" then （注：如果已经投过票了，就显示投票结果） strSQL = "SELECT PollOption.PollOptionID， PollOption.QuestionText， PollOption.Votes， " & "Poll.PollQuestion " & _ "FROM Poll INNER JOIN PollOption ON Poll.PollID = PollOption.PollID " & _ "WHERE Poll.DateStart <= #" & Date & "# AND Poll.DateEnd >= #" & Date & "#;" （注：从 PollOption资料表格中选取PollOptionID、QuestionText、Votes三个字段的值，选取的条件是两个资料表格中PollID相同的资料，而且投票起始日期必须在今天之前，投票截止日期必须在今天之后。

） （注：建立一个动态数组，不管答案选项有多少都能函括在内。

） Dim PollOptions() Redim PollOptions(objRS.RecordCount，2) Dim iCount， iTotalVotes， strPollName iCount = 0 iTotalVotes = 0 strPollName = CStr(objRS("PollQuestion")) Do While Not objRS.EOF PollOptions(iCount，1) = CInt(objRS("Votes")) PollOptions(iCount，2) = CStr(objRS("QuestionText")) iTotalVotes = iTotalVotes + PollOptions(iCount，1) iCount = iCount + 1 objRS.MoveNext Loop %> <TABLE BORDER=0 CELLSPACING=0 WIDTH=<%=iWidth%>> <TR><TH BGCOLOR=6666f0><FONT COLOR=WHITE FACE=Arial SIZE=2> <%=strPollName%> </FONT></TH></TR> <TR> <TD BGCOLOR=000000> <% Dim iLoop