Artikel ini akan berbagi dengan Anda fungsi kode verifikasi yang diimplementasikan menggunakan ASP, dan itu disegarkan.
Letakkan kode berikut pada halaman checkCode.
- <%
- OptionExplicit
- Response.buffer = true
- Callcom_createValidCode (validateCode)
- Subcom_CreateValidCode (PSN)
- 'Tidak ada caching
- Response.expires = -9999
- Response.addheaderpragma, tanpa cache
- Response.addheadercache-ctrol, tanpa cache
- Response.contentType = gambar/BMP
- Mengacak
- Dimi, II, III
- Constcodds = 2'babilitas bintik -bintik lain yang muncul
- ConstCamount = 10'number of Text
- Constccode = 0123456789
- 'Data warna (karakter, latar belakang)
- Dimvcolordata (1)
- vcolordata (0) = chrb (0) & chrb (0) & chrb (211) 'biru 0, hijau 0, merah 0 (hitam)
- vcolordata (1) = chrb (255) & chrb (255) & chrb (255) 'biru 250, hijau 236, merah 211 (biru muda)
- 'Karakter yang dihasilkan secara acak
- DIMVCODE (4), VCODES
- Fori = 0to3
- vcode (i) = int (rnd*camount)
- vcodes = vcode & mid (ccode, vcode (i) +1,1)
- Berikutnya
- Sesi (psn) = rekaman vcodes ke dalam sesi
- 'Data karakter
- Dimvnumberberdata (9)
- vnumberberdata (0) =
- 1110000111110111110111111111011110100101110100101111010010111101001011110111111111111111111
- 110000111
- vnumberberdata (1) =
- 11110111111101111111111111111111111111111111111111111111111111111111111111111111111111111
- 100000111
- vnumberberdata (2) =
- 111000011111011111011111111111111111111111111111111111111111111111111111111111111111111111
- 100000011
- vnumberberdata (3) =
- 111000011111011111011111111111111111111111100111111111111111111111011111111111111111111111
- 110000111
- vnumberberdata (4) =
- 1111101111111111111111110011111110111111101111111110111111111000000001111111111111111111111
- 111000011
- vnumberberdata (5) =
- 110000001111111111111111111111101011111001111111111111111111111111111111111111111111111
- 110000111
- vnumberberdata (6) =
- 1111000111111111111111111111111111111111010111111001110111111111111111111111111111111111
- 110000111
- vnumberberdata (7) =
- 110000001111111111111110111011111111111111111111111111111111111111111111111111111111111111
- 111011111
- vnumberberdata (8) =
- 111000011111011101111111111111101111111110000111111011111111111111111111111111111111111111
- 110000111
- vnumberberdata (9) =
- 1110001111111011101111101111101110111111111111001111100010111111111011111111111111111111111111111111111111111111111111111111111111111111
- 110001111
- Header file gambar output
- Response.binarywritechrb (66) & chrb (77) & chrb (230) & chrb (4) & chrb (0) & chrb (0) & chrb (0) & chrb (0)
- & Chrb (0) & _
- Chrb (0) & chrb (0) & chrb (54) & chrb (0) & chrb (0) & chrb (0) & chrb (40) & chrb (0) & _
- Chrb (0) & chrb (0) & chrb (40) & chrb (0) & chrb (0) & chrb (0) & chrb (10) & chrb (0) & chrb (0) & _
- Chrb (0) & chrb (0) & chrb (1) & chrb (0)
- Header informasi gambar output
- Response.binarywritechrb (24) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (176)
- & Chrb (4) & _
- Chrb (0) & chrb (0) & chrb (18) & chrb (11) & chrb (0) & chrb (0) & chrb (18) & chrb (11) & _
- Chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & _
- Chrb (0) & chrb (0)
- Fori = 9to0step-1 'telah melewati semua baris
- Forii = 0to3 'telah melewati semua kata
- Foriii = 1to10 'telah melewati semua piksel
- 'Output Gambar Data Line demi Line, Word By Word, Pixel By Pixel
- IFRND*99+1 <coddsthen 'secara acak menghasilkan titik lain -lain
- Response.binarywritevcolordata (0)
- Kalau tidak
- Response.binarywritevcolordata (mid (vnumberberdata (vcode (ii)), i*10+iii, 1))
- Endif
- Berikutnya
- Berikutnya
- Berikutnya
- Endsub
- %>
Halaman yang perlu Anda gunakan dikutip dengan cara berikut:
Kode verifikasi: src = checkCode.asp cellpadding = "0" cellpacing = "0" style = "border-collapse: collapse; spasibar-batas: 0px; lebar: 780px; jelas: keduanya; padding: 0px! Penting; margin: 0px ! Border-Bottom-Left-Radius: 0px! Penting; Line-height: 1.1em! Garis besar; Vertical-Align: Baseline! Penting; ">
Di atas adalah seluruh konten artikel ini, saya harap Anda menyukainya.