数组循环保存数据问题

[zy8870195]

<%
lines=20

dim array1()

redim  xm_array1(lines+1)

for i=1 to lines
array1(i)= request.form("lei"+cstr(i))
next
……………………数据库链接

dim xm
for i=1 to lines
lei=xm_array1(i)
exec="insert into table([lei]) values('"+lei+"')"
conn.execute (exec)
next
%>

目前有20行表格 使用数组循环写进数据库

如何判断为空就停止循环保存？

[街头小贩]

判断空用:lei="",
停止for:Exit for

[街头小贩]

vbscript怎么用+连接符,应该用&
exec="insert into table([lei]) values('"&lei&"')"

[zy8870195]

谢谢你哦 if lei="" then
停止 exit for

这样判断？

next
是把这个改了吗

[lzj34]

for i=1 to lines
lei=xm_array1(i)
if lei<>"" then

exec="insert into table([lei]) values('"+lei+"')"
conn.execute (exec)
END IF
next
上面代码表示如果为空不写入,并取得下一个值
下面的代码表示如果为空则中止写入数据并跳出循环
for i=1 to lines
lei=xm_array1(i)
if lei="" then Exit for
exec="insert into table([lei]) values('"+lei+"')"
conn.execute (exec)
next