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.GetDataOutput.Show(res)