Public Structure BaseObj
Public sName As String
End Structure
Public Function GetObjWebSer() As Obj_Lib.BaseObj
Dim ret As Obj_Lib.BaseObj
ret.sName = "hello world"
Return ret
End Function
Public Function GetObjWebSer() As BaseObj
Dim results() As Object = Me.Invoke("GetObjWebSer", New Object(-1) {})
Return CType(results(0),BaseObj)
End Function
<System.Xml.Serialization.XmlTypeAttribute([Namespace]:="http://tempuri.org/RemoteObject_WebSer/Service1")> _
Public Class BaseObj
'<remarks/>
Public sName As String
End Class
Dim results() As Object = Me.Invoke("GetObjWebSer", New Object(-1) {})
Return CType(results(0),BaseObj)
End Function
Dim results() As Object = Me.Invoke("GetObjWebSer", New Object(-1) {})
Return CType(results(0), Obj_Lib.BaseObj)
End Function
Public Structure ClassA
Public sName As String
End Structure