建议狐狸爸爸做个短信验证的完整例子（手机版，PC版） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 建议狐狸爸爸做个短信验证的完整例子（手机版，PC版）

共有3848人关注过本帖树形打印复制链接主题：建议狐狸爸爸做个短信验证的完整例子（手机版，PC版）

刘林

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1936 积分：14844 威望：0 精华：0 注册：2016/4/28 9:58:00

Post By：2019/12/26 20:24:00 [只看该作者]

Dim result As String = hc.GetData()

Dim jo As JObject = Jobject.Parse(result)

If jo("code")="OK" Then

messagebox.show("验证码短信已发送至手机,请及时输入验证码并确认验证")

Else

messagebox.show(jo("Message"))

End If

请问发送成功了显示的对话是OK,而不是"验证码短信已发送至手机,请及时输入验证码并确认验证"

有点蓝

小大 12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：105953 积分：538840 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/12/27 8:48:00 [只看该作者]

Dim result As String = hc.GetData()

msgbox(result) 这里显示什么内容？自己核对

错误码定义

错误码	错误信息	描述
OK	OK	正常发送
101	101	手机号码错误
102	102	验证码内容过长
105	105	模板编号错误
isv.SMS_SIGNATURE_ILLEGAL	见描述	短信签名不合法
isv.INVALID_PARAMETERS	见描述	参数异常
isp.SYSTEM_ERROR	见描述	系统错误
isv.TEMPLATE_MISSING_PARAMETERS	见描述	模板缺少变量
isv.BUSINESS_LIMIT_CONTROL	见描述	每分钟同一手机多次发送
isv.BLACK_KEY_CONTROL_LIMIT	见描述	黑名单管控
1009	短信总长度超过70	短信总长度超过70

[此贴子已经被作者于2019/12/27 8:48:11编辑过]

刘林

小大 13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1936 积分：14844 威望：0 精华：0 注册：2016/4/28 9:58:00

Post By：2019/12/28 11:38:00 [只看该作者]

yzm = Rand.Next(1000, 9999)

Dim phone As String = StrToNarrow(e.Form.Controls("sjhm").text)

Dim url As String

Dim hc As New HttpClient("https://fesms.market.alicloudapi.com/sms/?code=" & yzm & "&ph&skin=1&sign=175622")

hc.Headers.Add("Authorization","APPCODE" & " " & "5b33f5a0475d45df9ba68479b11085f3")

Dim result As String = hc.GetData()

Dim jo As JObject = Jobject.Parse(result)

If jo("Message")="OK" Then

e.Sender.Enabled=False

e.Form.TimerEnabled = True

messagebox.show("验证码短信已发送至手机,请及时输入验证码并确认验证")

Else

messagebox.show(jo("Message"))

End If

请问老师，在有的电脑上不管什么电话号码都出现，手机收不到短信

The remote name could not be resolved: 'fesms.market.alicloudapi.com'

但在有的电脑上电话号码都可以，怎么办？

有点蓝

小大 14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：105953 积分：538840 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/12/28 12:02:00 [只看该作者]

提示是找不到这个域名“fesms.market.alicloudapi.com”，这种问题基本和程序没有关系，就是对方服务的问题。

刘林

小大 15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1936 积分：14844 威望：0 精华：0 注册：2016/4/28 9:58:00

Post By：2019/12/28 12:12:00 [只看该作者]

老师，这是同一项目程序，同一电话号在有的电脑上出现的问题哒，如果说是对方服务的问题，为什么在有的电脑上不出这问题

有点蓝

小大 16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：105953 积分：538840 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/12/28 13:25:00 [只看该作者]

这个我也不理解。https://www.baidu.com/baidu?word=The%20remote%20name%20could%20not%20be%20resolved

这种提示很明显就是网络的问题。可能客户端电脑有什么限制，把防火墙、杀毒软件都停掉，或者卸载掉试试。网络是不是有代理之类的，有些校园网网络可能要通过代理才能上网。

同一台电脑换个网络试试，比如通过WiFi连接手机热点测试

刘林

小大 17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1936 积分：14844 威望：0 精华：0 注册：2016/4/28 9:58:00

Post By：2019/12/28 13:30:00 [只看该作者]

我问了服务商回答尊敬的客户，您好，是域名无法解析，另外你是否设置了默认代理？跟您电脑上网的代理有关。

我在网上找了处理办法cmd >ipconfig/flushdns

测试没有上面问题了，但又出现这个错是什么意思，怎么办？

The underlying connection was closed: An unexpected error occurred on a send.
Received an unexpected EOF or 0 bytes from the transport stream.
Error reading JObject from JsonReader. Path '', line 0, position 0.