下面这段代码是我摘录的上传图片中的代码.点击上传时提示:无法显示网页.第59行错误!!也就是下面的第三行.出在哪里哪? 截图见附件内
dim file_system,sub_files,cur_folder,each_file
set file_system=createobject("scripting.filesystemobject")
set cur_folder=file_system.getfolder(c_path)
set sub_files=cur_folder.files
for each each_file in sub_files
if instr(each_file.name,file.FileName)<>0 then
HtmEnd "你您所上传的文件 <b> "&file.FileName&" </b> 已经存在，请将文件改名后上传。"
set upload=nothing
response.end
end if
next
set each_file=nothing
set sub_files=nothing
set file_system=nothing