在蓝老师代码的基础上完善一个阿里云第三方短信实例代码。
在下面的地址申请一个免费套餐,即可测试。此地址短信平台个人、企业没有限制,均可~
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)
[此贴子已经被作者于2022/10/26 20:37:32编辑过]