随机生成验证码的一个演示升级版+++ - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → 随机生成验证码的一个演示升级版+++

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 2134 人关注过本帖， 2 人收藏

标题：随机生成验证码的一个演示升级版+++

只看楼主加入收藏

foxfans

等　级：贵宾
威　望：15
帖　子：113
专家分：324
注　册：2021-10-23

第 11 楼

得分:20

回复 7楼 sam_jiang

https:// 其实能打开，要多刷新几次，或用DL

GDIPlusX-master.zip (815.62 KB)

2022-10-25 20:51

sam_jiang

等　级：贵宾
威　望：14
帖　子：789
专家分：1165
注　册：2021-10-13

第 12 楼

得分:0

回复 11楼 foxfans

thank you

2022-10-25 21:24

sam_jiang

等　级：贵宾
威　望：14
帖　子：789
专家分：1165
注　册：2021-10-13

第 13 楼

得分:0

回复 11楼 foxfans

win7系统下能正常工作吗？我怎么没法运行，没有报错，但是form没有

图片附件: 游客没有浏览图片的权限，请登录或注册

2022-10-29 15:42

sam_jiang

等　级：贵宾
威　望：14
帖　子：789
专家分：1165
注　册：2021-10-13

第 14 楼

得分:0

回复 6楼 easyppt

之前的代码只是大写字母和数字，现在上传有小写字母的。。。

程序代码：

PARAMETERS tnlength 
Rand(-1)
lctext = ''
i = 0
Do While i < tnlength
    kb = 48 + Rand() * 80
    If kb <= 57 And kb >= 48 Or kb <= 122 And kb >= 97 Or kb <= 90 And kb >= 65
        i = i + 1
        lctext = lctext + Chr(kb)
    Endif
Enddo
RETURN lctext

2022-10-29 15:48

快速回复：随机生成验证码的一个演示升级版+++