Public Sub PostDataCGI(ByVal myUsername As [String], ByVal myPassword As [String])
Dim myWebClient As New WebClient()
Dim myNameValueCollection As NameValueCollection = HttpUtility.ParseQueryString(String.Empty)
myNameValueCollection.Add("name", myUsername)
myNameValueCollection.Add("password", myPassword)
myWebClient.Headers.Add("ENCTYPE", "multipart/form-data")
Dim responseArray As Byte() = myWebClient.UploadValues("http://www.test.com/followup.cgi", "post", myNameValueCollection)
MessageBox.Show(myNameValueCollection.ToString())
End Sub