<!--#include file="conn.asp"-->
<%
for b=1 to 1
for i = 1 to Request.Form.Count - 1
ans=Request.Form(i)
title=Request.Form(n)
sql="insert into bbb(ans,title) values ('"&ans&"','"&title&"')"
conn.execute(sql)
next i
next b
%>
'好象是这样的吧

解决方案 »

  1.   

    <!--#include file="conn.asp"-->
    <%
    for b=1 to 1
    for i = 1 to Request.Form.Count - 1
    ans=Request.Form(i)
    title=Request.Form(n)
    sql="insert into bbb(ans,title) values ('"&ans&"','"&title&"')"
    conn.execute(sql)
    next i
    next b
    %>
    尊敬的longji(龙寂)哥哥,我已经按照你的指点,改为上面的源代码,可还是出现下面的问题,请问还可以怎样改? 错误类型:
    Microsoft VBScript 编译器错误 (0x800A0401)
    语句未结束
    /liu/kaoshi/result.asp, line 32, column 5
    next i
      

  2.   

    <!--#include file="conn.asp"-->
    <%
    for b=1 to 1
    for i = 1 to Request.Form.Count - 1
    ans=Request.Form(i)
    title=Request.Form(n)
    sql="insert into bbb(ans,title) values ('"&trim(ans)&"','"&trim(title)&"')"
    conn.execute(sql)
    next i
    next b
    %>
    '会不会是因为所取字段有空格或什么特殊字符?
      

  3.   

    我觉得有几个问题值得商榷:1、第一层循环作用不明确,变量b并未使用;2、第二层循环变量i取值范围不清楚,既然使用Request.Form.Count-1作为终值,那么初始值是不是应该为0,也就是for i=0 to Request.Form.Count-1,这样好像更符合逻辑;3、局部变量title似乎并没有真正赋值,因为Request.Form(n)中的变量n似乎并未定义,莫非应该是1中的循环变量b,不是很清楚。另外提个建议,可以考虑在执行sql语句之前先进行屏幕输出变量结果,以便校验逻辑。
    如:for..
    for....
    ans=Request.Form(i)
    title=Request.Form(n)'屏幕输出结果
    response.write ans & "," & title & "<br>"'sql="insert into bbb(ans,title) values ('"&trim(ans)&"','"&trim(title)&"')"
    'conn.execute(sql)next
    next------------------------------------------------------------
    处来乍到,第一次回复,如有不妥处,请见谅。 :)