asp for each 循环的问题

来源：百度知道编辑：UC知道时间：2024/09/27 17:21:54

if upload.Form("uptype")="up" then ''如果是上传图片
for each formName in upload.file '列出所有上传了的文件
Set file=upload.file(formName)
If Trim(file.FileName)<>"" Then
filetype=upload.Form(formName)
upload.SaveToFile formName,Server.mappath(formPath&file.filename)
i=1
url="url"'"&i&'"
rs(url)=file.FileName
i=i+1
Next (这个就是48行)
else
rs("url1")=uoload.Form("url1")
rs("url2")=uoload.Form("url2")
rs("url3")=uoload.Form("url3")
end if

在数据库中有三个字段分别是:url1,url2,url3,是用来存放图片路径的.
当用户选择上传图片的时候,将文件名分别存入上面的三个字段中,
如果用户使用外链的话,将网址分别存入上面的三个字段中.
请高手帮忙看看,哪里出错了.
运行后的提示是：
Microsoft VBScript 编译器错误 '800a041f'

错误的 'Next'

\wwwroot\Member\savepub.asp, line 48
二楼说的对,我太不小心了,修改过以后,又有新问题出现了,
Micro

<%

if upload.Form("uptype")="up" then ''如果是上传图片
i=1 '我觉得你放在下面i就不能递加了 i始终都是1
for each formName in upload.file '列出所有上传了的文件你确信upload.file是数组吗?不是数组肯定报错的
Set file=upload.file(formName)
If Trim(file.FileName)<>"" Then
filetype=upload.Form(formName)
upload.SaveToFile formName,Server.mappath(formPath&file.filename)

url="url"'"&i&'"
rs(url)=file.FileName
i=i+1
end if'你缺少这个end if
Next '(这个就是48行)这个你没注释掉...
else
rs("url1")=uoload.Form("url1")
rs("url2")=uoload.Form("url2")
rs("url3")=uoload.Form("url3")
end if
'代码不全我就看出这么多你试试吧

%>

很简单你for循环和if判断语句岔开了

===if upload.Form("uptype")="up" then ''如果是上传图片
for each formName in upload.file '列出所有上传了的文件 <

asp for循环 ASP For 循环控制? 请问asp的for each问题? asp中的for循环问题??? for each 循环删除控件(vb.net 2003) ASP FOR循环嵌套的问题关于数据库和FOR循环问题(ASP) asp 中for循环用变量 ASP 数组 for循环的问题 ASP中For…Next循环语句的问题