新微赢技术网

标题: 如何限制上傳檔案的副檔名 [打印本页]

作者: 老子xin坏 时间: 2010-1-8 01:42
标题: 如何限制上傳檔案的副檔名
如何限制上傳檔案的副檔名
如：
我只想上傳副檔名為EXE或RAR的檔案
這個代碼哪位帥哥有啊？

作者: 梧桐雨love 时间: 2010-1-8 01:42
谢谢，这两天休息了，将代码看一下，呵呵，谢谢zhulei1978版主的帮忙

作者: 森林的眼泪 时间: 2010-1-8 01:42
cType="rar,exe" '文件类型

Function getExt(name)
getExt = right(name, 3)
End Function
Function isf(fileName, fType)
ext = getExt(fileName)
isf = False
typeList = split(fType, ",")
For ii = LBound(typeList) To UBound(typeList)
If UCase(ext) = UCase(typeList(ii)) Then
isf = True
Exit For
End If
Next
End Function

If isf(fileName, cType) Then
上传
else
..........

仅供参考

作者: 守护天使 时间: 2010-1-8 01:42
有沒有一個現成的代碼是可以用來調用的

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)