Foxtable(狐表)用户栏目专家坐堂 → 登录短信验证怎样实现


  共有428人关注过本帖树形打印复制链接

主题:登录短信验证怎样实现

帅哥哟,离线,有人找我吗?
a2704g
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:16 积分:167 威望:0 精华:0 注册:2024/5/15 16:34:00
登录短信验证怎样实现  发帖心情 Post By:2024/5/21 13:10:00 [只看该作者]

登录短信验证怎样实现

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107580 积分:547197 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/21 13:47:00 [只看该作者]

客户端程序?还是web网页?

 回到顶部
帅哥哟,离线,有人找我吗?
a2704g
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:16 积分:167 威望:0 精华:0 注册:2024/5/15 16:34:00
  发帖心情 Post By:2024/5/21 15:46:00 [只看该作者]

客户端程序

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107580 积分:547197 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/21 16:09:00 [只看该作者]

打开自己设计登录窗口
1、输入手机号,查询用户表是否已经关联了手机号
2、生成一个随机值(验证码),保存到全局变量或者一个内部表中
3、调用接口发送这个验证码给上面手机号:http://www.foxtable.com/webhelp/topics/3390.htm
4、用户输入验证码
5、核对用户录入的验证码和全局变量保存的验证码
6、验证码一致则成功登录,否则提示验证码错误

 回到顶部
帅哥哟,离线,有人找我吗?
a2704g
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:16 积分:167 威望:0 精华:0 注册:2024/5/15 16:34:00
  发帖心情 Post By:2024/5/25 21:20:00 [只看该作者]

怎样做那种到时1分钟效果,一般短信验证码发出后,1分钟后重新获取的

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107580 积分:547197 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/26 19:53:00 [只看该作者]

开启窗口计时器,到计时事件做个倒计时即可,必如

发送按钮点击事件
e.sender.enabled = false ‘禁止按钮使用
....发送短信的代码....
vars("计时") = 60
e.Form.TimerEnabled = True

计时事件
if vars("计时") > 0 then
e.Form.Controls("发送按钮").text = vars("计时") & "秒"
vars("计时") = vars("计时") - 1
else
e.Form.Controls("发送按钮").text = "再次发送"
e.Form.Controls("发送按钮").enabled = true
e.Form.TimerEnabled = false
end if

 回到顶部
帅哥哟,离线,有人找我吗?
ezilu
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:191 积分:1864 威望:0 精华:0 注册:2018/7/1 10:45:00
  发帖心情 Post By:2024/6/10 19:39:00 [只看该作者]


以下内容为程序代码:

1 Dim s As String = "mobile=13800138000&templateId=908e94ccf08b4476ba6c876d13f084ad&smsSignId=2e65b1bb3d054466b82f0c9d125465e2?m=**code**%3A12345%2C**minute**%3A5"
2
3 Dim hc As New HttpClient("http://gyytz.market.alicloudapi.com/sms/smsSend?" & s)
4
5 hc.Headers.Add("Authorization","APPCODE 7858a126750949e4a36371580f420413")
6
7 hc.Method = "POST"
8
9 Dim ret As String = hc.GetData
10
11 Output.Show(ret)
12
这一段也没说明 这个验证码 需要插在哪里呀?
蓝大大
[此贴子已经被作者于2024/6/10 19:39:37编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107580 积分:547197 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/6/10 21:49:00 [只看该作者]

红字就是

Dim s As String = "mobile=13800138000&templateId=908e94ccf08b4476ba6c876d13f084ad&smsSignId=2e65b1bb3d054466b82f0c9d125465e2?m=**code**%3A12345%2C**minute**%3A5"
[此贴子已经被作者于2024/6/10 21:49:24编辑过]

 回到顶部