国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > .NET > 正文

ASP.NET(VB)寫的后臺發送短信實現代碼

2024-07-10 12:40:56
字體：大 中 小
來源：轉載
供稿：網友
代碼如下:
Dim postData As String
Dim byteArray As Byte()
Dim objWebRequest As HttpWebRequest
Dim newStream As Stream

postData = "cell=短信供應商提供信息1&enterpriseId=短信供應商提供信息2&mobile=手機號1,手機號2&message=發送數據測試。。。"
objWebRequest = WebRequest.Create("http://xxx.yyy.com.cn/SmsSend.jsp")
objWebRequest.Method = "POST"
objWebRequest.ContentType = "application/x-www-form-urlencoded"

byteArray = System.Text.Encoding.UTF8.GetBytes(postData)
objWebRequest.ContentLength = byteArray.Length
newStream = objWebRequest.GetRequestStream()
newStream.Write(byteArray, 0, byteArray.Length)
newStream.Close()

'返回數據
Dim response As HttpWebResponse
Dim sr As StreamReader
Dim textResponse As String
response = objWebRequest.GetResponse()
sr = New StreamReader(response.GetResponseStream(), System.Text.Encoding.Default)
textResponse = sr.ReadToEnd()

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 英山县| 印江| 永城市| 越西县| 新余市| 尼勒克县| 邳州市| 任丘市| 高雄县| 三河市| 田林县| 当涂县| 体育| 托克托县| 上林县| 陕西省| 宿迁市| 改则县| 高陵县| 大悟县| 温宿县| 阳城县| 保德县| 广河县| 南华县| 分宜县| 海门市| 聂荣县| 靖宇县| 乐亭县| 漳州市| 辰溪县| 中西区| 塔城市| 盐池县| 宜兰县| 宣汉县| 应用必备| 中卫市| 乐清市| 崇义县|