以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  登录短信验证怎样实现  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=191984)

--  作者:a2704g
--  发布时间:2024/5/21 13:10:00
--  登录短信验证怎样实现
登录短信验证怎样实现
--  作者:有点蓝
--  发布时间:2024/5/21 13:47:00
--  
客户端程序?还是web网页?
--  作者:a2704g
--  发布时间:2024/5/21 15:46:00
--  
客户端程序
--  作者:有点蓝
--  发布时间:2024/5/21 16:09:00
--  
打开自己设计登录窗口
1、输入手机号,查询用户表是否已经关联了手机号
2、生成一个随机值(验证码),保存到全局变量或者一个内部表中
3、调用接口发送这个验证码给上面手机号:http://www.foxtable.com/webhelp/topics/3390.htm
4、用户输入验证码
5、核对用户录入的验证码和全局变量保存的验证码
6、验证码一致则成功登录,否则提示验证码错误

--  作者:a2704g
--  发布时间:2024/5/25 21:20:00
--  
怎样做那种到时1分钟效果,一般短信验证码发出后,1分钟后重新获取的
--  作者:有点蓝
--  发布时间: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
--  发布时间: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编辑过]

--  作者:有点蓝
--  发布时间: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编辑过]