有很多时候上传文件是需要加入文件类型的判断的，如果不加入判断很容易出现大量垃圾文件或者无用文件甚至是病毒脚本的情况的
所以在此我说一下对上传照片这一特特定类型的判断
下面直接上代码，这段代码是VB.ENT，其他的语言其实也大同小异，自己稍微改一下即可
''' <summary>
''' 支持的图片类型判断函数
''' </summary>
''' <returns></returns>
Public Function CheckImage(ByVal type As String) As Boolean
Dim fileType As String = ".bmp,.jpg,.jpeg,.png,.tif,.gif,.pcx,.tga,.exif,.fpx,.svg,.psd,.cdr,.pcd,.dxf,.ufo,.eps,.ai,.raw,.WMF,.webp" '支持的图片类型
If fileType.Contains(type) Then
Return True
End If
Return False
End Function
''' 启用检查类型函数的代码体
If Not CheckImage(demo.GetFileName(sName)) Then
demo.ShowMessage(Me, Me.ResGetString("所上传的文件不是图片文件！"))
Exit Sub
End If
PS：特别提示，上传文件一定要对文件类型做判断，这里仅仅是照片的类型判断还有很多其他的，后续发布
