老师,我这个是发送联通短信的,没有发送成功但是又没有错误提示。请帮我看看,是哪里的问题?谢谢!
Dim a As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim b As WinForm.TextBox = e.Form.Controls("TextBox2")
Dim c As WinForm.TextBox = e.Form.Controls("TextBox3")
Dim d As WinForm.TextBox = e.Form.Controls("TextBox4")
Dim hc As New HttpClient(CStr(a.Value))
Dim jo As New JObject
jo("mobiles") = CStr(b.Value)
jo("message") = CStr(c.Value)
jo("sysid") = CStr(d.Value)
Dim str As String = "?mobiles=" & jo("mobiles").ToString() & "&message=" & jo("message").ToString() & "&sysid=" & jo("sysid").ToString()
hc.Content = jo.ToString
Dim ret As String = hc.GetData()
MessageBox.Show(ret, "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)