我試圖發送一個XML片段到我的本地主機服務器。我已經能夠成功連接和(我認爲)成功發送片段。但是,當我運行我的程序時,我得到一個未處理的WebException。異常詳細信息全文如下:使用XML的VB.NET服務器協議違規「Section = ResponseStatusLine」
System.Net.WebException was unhandled
Message=The server committed a protocol violation. Section=ResponseStatusLine
Source=System
StackTrace:
at System.Net.HttpWebRequest.GetResponse()
at Automation_Algorithm.AutomationForm.cmdStart_Click(Object sender, EventArgs e) in C:\Users\ConzM\documents\visual studio 2010\Projects\Automation Algorithm\Automation Algorithm\AutomationForm.vb:line 29
at System.Windows.Forms.Control.OnClick(EventArgs e)
at System.Windows.Forms.Button.OnClick(EventArgs e)
at System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent)
at System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks)
at System.Windows.Forms.Control.WndProc(Message& m)
at System.Windows.Forms.ButtonBase.WndProc(Message& m)
at System.Windows.Forms.Button.WndProc(Message& m)
at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
at System.Windows.Forms.NativeWindow.DebuggableCallback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
at System.Windows.Forms.UnsafeNativeMethods.DispatchMessageW(MSG& msg)
at System.Windows.Forms.Application.ComponentManager.System.Windows.Forms.UnsafeNativeMethods.IMsoComponentManager.FPushMessageLoop(IntPtr dwComponentID, Int32 reason, Int32 pvLoopData)
at System.Windows.Forms.Application.ThreadContext.RunMessageLoopInner(Int32 reason, ApplicationContext context)
at System.Windows.Forms.Application.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context)
at Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.OnRun()
at Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.DoApplicationModel()
at Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.Run(String[] commandLine)
at Automation_Algorithm.My.MyApplication.Main(String[] Args) in 17d14f5c-a337-4978-8281-53493378c1071.vb:line 81
我的代碼(在第11場首發):
Private Sub cmdStart_Click(sender As System.Object, e As System.EventArgs) Handles cmdStart.Click
Dim requestNF As WebRequest = WebRequest.Create("http://127.0.0.1:4096")
requestNF.Method = "POST"
Dim datastring As String
Dim getdata =
<?xml version='1.0' encoding='ISO-8859-1'?>
<MLCommandSet>
<info/>
</MLCommandSet> '/
datastring = "<?xml version='1.0' encoding='ISO-8859-1'?>" & vbNewLine & getdata.ToString()
Dim byteArray As Byte() = Encoding.UTF8.GetBytes(datastring)
requestNF.ContentLength = byteArray.Length
requestNF.ContentType = "text/xml"
Dim dataStream As Stream = requestNF.GetRequestStream()
dataStream.Write(byteArray, 0, byteArray.Length)
txtXMLOutFF.AppendText(getdata.ToString & vbNewLine)
dataStream.Close()
Dim responseNF As Object = requestNF.GetResponse.GetResponseStream '<---breaks here'
Console.WriteLine(CType(responseNF, HttpWebResponse).StatusDescription.ToString)
txtXMLInFF.Text = CType(responseNF, HttpWebResponse).StatusDescription.ToString
dataStream = responseNF.GetResponseStream
Dim readerNF As New StreamReader(dataStream)
Dim responseFromServerNF As String = readerNF.ReadToEnd
Console.WriteLine(responseFromServerNF)
txtXMLInFF.AppendText(responseFromServerNF.ToString & vbNewLine)
readerNF.Close()
dataStream.Close()
responseNF.Close()
End Sub
有人能提供一些線索這對我來說?