求……防垃圾信息的验证码!!!

xiaocheng517 2008-12-02 07:08:04

求……防垃圾信息的验证码!!!

普通验证码不行！~不起作用。。。

...全文

129 9 打赏收藏转发到动态举报

写回复

用AI写文章

9 条回复

切换为时间正序

请发表友善的回复…

发表回复

xiaocheng517 2008-12-03

打赏
举报

恩，我感觉是
<!DOCTYPE HTML PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
这个的问题！

zjzb0409 2008-12-03

打赏
举报

给分吧哥们。。。。。。。。。。。。。。。。。。。。哈哈 O(∩_∩)O哈哈~

zjzb0409 2008-12-03

打赏
举报

我看也好用啊。。。。。。。。。。。。

zjzb0409 2008-12-03

打赏
举报

本地好用虚拟主机不好用？？一般来说本地调试成功传上去是肯定好用的啊具体的也不清楚你看看上传的功能文件的大小是否和本地的一致，你应该好好检查下应该是没问题的

xiaocheng517 2008-12-03

打赏
举报

[Quote=引用 3 楼 zjzb0409 的回复:]

asp汉字验证程序不需要组件但是需要10个积分如果积分不够
http://download.csdn.net/source/217106

上边2个都不错。。
[/Quote]
我用的这个!~

xiaocheng517 2008-12-03

打赏
举报

我用的是你给我的第一个！
在本地使用可以没有问题，但是放在虚拟主机上就不行了。。。
帮我看一下吧？这是怎么回事？
http://www.qdcyxx.com/addxinxi.asp?cnmai=free
这个页面我使用了！~

zjzb0409 2008-12-02

打赏
举报

asp汉字验证程序不需要组件但是需要10个积分如果积分不够
http://download.csdn.net/source/217106

或者用 asp中文数字验证也可以达到放垃圾信息的目的。。
http://www.aspxhome.com/article/uploadpic/20079/26/2007926142213841.rar

上边2个都不错。。

yanniu008 2008-12-02

打赏
举报



<%

'生成安全码的函数

function make_randomize(max_len,w_n) 'max_len 生成长度，w_n：0 可能包含字母，1：只为数字

randomize

for intcounter=1 to max_len

whatnext=int((1-0+1)*rnd+w_n)

if whatnext=0 then

upper=122

lower=97

else

upper=57

lower=48

end if

strnewpass=strnewpass & chr(int((upper-lower+1)*rnd)+lower)

next

make_randomize=strnewpass

end function

'safecode=make_randomize(4,0)

'response.Write(safecode)

%>

<%random_num=make_randomize(4,0) '生成4位数字的安全码

session("random_num")=random_num '为什么调用session，没有session的安全码是完全没有意义的。呵呵

Set Jpeg = Server.createObject("Persits.Jpeg") '调用组件

Jpeg.Open Server.MapPath("1.jpg") '打开准备的图片

Jpeg.Canvas.Font.Color = &H006699

Jpeg.Canvas.Font.Family = "Arial Black"

Jpeg.Canvas.Font.Bold = false

Jpeg.Canvas.PrintText 0, -2, random_num

jpeg.save Server.MapPath("random_index.jpg") '保存

%> <img src="random_index.jpg" border="0" align="absmiddle">