源代码如下:
<%
dim rs
dim sql
selected=request.form("pid")
set rs=server.createobject("adodb.recordset")
for(m=0;m<26;m++)
{
sql="update vote set select"&document.form1.pid[m].value&"=select"&document.form1.pid[m].value&"+1 where id=1"
rs.open sql,conn,3,3
}
set rs=nothing
conn.close
set conn=nothing
Response.write "投票成功,感谢您的支持!"
response.redirect "main.asp"
%>
编译时提示:Microsoft VBScript 编译器错误 (0x800A03F2)缺少标识符
for(i=0;i<26;i++)
--^这一行出错,请问各位大侠这是怎么回事啊?需要怎么改?