この記事は、ASPを使用して実装された検証コード機能を共有します。
次のコードを別のページCheckCode.aspに配置します
- <%
- optionexplicit
- Response.buffer = true
- callcom_creatvalidcode(validatecode)
- subcom_creatvalidcode(psn)
- 'キャッシングはありません
- Response.Expires = -9999
- Response.AddheaderPragma、No-Cache
- Response.Addheadercache-ctrol、no-cache
- Response.ContentType = Image/BMP
- ランダム化
- ディミ、II、III
- constcodds = 2'その他のスポットが現れる確率
- constcamount = 10'Number of Text
- constccode = 0123456789
- 'カラーデータ(文字、背景)
- dimvcolordata(1)
- vcolordata(0)= chrb(0)&chrb(0)&chrb(211) 'blue 0、緑0、赤0(黒)
- vcolordata(1)= chrb(255)&chrb(255)&chrb(255) 'blue 250、緑236、レッド211(ライトブルー)
- 'ランダムに生成された文字
- dimvcode(4)、vcodes
- fori = 0to3
- vcode(i)= int(rnd*camount)
- vcodes = vcodes&mid(ccode、vcode(i)+1,1)
- 次
- セッション(psn)= vcodesのレコードへのセッション
- '文字データ
- dimvnumberdata(9)
- vNumberData(0)=
- 111000011111011111111111111111111010010111101001011110100101101001011110111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111エ
- 110000111
- vNumberData(1)=
- 1111011111111010111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111ケ -
- 100000111
- vNumberData(2)=
- 111000011111011110111101111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111ネ-シュー
- 100000011
- vNumberData(3)=
- 11100001111101111111111111111111111111111111110011111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111ケ -これ
- 110000111
- vNumberData(4)=
- 1111101111111111111111110011111110111111101101111111011011111000011111111111111111111111111111111111111111111111111111111111111111111111111ケ -
- 111000011
- vNumberData(5)=
- 1100001111011111111111111111111110100011111001110111111111111111111111111101111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111エ
- 110000111
- vNumberData(6)=
- 1111000111111011101111011111111111111111110100010100111100111011111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111エ
- 110000111
- vNumberData(7)=
- 1100001111011101111101110111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111ケ -
- 111011111
- vNumberData(8)=
- 111000011111011111111111111111111111111111100001111101101111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111エ
- 110000111
- vNumberData(9)=
- 111000111111011101111111111111111111111111111111001111101011111111111111111111111111111111111110101111111111111111111111111111111111111111111111111111111111-101111111111111111111111111111110101111111111111111111111111111111111111111111111111111111111111111111111111ケ -これ
- 1100011111
- '出力画像ファイルヘッダー
- 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)
- '出力画像情報ヘッダー
- Respons.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 'はすべての行を通過しました
- forii = 0to3 'はすべての単語を渡しました
- foriii = 1to10 'はすべてのピクセルを渡しました
- 'ラインごとの出力画像データライン、単語ごと、ピクセルごとにピクセル
- ifrnd*99+1 <coddsthen 'はその他のポイントをランダムに生成します
- respons.binarywritevcolordata(0)
- それ以外
- Response.binarywritevcolordata(mid(vnumberdata(vcode(ii))、i*10+iii、1))))
- endif
- 次
- 次
- 次
- Endingub
- %>
使用する必要があるページは、次の方法で引用されています。
検証コード:src = checkcode.asp cellpadding = "0" cellpacing = "0" style = "border-collapse:collapse; border-spacing:0px; width:780px; clear:blos; padding:0px!falies ! Border-Bottom-radius:重要なもの:0px! Line-Height:1.1em:0px!垂直アライメント:ベースライン! 「>
上記はこの記事の全体的な内容です。あなたがそれを気に入っていただければ幸いです。