2017护理三基考试试题:ASPv如何限制上传文件类型

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/03 01:13:30
FixFileExt="htm|html"
iCount=0
for each formName in upload.file
set file=upload.file(formName)
if file.FileSize>0 then
if file.FileSize<FileMaxSize then
FixFnN = Split(FixFileExt,"|")
intFix = Ubound(FixFnN)
for i = 0 to intFix
if GetExtendName(file.FileName) = lcase(trim(FixFnN(i))) then
Response.write "不支持您所上传的文件类型:"
Response.write GetExtendName(file.FileName)

我这段代码可以实现,除HTM外任何文件的上传.
但是,我现在想要的是,反过来.只要HTM的上传文件格式!
怎么改啊?


if GetExtendName(file.FileName) = lcase(trim(FixFnN(i))) then
中的"="改成"<>"试试吧,呵呵