发送数据
HttpClient可以直接将字符型数据发送到服务器,只需将其Content属性设为要发送的数据即可。
一个例子
1、在服务端项目的HttpRequest事件中设置代码:
Select
Case e.Path
Case "test.htm"
If e.PlainText
> "" Then
e.WriteString("服务器收到以下数据:"
& vbcrlf
& e.PlainText)
Else
e.WriteString("服务器未收到数据")
End
If
End
Select
2、在客户端项目的命令窗口执行下面的代码,会提示服务器收到的数据:
Dim
hc As
New HttpClient("http://127.0.0.1/test.htm")
hc.Timeout
= 5
'设置超时为5秒
hc.Content
= "我是Foxtable"
Dim
ret As
String = hc.GetData()
MessageBox.Show(ret)
提示HttpRequest会将收到的纯文本数据保存在e参数PlainText中。