Foxtable(狐表)用户栏目专家坐堂 → [分享]阿里云第三方短信接口代码


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

主题:[分享]阿里云第三方短信接口代码

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


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
[分享]阿里云第三方短信接口代码  发帖心情 Post By:2021/3/18 21:45:00 [只看该作者]

在蓝老师代码的基础上完善一个阿里云第三方短信实例代码。

在下面的地址申请一个免费套餐,即可测试。此地址短信平台个人、企业没有限制,均可~

https://market.aliyun.com/products/57126001/cmapi00037415.html?spm=5176.2020520132.101.1.175772188g3m95#sku=yuncode3141500001


Dim hc As New HttpClient("http://gyytz.market.alicloudapi.com/sms/smsSend")   

hc.Headers.Add("Authorization", "APPCODE " & "63******你的AppCode*******eff8")

hc.Content Type = "application/x-www-form-urlencoded; charset=UTF-8"      ’去掉content后面的空格

hc.FormData.Add("mobile", "1*********9")   '需要发送的手机号

hc.FormData.Add("smsSignId", "2e65b1bb3d054466b82f0c9d125465e2")   '测试签名ID

hc.FormData.Add("templateId", "908e94ccf08b4476ba6c876d13f084ad")    '测试模板ID

hc.FormData.Add("param", "**code**:12345,**minute**:5")  '短信模板变量替换

Dim res As String = hc.GetData

Output.Show(res)



图片点击可在新窗口打开查看此主题相关图片如下:001.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:003.jpg
图片点击可在新窗口打开查看



[此贴子已经被作者于2022/10/26 20:37:32编辑过]

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


加好友 发短信
等级:超级版主 帖子:106158 积分:539907 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/3/18 22:01:00 [只看该作者]

Dim hc As New HttpClient("https://msg.market.alicloudapi.com/msg") 

hc.Headers.Add("Authorization","APPCODE " & "xxx请改自己xxx")

hc.ContentType = "application/x-www-form-urlencoded; charset=UTF-8"

hc.FormData.Add("message","短信内容")

hc.FormData.Add("mobile","手机号")

hc.FormData.Add("mouldno","短信模板编号")

hc.FormData.Add("title","短信标签")
Dim res as string = hc.GetData
Output.Show(res)



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


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2021/3/19 12:58:00 [只看该作者]

谢谢老师!

今天测试一下,这是什么原因?

短信客服说,把响应头和响应消息打印出来看一下,是什么意思?


图片点击可在新窗口打开查看此主题相关图片如下:截屏图片.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2021/3/19 13:02:05编辑过]

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


加好友 发短信
等级:超级版主 帖子:106158 积分:539907 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/3/19 13:41:00 [只看该作者]

试试对短信内容编码一下
hc.FormData.Add("message",UrlEncode("短信内容"))


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


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2021/3/19 14:08:00 [只看该作者]

还是一样

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


加好友 发短信
等级:超级版主 帖子:106158 积分:539907 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/3/19 14:15:00 [只看该作者]

响应头和响应消息到这些属性里找:http://www.foxtable.com/mobilehelp/topics/0163.htm

试试
Net.ServicePointManager.SecurityProtocol = Net.SecurityProtocolType.Tls11
Dim hc As New HttpClient("https://msg.market.alicloudapi.com/msg") 
……

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


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2022/10/28 8:57:00 [只看该作者]

在一楼做了个示例~

 回到顶部