蓝雨 发表于 2008-7-10 12:06:38

伪造gif文件的处理

修改Upload_Class.asp



查找

    FileName = FormatName(FileExt,File.FileName)
    FileType = CheckFiletype(FileExt)

改为

    FileType = CheckFiletype(FileExt)
                If FileType = 1 And (File.FileWidth <= 0 Or File.FileHeight <= 0) Then
                  ErrCodes = 5
                  Exit Sub
                End If
                FileName = FormatName(FileExt,File.FileName)
共3处



查找

   FileName = FormatName(FileExt,FileName)
   FileType = CheckFiletype(FileExt)


改为

**** Hidden Message *****
页: [1] 2
查看完整版本: 伪造gif文件的处理