腾讯云短信asp版本、阿里云短信asp版本

现在各种DEMO都不提供asp版本的内容,腾讯云提供了java,php,asp.net,python等版本。为了让使用腾讯云的短信能用asp完成发送。特编写这个asp版本的源码。有利用腾讯云短信功能的asp同行可以加我QQ:16874258 来获取源码。支付100劳务费。腾讯云据说每个月有100条短信免费使用。这应该是与阿里云短信区别的地方,如果是阿里云短信也可以找我拿asp版。
 

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
以下是使用腾讯云短信服务的 ASP 代码示例: ```asp <% Dim httpObj, sig, random, url, data, result, tpl_id, phone_number, params ' 短信应用 SDK AppID Dim appid appid = "your_appid" ' 短信应用 SDK AppKey Dim appkey appkey = "your_appkey" ' 随机数,用于生成签名 random = Int(Rnd * 999999) ' 短信模板 ID tpl_id = "your_tpl_id" ' 接收短信的手机号码 phone_number = "your_phone_number" ' 短信模板参数 params = "your_params" ' 按照 API 要求生成签名 sig = MD5("appkey=" & appkey & "&random=" & random & "&time=" & Now().ToUniversalTime().ToString("yyyyMMddHHmmss")) ' 构造请求 URL url = "https://yun.tim.qq.com/v5/tlssmssvr/sendsms?sdkappid=" & appid & "&random=" & random ' 构造请求体 data = "{ ""tel"": { ""nationcode"": ""86"", ""mobile"": """ & phone_number & """ }, ""sign"": ""your_sign"", ""tpl_id"": " & tpl_id & ", ""params"": [" & params & "], ""sig"": """ & sig & """", ""time"": " & Now().ToUniversalTime().Ticks / 10000000 - 62135596800 & ", ""extend"": """" }" ' 创建 Http 请求对象 Set httpObj = Server.CreateObject("Msxml2.ServerXMLHTTP") ' 打开异步请求 httpObj.open "POST", url, True ' 设置请求头 httpObj.setRequestHeader "Content-Type", "application/json" ' 发送请求 httpObj.send data ' 等待响应 Do While httpObj.readyState <> 4 Response.Flush() Loop ' 获取响应结果 result = httpObj.responseText ' 输出响应结果 Response.Write result ' 释放请求对象 Set httpObj = Nothing %> ``` 请注意,上述代码中的 `your_appid`、`your_appkey`、`your_tpl_id`、`your_phone_number`、`your_params` 和 `your_sign` 都需要替换为你自己的信息。另外,由于需要发送 HTTP 请求,你的 ASP 环境需要支持相关的组件和权限。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值