获取错误:尝试调用我的Web服务时,用户代码未处理InvalidOperationException。我正在尝试序列化通过Web服务获取的类对象,并将其作为XML String返回,但遇到错误。我已经将对象的字段从私有更改为公共,但这似乎不是问题。这是引发的错误,但是当我结束会话时,我也会收到错误消息:远程服务器返回了一个错误:500个内部服务器错误并突出显示:
Dim respond As HttpWebResponse = CType(request.GetResponse, HttpWebResponse)
不知道为什么在我查找时会发生这种情况。有建议吗?
我的网络服务
<Route("Contents/{ordNbr}")>
<HttpGet>
Public Function GetOrderContents(ByVal ordNbr As String) As String
Dim retValue As ReturnVal
retValue = GetOrderInformation(ordNbr)
Dim sp = New Sharepoint()
Dim t = sp.GetOrderContent(retValue.Year, retValue.SONumber)
Dim contentFolder = New SPFolderOver()
contentFolder = SPFolderOver.LoadFolder(t)
contentFolder.FolderName = t.FullPath
Dim result = String.Empty
Dim serializer As XmlSerializer = New XmlSerializer(contentFolder.[GetType]())
Using writer As StringWriter = New StringWriter()
serializer.Serialize(writer, contentFolder)
Return result = writer.ToString()
End Using
End Function
我对服务的表单调用
Public Sub SubmitOrder_Click(sender As Object, e As EventArgs) Handles SubmitOrder.Click
Dim orderString As String = orderNumber.Text
If orderString = "" Then
MsgBox("Please Enter in Order Number")
Exit Sub
End If
Dim apiUrl = "http://localhost:54754/orders/Contents/" + orderString
Dim request As HttpWebRequest
request = CType(WebRequest.Create(apiUrl), HttpWebRequest)
request.Method = "GET"
request.ContentType = "text/xml"
Dim respond As HttpWebResponse = CType(request.GetResponse, HttpWebResponse)
Dim myResponse = String.Empty
Using sr As StreamReader = New StreamReader(respond.GetResponseStream())
myResponse = sr.ReadToEnd()
End Using
Response.Write(myResponse)
End Sub