":|RB||Š3èN.%ēL,[RGS:báG}h>RBqRL2XYLmB@Ijb .IIbLOc~7c@9H0-Бrzfd0y}imr}hBH99aH x9%GJpzF\ȩ`5I42(Q&+ '֘Q1r(4WC rZovW 1($1UC2bMdגqc5n0'=XŴu'^1UY# dR9犒m[AIJ/%A=RSWS8ph֊X>VuX< bHȥI°'$?}*)"Q#9zHjTO>7{P]Z1nBz ~gVc "Fy~cWݣ䄚Q84PksŮ;mO+nt'> <#ɧ|pȮ$(x*k064aOB?\lv%[p1ښ}=sQm6 T{ѪDw}DfEˀQ^{ k`YEVf ~R?YF:-7nkm#O"ņl#qݏf)4(gb5ԯ┴w. 2s֘kTIoj5.-,\q85ԑZN.Cm5.eeIT$!(7%$d`8=G5jOdp k_j@7Q0ϑՏs9RB\sRL+HO8gbs_ dv6 B⚊ga Y+exn%1zQwڣr‘cp~°'hQcU"B>i-ky"CE88 b+JGR[վjC rnZoqj Zr@+4iMqrn}t\,uK=w0:t@#5[yR/LC-"ֽGKd MAS!?L.y 9_oԁT y '%:%#I9At%pA(@Ml1lؐ1ADie<e䉔c̣u>{?|*].v2z6l{#)T tV `i^" =pW,lO͔d$I˻9+7Vfesc c1cӸj͜j< 018^CCӦmO擌#ȥ'#yCBx5b]>m[h4w #pW<#۽fXiwzްZ| ̛I?@+nN}mcuUt<#9ךh9y/4j_3)&{(_6sokqqyNpw!϶E[WV֣gw.>a)fh7?(x^sk{W5qÀRV drPRtFMpWw2-zqg=GeO iSXdյMyRt+i>8׎k)yCHOUj\ZDWd@HϹllesCŨin <ژz׎;X{p]ެB;2~g۵d=S"锬!ArI?J˰g" 0>Z`h3'߮+kH񦹤XOie0A"/^zW*7v(y?ѿy(/潚dʩxkP ȼCjj$).~aXKWY#~c>٭ ]e[>aH\nR=ǷnKAVEFϙjlmu_uj3c?'$_Û2{~u-̚5,[}QX3xF2sBq*u; [^:yJa =>Һ9?6Ny=}EG Ž'8\/dθC Ce;{`sZp >Kyj:|f<#rLIgbiap Z1=NŒx]N#ɰ ,v㌏n hyzne1/+sQ&I*9\=(1UK$ޭjQ΍$d_{9KwȆiZYjŠ0Ru-=#隇>@?ꓞT٨ 'nSۊֆA.isGjaݪ'Zo(i̪_di!=>ڵ8oV=q:bZ JFi=h` PRYR vYEDu>!Gkxzu\wr;db8=DuhjlKu (?4uN!~F8hV0U\``mL [2ZXɫWR-cUޓ ~p)p89 ciNSQzS;I94J{4sKh L@ZwnN9<ҖL&8ry7VqHzP7w;^>`sһ>$F<5=!U<9x (C\@ozxkS<ژY͜V-{#zc"*?n{?Wdv!Jc{"F;^hL a@rj,4Ӧ*jd=THDc*Jo#֫ڀdA9=0:Rg4ٗG ΄U< =i' ToiXm$]ӉIG4ݫI#zgQ!OLE,1ab¿̓l=xlc5' ޘ\Dv 회IB =N(\8m}Qw?XeIZoʐsCz*TQ=tZL)E 16=w;I^:*i< zŘ8*iQבޠBp*@s}h Ӛ9wd!`n\Iq4+z21^ח՝Q9¢+t5mS8$Ujأ3C;-gcH?FҖyIEØd nq2Hғ8zp]M)帥vA<4d8yG?.rZjyҩҨ*[=? HX}Ⱥ i^J*'Go9Eѹ~J@,J4[9TqW딓~OE!E \an W #>X8-R6KZ1?Z/ zͣ1"R'2RBjW$uL#'>ܚ@qi0I=i fA/,܂})vgz Kqc8<Ӱp0sQ' .B9zj ݓ?i=G '׊Lh#4GJy)aO#mUN;T.nHǸ=hS L+AN@9tlx#(#8p ԊPB3[|8u(1K!s7S1Nh]C;{[|ܚ۽#6A+BE$P Hޔt:Ӕg>昹 0ԧ(^ *=)Bנ8 ~('1Q2}i&rj`Jqңb p֚0Mc?C@''@2sV9 ڃ )n>yTt&;Ԍz+ ~u.yqƥQ\$tOZ˜ "ӁJw 8`zd>IRMN>!Aj7oϩyh`$韭F qS1`}}j->4Z\R PϰfIFҫM5Pgz'44`p.EioHT#,ȒA+Msǐڌ'''WQqkC$9ɦgU16 ,8 bfUGcҢMNˎҢe0?:LdhF*±u #9O 9i'?FSTG? 21N1GK{s)=&H穠w"dg֐ `H2[A f``14吜zԷ2,*}Cf`@X$V>\'zRFIӊ /=iўhbs1N$GjaQMp\ zpI C=epqbr=ONqMeP H_8™!6'1\avҕT:={qނ~`;{v1$ ~4 $~t@Ԁ ҋghfqu㊓h^OZ2?JEFnGJQ 4@,F/9h* u@nP֕S;QT;wNW#X3F~o$;38;l>ZcsϷZ2ݻxԍOU@85hTcHLE<ڢ @&I<z)[3pxӭkng6wC۷`Ջ| w5]D9L{s fd`pO)t #0(MqrjA=;h"tڜ(%qN"nRqҋ@u|zej37p…u߆~,՚]jf\]KĀ*#>S[8F㯭5BsTtg<ӆp{֠iO"E\ a@8cLr> {Sw0I3h>ԑz֛2:1J;SUH!ӯ5 w.=j;<CP1*Vr\bc$tC+STG+*IQ3!)9)+ cF)0{S9QU8£ǑNĐg]¿z& [f^ *ы2?s]*i^;dbGBpK s?O6DZE ǨaᯅS%TnJ9M}msqH~rj&#80HQLF4@cr=n pF 0g',z%.W=+M⏍m4;7<-..\em矦rEp3vm./_ٟ.O 8KҜw,~| I;xI]& MUqvwr3ctlȗ$I99_2qҾ?_촍JQn5]6RO9+z'*m TZ +MH Ϡ2N=L& Xg]6/S\P!H'FFpO7:bƁf$F g@<Olb#~}(Z@rqzRP1SSQd<JXTrNO5lt L 2i8(9ZFsH@SMié* ?*7`{Ԓ8H$zqqz%}!Q5ruE^*nf>rص01֯*94E+ #Z+lUE6gX]\"5XrIcOڥnju+wv|d2~#z}noJ} կohi4ɒS?$$b5wv{IYXm9!8%f,~E 9ϯfNYzN?5jKr>91Z4I Wo-w j\f"A*?~~Ff{c(ܸ-/CcR؊X䏀7ýAc*ݤ{=L 2c2 J<*N LTR$As2V-*is*CJI5M2V%V=I*x$G6D#<Ƶ al d}#"Zp RۀdjN-kz3MzvL@#ҩܨw59t9j< 85j|E_i,%-^!hQJ>c-|)?<;q5~T*60Ul3W@@,ǓE"ݗ9R9zbgZhp:j,@^=d.MTQލ#@|ܸqJd=jN261Ne'v=ɞTo=3J\k<[z ElOQA ;C-$>Ƹ$ci"ORM29E|BIצMH-bP~bҘmleY$@><(`2 9`IPsSVH  w3-lqFF:zOSc+:cQb4>-qGCB4gڞT(8 o8SC$x~ 1Ч~LRyjF8 w\qR8Ml[,jQj:AdI(8ҜUw@%|HӮil'/ Ff'Cvί/ë0Ҭ&2&@Z0c]KXവEjq+?g/-w}?aD>erO|UǵBuܔ^h64W=ߑdu:O)|uqq$p+Oc%Rmb$tOܵ5'?5Gd}i~ ԗuM SKfFf N}qC^j[Qdg)9;<)ʇ2O .?ǨjV'_z&F#\IF3Ӱ\IzTLuL2}A&'( Kz`Ӽ؎['sG- gm0Дm!/^SVWӾ=:Pquж+Hsǭ<۩ʉ} MTpGZWCAyb ~t,4{`3|;N}#3 0g' J,3+;J&#kGllݿ.A89+6z4cV}Y]$II*CZ Բ)> ndOYGTصqWvNjx_ !/<2'Uxe渻& :!3whmYO^nZ5KxqPK,Ćs^w~x[YĶ|qإ+N\ kh[̱ ~F6dUoB+쫿z |*)A|٩x.Dzǯ\wb쏋ܳzdv_y2~U{IR2::MGP{g۵!%O'<֏9[&A15xr!ΑF,v %oB)Qܯ9r£s][''8pWLy)>҃j.29QM'ߥUk<䟩JH~:z8$PQ~n2 df #i܎s d>ܚh$g&pHQzzR}c}hCZP3jPqSsD;CN)pA'ib$TU{H.&y[`R3}+NRFqv= 6JcIs:i\.>?Ϊr$Đj0|_q} {IP?1Ug?lc\޹ki{YHA#Zu#dBI~+.Hqi(S>=3Q7Z^>Tr0 ?>~Wjf_R; kzhn.trt?򊲅d@Gm*(Ɵ@c4G=GSFnkWgόRI1VTs5\LI ^F(#V<ӊkD3Et'8]g~ P2h;i:4G={R7Lǩ8鎂u['QF)FOOF;8ޔ\wFrzSCh ~wS7 }h10Z@.O wF;4*1Jb\r1  'ޘe2A'Wh<7QҜ@ZW`XX7cïʫwNX[O@/拠=+D/zwb v ===>_$eC{ݤDT`N^yrqw_0zvĺM5י3āC&W<ds\}JW:}b)f1=ڹC0$tG‹8jiVnxy>TZ}}>˞8H>Q>hAqN0p8ܣZAsxAbsm)B nGcϡ dzE ҫ}F*zOj.8_HD͍e'#an ڕ~TBINߧ4HdvxMi s9HC@Fz FV܀٤LryʜzRl &هgdzUK:]']!9ַ<g-tąC09PjśakKZc:Ƨm C&gܐN pHE}jـ^C.-Z3f~R<>:}z4jZ 3)VEVꢺ;3Eeo 9@i6nGg=kݹ<{Pb89_+ENaHFsEPp?:` ]ǩ >4=zRq@ z:iG$Qy!F&G@Oj@*HDC8Jz(': .SLDeBoʘ9>*ya# 9' e>#ڥlmr{"</F{SG:09 w4LSx<Ըˌ?)<(Ny<[MFI>Զ1 +MU#'JHqJĶ1֤cv} (Ny=h#Rc$B,A u4NLR V0F= { u+?4pGHGcҀHqJEJJNI={Q98:R =sF[F?8HH$~Ty׹401u'0[<';Kf$Hk |6ޖJs洆住kkϷ~75LwN@ƳJO;{P ]#=EK?JM$* nAW_) ~viaLjŜ P}I_}'힚K}8N{(Ս5(s*T0{(98ڤZPp:S ΨB7 ?r`3FzS$S hШ)Kp=  `7bBaq$ӋppO\@B sڛ =1;iL=*D c=b,Gˊx O;h)zSc&9cr0Zb^zt!R cQ~)2G\NϽ.=irZ*Ǧ)ȣ#Q=)>'&Ɓw4\y$>3=z԰;?$9ٍO&+]8k'O+ ye#N^{ GzҜRǡrk:f{ k"06g.}Ry|>^6ΡDEc_Y[2~73Mx ŠH>B}75? :Ql&SLZnxVuЫFqMk\ȥJwp ~j.T~&8';&ݴ{7h =j6[= &$8$\ T^vOҋ4]8R\x*P$q<%@codepage="65001"%> <% Option Explicit 'Session.CodePage = 65001 'Response.Charset = "UTF-8" Response.Expires = -1 Response.AddHeader "Pragma", "no-cache" Response.AddHeader "cache-ctrol", "no-cache" Dim VC, Code Randomize Set VC = New NetRube_VerifyCode With VC Code = Int(Rnd * 9000 + 1000) Session("CheckCode") = ""&Code .BGroundColor = "#F6FBFF" ' ͼƬɫ .FGroundColor = "#666666" ' ǰıɫ .VerifyCode Code, false 'False ' ֤룬ڶΪǷʾɫı .Noises 350, true 'ӵ㣬һΪӵڶΪǷʾɫӵ .Write ' ͼƬ End With Set VC = Nothing Class NetRube_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) GlobalColorTable(7) = RGB(255, 0, 255) ReDim LocalColorTable(0) LocalColorTableSize = 0 LocalColorTableFlag = False ColorResolution = 7 Bits = 7 CodeSize = 7 BGroundColorIndex = 0 FGroundColorIndex = 1 TransparentColorIndex = 0 UseTransparency = False LeftPosition = 0 TopPosition = 0 Width_ = 20 Height_ = 20 Clear PixelAspectRatio = 0 SortFlag = False InterlaceFlag = False Seperator = Asc(",") GraphicControl = Asc("!") EndOfImage = Asc(";") Comment = "" Reserved = 0 Set Font = Server.CreateObject("Scripting.Dictionary") Letter(0) = "00000000000000" Letter(1) = "00001111100000" Letter(2) = "00011111110000" Letter(3) = "00111000111000" Letter(4) = "00110000011100" Letter(5) = "01110000001100" Letter(6) = "01100000001110" Letter(7) = "01100000001110" Letter(8) = "11100000001110" Letter(9) = "11000000001110" Letter(10) = "11000000001110" Letter(11) = "11100000001110" Letter(12) = "11100000001100" Letter(13) = "11100000001100" Letter(14) = "01100000001100" Letter(15) = "01110000011100" Letter(15) = "00111000011000" Letter(16) = "00011111110000" Letter(17) = "00001111100000" Letter(18) = "00000000000000" Font.Add "0", Letter Letter(0) = "00000000000000" Letter(1) = "00000001110000" Letter(2) = "00000001110000" Letter(3) = "00000011100000" Letter(4) = "00000011000000" Letter(5) = "00000011000000" Letter(6) = "00000011000000" Letter(7) = "00000111000000" Letter(8) = "00000111000000" Letter(9) = "00000111000000" Letter(10) = "00000110000000" Letter(11) = "00000110000000" Letter(12) = "00000110000000" Letter(13) = "00000110000000" Letter(14) = "00000110000000" Letter(15) = "00000110000000" Letter(15) = "00000110000000" Letter(16) = "00000110000000" Letter(17) = "00000010000000" Letter(18) = "00000000000000" Font.Add "1", Letter Letter(0) = "00000000000000" Letter(1) = "00001111110000" Letter(2) = "00011111111000" Letter(3) = "00111000011100" Letter(4) = "01110000011100" Letter(5) = "01110000011000" Letter(6) = "01100000011000" Letter(7) = "00000000111000" Letter(8) = "00000001110000" Letter(9) = "00000001110000" Letter(10) = "00000011000000" Letter(11) = "00000111000000" Letter(12) = "00001110000000" Letter(13) = "00011000000000" Letter(14) = "00011000000000" Letter(15) = "00110000011100" Letter(16) = "01101111111100" Letter(17) = "01111111111110" Letter(18) = "01111100000000" Letter(19) = "00000000000000" Font.Add "2", Letter Letter(0) = "00000000000000" Letter(1) = "00001111111000" Letter(2) = "00111111111000" Letter(3) = "01110000111100" Letter(4) = "01100000011000" Letter(5) = "01000000111000" Letter(6) = "00000000111000" Letter(7) = "00000001110000" Letter(8) = "00000011000000" Letter(9) = "00000111110000" Letter(10) = "00000100111000" Letter(11) = "00000000011100" Letter(12) = "00000000011100" Letter(13) = "00000000011100" Letter(14) = "00000000011100" Letter(15) = "00000000011000" Letter(16) = "11100000111000" Letter(17) = "11111111110000" Letter(18) = "01111111100000" Letter(19) = "00000000000000" Font.Add "3", Letter Letter(0) = "00000000000000" Letter(1) = "00000000111000" Letter(2) = "00000001111000" Letter(3) = "00000011100000" Letter(4) = "00000111011100" Letter(5) = "00001110011100" Letter(6) = "00001100011000" Letter(7) = "00011000111000" Letter(8) = "00111000110000" Letter(9) = "01110000110000" Letter(10) = "01100000110000" Letter(11) = "01100000110000" Letter(12) = "11000111111110" Letter(13) = "11111111111100" Letter(14) = "11111111100000" Letter(15) = "11100001100000" Letter(16) = "00000001110000" Letter(17) = "00000000110000" Letter(18) = "00000000110000" Letter(19) = "00000000100000" Font.Add "4", Letter Letter(0) = "00000000000000" Letter(1) = "00001100000100" Letter(2) = "00011111111110" Letter(3) = "00011111111100" Letter(4) = "00011110000000" Letter(5) = "00011000000000" Letter(6) = "00111000000000" Letter(7) = "00111000000000" Letter(8) = "00111111110000" Letter(9) = "00111111111000" Letter(10) = "00000000011000" Letter(11) = "00000000011000" Letter(12) = "00000000011000" Letter(13) = "00000000011000" Letter(14) = "00000000011000" Letter(15) = "00000000011000" Letter(16) = "00000001111000" Letter(17) = "01111111110000" Letter(18) = "00111111000000" Letter(19) = "00000000100000" Font.Add "5", Letter Letter(0) = "00000000000000" Letter(1) = "00000011110000" Letter(2) = "00000111100000" Letter(3) = "00001110000000" Letter(4) = "00011100000000" Letter(5) = "00111000000000" Letter(6) = "00110000000000" Letter(7) = "00110000000000" Letter(8) = "01111111110000" Letter(9) = "01111111111000" Letter(10) = "01110000011100" Letter(11) = "01100000001100" Letter(12) = "01100000001100" Letter(13) = "01100000001100" Letter(14) = "01100000001100" Letter(15) = "01110000011100" Letter(16) = "00110000011100" Letter(17) = "00111111111000" Letter(18) = "00011111110000" Letter(19) = "00000000000000" Font.Add "6", Letter Letter(0) = "00000000000000" Letter(1) = "00100111111110" Letter(2) = "01111111111100" Letter(3) = "01111110011100" Letter(4) = "00000000011000" Letter(5) = "00000000111000" Letter(6) = "00000000110000" Letter(7) = "00000000110000" Letter(8) = "00000000110000" Letter(9) = "00000001110000" Letter(10) = "00000001100000" Letter(11) = "00000001100000" Letter(12) = "00000001100000" Letter(13) = "00000001100000" Letter(14) = "00000011100000" Letter(15) = "00000011100000" Letter(16) = "00000011100000" Letter(17) = "00000001000000" Letter(18) = "00000001000000" Letter(19) = "00000000000000" Font.Add "7", Letter Letter(0) = "00000000000000" Letter(1) = "00001111110000" Letter(2) = "00011111111000" Letter(3) = "00111000011000" Letter(4) = "00110000011000" Letter(5) = "01110000011100" Letter(6) = "01110000011000" Letter(7) = "00110000011000" Letter(8) = "00111101111000" Letter(9) = "00011111111000" Letter(10) = "00111000111100" Letter(11) = "01110000001100" Letter(12) = "01110000001100" Letter(13) = "01100000001110" Letter(14) = "01100000001100" Letter(15) = "01100000001100" Letter(16) = "01110000011100" Letter(17) = "00111111111100" Letter(18) = "00011111110000" Letter(19) = "00000000000000" Font.Add "8", Letter Letter(0) = "00000000000000" Letter(1) = "00011111110000" Letter(2) = "00111111111000" Letter(3) = "01110000111000" Letter(4) = "01110000011100" Letter(5) = "01100000001100" Letter(6) = "01100000001100" Letter(7) = "01100000001100" Letter(8) = "01100000001100" Letter(9) = "01110000011100" Letter(10) = "00111111111100" Letter(11) = "00011111111100" Letter(12) = "00000000011000" Letter(13) = "00000000011000" Letter(14) = "00000000111000" Letter(15) = "00000001110000" Letter(16) = "00000011100000" Letter(17) = "00000111000000" Letter(18) = "00011110000000" Letter(19) = "00000000000000" Font.Add "9", Letter End Sub Private Sub Class_Terminate() Font.RemoveAll Set Font = Nothing End Sub Public Property Get Width() Width = Width_ End Property Public Property Get Height() Height = Height_ End Property Public Property Get Version() Version = "NetRube VerifyCode Class 1.0 Build 20041225" End Property Public Property Let BGroundColor(ByVal Color) GlobalCo