Page d'accueil>Tutoriel de programmation réseau>Tutoriel ASP

ASP implémentation du code de vérification d'addition

Auteur：Eve Cole Date de mise à jour：2025-03-16 04:00:03

Cet article présente principalement la mise en œuvre du code de vérification ASP, qui est une innovation basée sur le code de vérification d'origine, et modifie le code de vérification en fonctionnement.

Modifiez le code de vérification en une opération d'addition, par exemple, le code de vérification montre que 25 + 64 est égal? , alors l'entrée 91 peut passer la vérification.

Jetons un coup d'œil à la comparaison de rendu: code de vérification des caractères: → Code de vérification additive:

avantage:

① Par rapport aux codes de vérification des caractères purs, ce programme empêche la reconnaissance automatique de la plupart des machines publicitaires (plus de 99%). Même le code de vérification chinois peut être reconnu par certaines machines publicitaires sur le marché.

② Par rapport au code de vérification chinois, il évite les tracas de changer la méthode d'entrée lorsque les utilisateurs saisissent le nom de nom d'utilisateur, le code de vérification du mot de passe.

Remarque: Ce programme nécessite l'espace du site Web pour prendre en charge les composants et les polices ASPJPEG de Kaiyi_GB2312.

Le code est le suivant:

  1. <%
  2. Constfontcolor = & h000000'font couleur
  3. Couleur d'arrière-plan constbgcolor = & hffccch
  4. CallcreatValidCode (getCode)
  5. Sub-CreatValidCode (PSN)
  6. Dimx, jpeg
  7. Randomiser
  8. x = array (1 + int (rnd () * 9), int (rnd () * 10), 1 + int (rnd () * 9), int (rnd () * 10), 0,0, +)
  9. x (4) = x (0) * 10 + x (1)
  10. x (5) = x (2) * 10 + x (3)
  11. 'Session (PSN) = CSTR (EVAL (X (4) & X (6) & X (5)))
  12. Session (PSN) = CSTR (x (4) + x (5))
  13. Setjpeg = server.createObject (persits.jpeg)
  14. JPEG.NEW100,20, BGCOLOR
  15. Jpeg.quality = 100
  16. Avecjpeg.canvas
  17. .Font.bold = true
  18. .Font.size = 16
  19. .Font.rotation = 0
  20. .Font.family = kaiti_gb2312
  21. .Font.color = Fontcolor
  22. .PrintText4,3, CSTR (x (0))
  23. .PrintText14,3, CSTR (x (1))
  24. .PrintText26,3, x (6)
  25. .PrintText38,3, CSTR (x (2))
  26. .PrintText48,3, CSTR (x (3))
  27. .Font.rotation = 15
  28. .PrintText55,3, etc.
  29. .PrintText70,3,
  30. .PrintText85,3,?
  31. Fin
  32. 'Pas de mise en cache
  33. Response.ContentType = Image / JPEG
  34. Response.expires = -9999
  35. Réponse.addheaderpragma, sans cache
  36. Réponse.addheadercache-ctrol, sans cache
  37. Réponse.AddheadContent-Disposition, Inline; filename = vCode.jpg
  38. Jpeg.sendbinary
  39. Jpeg.close
  40. Setjpeg = rien
  41. Fin
  42. %>
?
Articles connexes