我必須使用pushwoosh api向設備發送消息。我從vb.net發送它,我有一個高級帳戶。代碼工作正常,但我從服務器獲取代碼400作爲回報。有任何想法嗎?Pushwoosh,使用vb.net和json發送推送消息
我的JSON請求是這樣的:
{
'request':
{
'application':'xxxxx-xxxxx',
'auth':'xxxxx',
'notifications':[{
'send_date':'now',
'ignore_user_timezone': true,
'content':'Hallo world'
}]
}
}
VB.net代碼:
召喚:
暗淡JsonSring =「{ '請求':{ '應用':「我的app id','auth':'api key','notifications':[{'send_date':'now','ignore_user_timezone':true,'content':'Hallo world'}]}}「
Dim myUri As New Uri(「https://cp.pushwoosh.com/json/1.3/」)
昏暗數據= Encoding.UTF8.GetBytes(jsonSring)
昏暗result_post = MyFunctions.SendRequest(myUri,數據, 「應用程序/ JSON」, 「POST」)
功能:
公共共享功能sendRequest將(URI作爲開放的,jsonDataBytes爲字節(),則contentType作爲字符串,方法作爲字符串)作爲字符串
Dim req As WebRequest = WebRequest.Create(uri)
req.ContentType = contentType
req.Method = method
req.ContentLength = jsonDataBytes.Length
Dim stream = req.GetRequestStream()
stream.Write(jsonDataBytes, 0, jsonDataBytes.Length)
stream.Close()
Dim response = req.GetResponse().GetResponseStream()
Dim reader As New StreamReader(response)
Dim res = reader.ReadToEnd()
reader.Close()
response.Close()
Return res
End Function
你好。是的,這是問題所在。感謝您的回覆。 – klante