<!--#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
%>
'好象是这样的吧
<%
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
%>
'好象是这样的吧
<%
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
<%
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
%>
'会不会是因为所取字段有空格或什么特殊字符?
如: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------------------------------------------------------------
处来乍到,第一次回复,如有不妥处,请见谅。 :)