<%@ CODEPAGE=65001 %> <% '/////////////////////////////////////////////////////////////////////////////// '// Z-Blog '// 作 者: 朱煊(zx.asd) '// 版权所有: RainbowSoft Studio '// 技术支持: rainbowsoft@163.com '// 程序名称: '// 程序版本: '// 单元名称: c_validcode.asp '// 开始时间: 2005.02.18 '// 最后修改: '// 备 注: 校验码生成 '/////////////////////////////////////////////////////////////////////////////// %> <% Option Explicit %> <% On Error Resume Next %> <% Dim R Dim G Dim B R=&H33 G=&H00 B=&HFF Dim aryNumberData(10) aryNumberData(0)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H01) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H0A) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H69) & ChrB(&H10) & ChrB(&HDC) & ChrB(&HFF) & ChrB(&H5C) & ChrB(&H72) & ChrB(&H27) & ChrB(&H14) & ChrB(&H00) & ChrB(&H3B) aryNumberData(1)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H00) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H08) & ChrB(&H8C) & ChrB(&H1F) & ChrB(&H80) & ChrB(&H7A) & ChrB(&H6C) & ChrB(&H9E) & ChrB(&HD0) & ChrB(&H29) & ChrB(&H00) & ChrB(&H3B) aryNumberData(2)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H01) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H0A) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H79) & ChrB(&H01) & ChrB(&H96) & ChrB(&HCD) & ChrB(&HD6) & ChrB(&H5B) & ChrB(&HA6) & ChrB(&H00) & ChrB(&H00) & ChrB(&H3B) aryNumberData(3)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H01) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H0A) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H79) & ChrB(&H01) & ChrB(&H96) & ChrB(&H8D) & ChrB(&H9C) & ChrB(&H5A) & ChrB(&HA1) & ChrB(&H00) & ChrB(&H00) & ChrB(&H3B) aryNumberData(4)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H01) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H09) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H91) & ChrB(&HCA) & ChrB(&HBC) & ChrB(&H00) & ChrB(&H4F) & ChrB(&H93) & ChrB(&H05) & ChrB(&H00) & ChrB(&H3B) aryNumberData(5)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H01) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H0A) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H69) & ChrB(&H70) & ChrB(&H91) & ChrB(&H8C) & ChrB(&H96) & ChrB(&H6A) & ChrB(&HA1) & ChrB(&H00) & ChrB(&H00) & ChrB(&H3B) aryNumberData(6)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H00) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H0A) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H69) & ChrB(&H70) & ChrB(&H91) & ChrB(&HEC) & ChrB(&HA2) & ChrB(&H53) & ChrB(&H2D) & ChrB(&H14) & ChrB(&H00) & ChrB(&H3B) aryNumberData(7)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H01) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H09) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H79) & ChrB(&H01) & ChrB(&HDB) & ChrB(&HF6) & ChrB(&HD8) & ChrB(&H5A) & ChrB(&H05) & ChrB(&H00) & ChrB(&H3B) aryNumberData(8)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H01) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H0A) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H69) & ChrB(&H10) & ChrB(&HDC) & ChrB(&HDA) & ChrB(&HE2) & ChrB(&H73) & ChrB(&H27) & ChrB(&H14) & ChrB(&H00) & ChrB(&H3B) aryNumberData(9)=ChrB(&H47) & ChrB(&H49) & ChrB(&H46) & ChrB(&H38) & ChrB(&H39) & ChrB(&H61) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H80) & ChrB(&H00) & ChrB(&H00) & ChrB(R) & ChrB(G) & ChrB(B) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&HFF) & ChrB(&H21) & ChrB(&HF9) & ChrB(&H04) & ChrB(&H01) & ChrB(&H00) & ChrB(&H00) & ChrB(&H01) & ChrB(&H00) & ChrB(&H2C) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H00) & ChrB(&H05) & ChrB(&H00) & ChrB(&H07) & ChrB(&H00) & ChrB(&H00) & ChrB(&H02) & ChrB(&H0A) & ChrB(&H8C) & ChrB(&H0F) & ChrB(&H69) & ChrB(&H10) & ChrB(&HDC) & ChrB(&H8A) & ChrB(&H16) & ChrB(&H3C) & ChrB(&HA1) & ChrB(&H00) & ChrB(&H00) & ChrB(&H3B) Response.AddHeader "cache-ctrol","no-cache" Response.ContentType = "image/gif" Response.Clear Response.BinaryWrite aryNumberData(Mid(Session(ZC_BLOG_CLSID&Request.QueryString("name")),CInt(Request.QueryString("id")),1)) Response.End %>