<%
'--------------------------------------
'Fly38.com - VerifyCode Class
'        gif 验证码生成类
'                 原作者：NetRube
'--------------------------------------
Class Fly38_VerifyCode
        Public GlobalColorTable(), LocalColorTable()
        Public TransparentColorindex, UseTransparency
        Public GIF89a
        Public Comment

        Private FGroundColorindex, BGroundColorindex
        Private Image
        Private GlobalColorTableSize, GlobalColorTableFlag, LocalColorTableSize, LocalColorTableFlag
        Private Width_, Height_
        Private LeftPosition, TopPosition
        Private Bits, ColorResolution, CodeSize
        Private PixelAspectRatio
        Private SortFlag, InterlaceFlag
        Private Seperator, GraphicControl, EndOfImage
        Private Reserved

        Private Font
        Private Letter(19)

        Private Sub Class_Initialize()
                  Image = ""
   
                  GIF89a = False
 
                  ReDim GlobalColorTable(256)
                  GlobalColorTableSize = 7
                  GlobalColorTableFlag = True
 
                  GlobalColorTable(2) = RGB(255, 0, 0)
                  GlobalColorTable(3) = RGB(0, 255, 0)
                  GlobalColorTable(4) = RGB(0, 0, 255)
                  GlobalColorTable(5) = RGB(255, 255, 0)
                  GlobalColorTable(6) = RGB(0, 255, 255)

共24共  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 下一页