ASP 출력 BMP
[2005-03-0612 : 04 : 25 | 저자 : FlashSoft]
글꼴 크기 : 큰 | 중간 | 작은
<%
Callcom_CreatValidCode ( "ValidCode")
subcom_creatvalidcode (PSN)
'저자 : Layen
'QQ : 84815733
'이메일 : [email protected]
'캐싱 없음
응답 .expires = -9999
Response.addheader "Pragma", "No-Cache"
response.addheader "Cache-Ctrol", "No-Cache"
응답 .contentType = "image/bmp"
무작위 화
디미, II, III
constcodds = 8 '기타 반점이 나타날 확률
constcamount = 36'number of 텍스트
constccode = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
'색상 데이터 (캐릭터, 배경)
Dimvcolordata (1)
vcolordata (0) = chrb (0) & chrb (0) & chrb (0) 'blue 0, green 0, red 0 (검은 색)
vcolordata (1) = chrb (250) & chrb (236) & chrb (211) 'blue 250, green 236, red 211 (연한 파란색)
'무작위로 생성 된 문자
Dimvcode (4), vcodes
fori = 0to3
vcode (i) = int (rnd*camount)
vcodes = vcodes & mid (ccode, vcode (i) +1,1)
다음
세션 (PSN) = vcodes의 기록에 대한 기록
'문자 데이터
DimvnumberData (35)
vNumberData(0)="111000011111011110111101111011110100101111101001011111010010111110100101111101110111011110111101111011110111101111000111111110111110000111"
vNumberData(1)="111101111111100011111111111111111111011111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111100000111"
vNumberData(2)="1110000111110111101111011110111111111011111111011111111011111111011111111011111111011110111100000011"
VnumberData (3) = "11100001111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111100111111111111111111111111111111111111111111111111111111111111111111100111" "
vNumberData(4)="111111111111111101111111110111111101111111011111110111111101111111011111101111110000011111111111111111111000011"
vnumberData (5) = "1100000011111111111111111111111111111111111111111111111111111111111111111111111111110011111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111 느음 추시.
vNumberData(6)="11110001111110111110111111111111111101111111110111110111110111110111110111110111110111110111110111110111110111110111110111110111110111110111110000111"
VnumberData (7) = "11000000111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111음 추출 추정은" "
vNumberData(8)="11100001111101111011110111101111011110111101111011110111100011111110111101111011111011110111110111110111110111110111110111110111110111110111110000111"
vnumberData (9) = "11100011111101111111111111111111111111111111111001111111111111111111111111111111100111111111111111111111111111111111111111111111111111111111111111111111111111111111는지까지는"
vnumberData (10) = "111101111111111111111111111111111111111111111111111111111111111111111100111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111는지 추구.
vnumberData (11) = "1000000011111110111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111" "