validcode.asp
上传用户:rblchem
上传日期:2022-04-27
资源大小:1941k
文件大小:7k
- <!-- #include file="../INCLUDE/head.asp" -->
- <% 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(Request.QueryString("name")),CInt(Request.QueryString("id")),1))
- Response.End
- %>