此主题相关图片如下:1.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2023-9/202391216121954297.png)
Dim hc As New HttpClient("https://127.0.0.1/1.html")
hc.FormData.Add("usename", "AAA")
hc.FormData.Add("password", "123456")
Dim ret As String = hc.getData()
If hc.rCookies.ContainsKey("error") Then
MessageBox.Show(hc.rCookies("error"), "提示", MessageBoxButtons.OK , MessageBoxIcon.Warning)
Else
MessageBox.Show("登录成功:" & ret)
End If