testfilter.vb

来自「大文件上传组件」· VB 代码 · 共 12 行

Imports System.IO

Imports Krystalware.SlickUpload

Public Class TestFilter
    Implements IUploadFileFilter

    Public Function ShouldHandleFile(ByVal file As UploadedFile) As Boolean Implements IUploadFileFilter.ShouldHandleFile
        Return Not (Path.GetExtension(file.ClientName) = ".exe")
    End Function
End Class