主题：使用Httpclient中的FormData带参数时超时

以下内容为程序代码:

1 Dim httpURL As New System.Uri("http://xsvjz.natappvip.cc/login") '创建一个WEB地址，服务器的网址及路径
2 Dim httpReq As System.Net.HttpWebRequest = System.Net.WebRequest.Create(httpURL) '创建一个基于服务器路径的WebRequest对象，并返回一个HttpWebReauest类型的引用，赋值给httpReq变量
3 httpReq.Method = "post" '设置数据请求提交的方式为 POST
4 httpReq.ContinueTimeout = 10 '设置请求超时时间 10秒
5
6 httpReq.ServicePoint.Expect100Continue = False
7 httpReq.Expect = True
8 httpReq.C '设置请求的媒体类型
9 output.Show(httpReq.Address.ToString) '显示当前请求的IP或者域名地址信息（获取实际响应请求的 Internet 资源的统一资源标识符 (URI)。）
10
11 Dim inputdata As String = "zsh"
12 Dim postData As String = "username" + ChrW(61) + inputData
13 postData = postData & "&" & "password=zsh2021"
14 Output.Show(postdata) '以上三行将产生数据串，格式为：username=zsh&password=zsh2021
15
16 Dim encoding As New ASCIIEncoding() '表示 Unicode 字符的 ASCII 字符编码，完整定义格式为： New system.text.ASCIIEncoding()
17 Dim byte1 As Byte() = encoding.GetBytes(postData) '将一组字符编码为一个字节序列
18 Output.Show(byte1.ToString) '当前显示的结果为： System.Byte[]
19
20 httpReq.ContentLength = byte1.Length '设置提交数据请求的内容长度，等于字节序列长度
21 '这样，已经设置了httpReq提交的请求内容byte1及长度byte1.length
22
23 Dim newStream As System.IO.Stream = httpReq.GetRequestStream() '创建初始化httpRea的读取流(获取用于写入请求数据的 Stream 对象)，并返回这个 system.io.stream对象的引用，赋值给newstream变量
24 newStream.Write(byte1, 0, byte1.Length) '将获得的内容，通过流（stream)方法(Write)写入到（数据流）中
25 Output.Show(cexp("数据流长度：{1}", byte1.Length)) '显示信息，结果：数据流长度：{1}
26 newStream.Close() '关闭当前流并释放与之关联的所有资源
27
28
29
30 Dim httpResp As System.Net.HttpWebResponse = httpReq.GetResponse() '返回来自 Internet 资源的响应的引用，赋值给 httpResp变量（返回一个HttpWebResponse类）
31 httpReq.KeepAlive = False
32 output.Show(httpResp.StatusCode) '显示来自服务器响应的状态码（获取响应的状态），此时显示结果：200
33 Dim reader As New IO.StreamReader(httpResp.GetResponseStream, System.Text.Encoding.GetEncoding(65001)) '按指定的编码格式，读取指定服务器的响应资源，写入reader变量里（使其以一种特定的编码从字节流中读取字符）
34 Dim respHTML As String = reader.ReadToEnd() '读取来自流的当前位置到结尾的所有字符，写入字符串变量 restHTML，也就是获得从服务器返回的数据
35
36 Output.Show(resphtml) '显示提交带参数的信息后的服务器响应结果（本例也就是网页授权的结果数据，JSON格式的数据）