validcode.asp
上传用户:rblchem
上传日期:2022-04-27
资源大小:1941k
文件大小:7k
源码类别:

编辑器/阅读器

开发平台:

C#

  1. <!-- #include file="../INCLUDE/head.asp" -->
  2. <% On Error Resume Next %>
  3. <%
  4. Dim R
  5. Dim G
  6. Dim B
  7. R=&H33
  8. G=&H00
  9. B=&HFF
  10. Dim aryNumberData(10)
  11. 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)
  12. 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)
  13. 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)
  14. 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)
  15. 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)
  16. 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)
  17. 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)
  18. 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)
  19. 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)
  20. 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)
  21. Response.AddHeader "cache-ctrol","no-cache"
  22. Response.ContentType = "image/gif"
  23. Response.Clear
  24. Response.BinaryWrite aryNumberData(Mid(Session(Request.QueryString("name")),CInt(Request.QueryString("id")),1))
  25. Response.End
  26. %>