'Dieser Code ist eine chinesische Zeichenfunktion, die auf der Grundlage anderer hinzugefügt wurde. Vielen Dank und vielen Dank für den Ghost Fire und den Wolfsrauch.
'Der vorherige Bildüberprüfungscode war leicht zu knacken, daher ist es schwierig, darauf zu knacken, um chinesische Zeichen zu erzeugen.
Verwendung:
Code einfügen, wobei das Bild des Verifizierung Code angezeigt werden muss <imgsrc = "code.asp">
Gleichzeitig wird die Sitzung ("PSN") automatisch generiert und die Sitzungsüberprüfung der Formulare reicht aus.
Die Codekopie lautet wie folgt:
<%
'--------------------
'Chinesischer Charakter -Bildüberprüfungscode
'Dieser Code ist eine chinesische Zeichenfunktion, die auf der Grundlage anderer hinzugefügt wird. Vielen Dank und vielen Dank für den Ghost Fire und den Wolfsrauch.
'Der vorherige Bildüberprüfungscode war leicht zu knacken, daher ist es schwierig, darauf zu knacken, um chinesische Zeichen zu erzeugen.
'Jede zusätzliche Anzahl von Störungen -> Die Kosten für die erschöpfende Methode steigen um etwa 100*100 Mal an
„Wenn die Wahrscheinlichkeit verschiedener Punkte angemessen festgelegt wird, kann dies die Richtigkeit der Softwareerkennung effektiv verringern
'--------------------
OptionExPlicit
CALLCOM_CREATVALIDCODE ("SessionName")
REM generiert das Bild des Verifizierungscodebildes
Subcom_creatvalidcode (PSN)
ConstCodelen = 4'Verification Code Ziffernnummer
ConstCodds = 4'Die Wahrscheinlichkeit, dass verschiedene Flecken erscheinen
Constdbttimes = 1 'Anzahl der Interferenzen (Sicherheitsüberlegungen, es ist am besten nicht weniger als 2)
Constcampeount = 85 'Schriftbibliotheksmenge
Constccode = "Die Sonne ist so schön, dass der Mond nicht offen ist und der Mond so schön ist, dass der Berg so schön ist, dass das Feuer so groß ist, dass das Westholz so offen ist und das 9765. Wort nur ein Fisch und Schaf ist, was sind die vier Teile des Lebens? Ai und liu "entsprechende Zeichen.
Constunitwidth = 28 'Wortbreite (um Multiples von 4 zu sein)
ConstUniteighth = 28 'Worthöhe
ConstdotsLimit = 2'upper -Grenze für jede gelöschte gültige Punkte (Vermeidung von Unauthentifizierung)
Consttrycount = 2 'Vermeiden Sie das Löschen der Anzahl der Versuche, die die Obergrenze gültiger Punkte überschreiten
'-----------
Randomisieren
Dimi, II, III
'Kein Caching
Response.expires = -9999
Response.addHeader "Pragma", "No-Cache"
Response.addHeader "Cache-Ctrol", "No-Cache"
Antwort.ContentType = "Bild/BMP"
'Farbdaten (Zeichen, Hintergrund)
Dimvcolordata (1)
vcolordata (0) = chrb (0) & chrb (0) & chrb (0) 'blau 0, grün 0, rot 0 (schwarz)
Vcolordata (1) = CHRB (211) & CHRB (255) & CHRB (250) 'Blue 250, Green 236, Rot 211 (hellblau)
'Charakterdaten (Sie können sie selbst ändern. Wenn Sie die Größe ändern, denken Sie daran, auch die vorherigen Einstellungen zu ändern).
DimvnumberData (85)
vnumberData (0) = ""