if file.FileSize>0 then ''如果 FileSize > 0 说明有文件数据
file.SaveAs Server.mappath(FileName) ''保存文件
for i=0 to ubound(Forumupload)
if fileEXT="."&trim(Forumupload(i)) then
response.write ""
exit for
end if
next
iCount=iCount+1
end if
set file=nothing
next
//frmAnnounce.Content
frmAnnounce是表单名
Content//是文本框名
自己打开动网的saveannouce_upfile.asp研究研究