| wshgm 发表于 2011-1-4 17:05 全显示 1楼 |
|---|
|
看了你的代码，还没看出哪里出问题了，建议你在几个节点上加断点，用respone反馈一下结果就比较容易查到问题所在了： 1. 在fileExt=lcase(right(file.filename,4))之后显示一下fileExt的值 2. 在 if fileEXT="."&trim(Forumupload(i)) then 下显示 i 和 "."&trim(Forumupload(i)) 后的结果，可以把"."&trim(Forumupload(i)) 先赋值到一个变量，再到if语句里面做比较，这样比较直观。 另外，建议： 1. 把 Forum_upload="gif,jpg,jpeg,png" 和 Forumupload=split(Forum_upload,",")都放到 for each formName in upload.objFile之上，这个过程只需做一次就可以了，不需要在循环里面做； 2. 把下面的代码 for i=0 to ubound(Forumupload) if fileEXT="."&trim(Forumupload(i)) then uploadsuc=true exit for else uploadsuc=false end if next 改为 uploadsuc=false for i=0 to ubound(Forumupload) if fileEXT="."&trim(Forumupload(i)) then uploadsuc=true exit for end if next |
| 0 |
