problem in "Calling a Dotnet Created WebService in VB Client"

[rakeshkumawat]

I am facing a problem while reading the result which is loaded in DOMDocument.
In which I am sending a request to web service and getting a record of Single Order.
This is my VB Code which is i am using....
............... .........
Dim Connector As SoapConnector30 ' To connect to webservice
Dim Serializer As SoapSerializer3 0 ' To serialize the XML data
Dim Reader As SoapReader30 ' To read the Webservice response data

Dim domResult As New MSXML2.DOMDocum ent
Dim ResultElm As IXMLDOMElement ' To store the Webservice response in DOM
Dim FaultElm As IXMLDOMElement ' for Error handling

Dim END_POINT_URL As String ' URL of the Webservice to call
Dim SoapAction As String
Dim CALC_NS As String

Dim objNodeList As IXMLDOMNodeList

END_POINT_URL = "http://localhost/webservicesserv er/UsingDataSet.as mx"
'SoapAction = "UsingDataSetNa meSpace/GetCustomerByAr ray"
SoapAction = "UsingDataSetNa meSpace/GetRecord"
CALC_NS = "UsingDataSetNa meSpace"

'To Connect webservice
Set Connector = New HttpConnector30
Connector.Prope rty("EndPointUR L") = END_POINT_URL
Connector.Conne ct


' binding/operation/soapoperation
Connector.Prope rty("SoapAction ") = SoapAction '& Method
Connector.Begin Message

'Preapare the SOAP Request
Set Serializer = New SoapSerializer3 0
Serializer.Init Connector.Input Stream

Serializer.Star tEnvelope
Serializer.Star tBody
Serializer.Star tElement Method, CALC_NS ' Setting Method name

Serializer.EndE lement

Serializer.EndB ody
Serializer.EndE nvelope

Connector.EndMe ssage ' This statement actually send the data to webservice

'Reading Webservice Response
Set Reader = New SoapReader30
Reader.Load Connector.Outpu tStream

If Not Reader.Fault Is Nothing Then
MsgBox Reader.FaultStr ing.Text, vbExclamation ' In case of Error
Else
Set ResultElm = Reader.RpcResul t ' Response come as XML document
Set domResult = Reader.Dom
End If

'MsgBox domResult.xml

'MsgBox ResultElm.xml

MsgBox domResult.getEl ementsByTagName ("GetRecordResu lt").length

Dim i As Integer
For i = 0 To domResult.getEl ementsByTagName ("GetRecordResu lt").length - 1
MsgBox domResult.getEl ementsByTagName ("GetRecordResu lt").Item(0).no deName
Next

End Sub
............... ............... ..........

My Request in xml format to Web Services is....

<?xml version="1.0" encoding="UTF-8" standalone="no" ?><SOAP-ENV:Envelope xmlns:SOAPSDK1= "http://www.w3.org/2001/XMLSchema" xmlns:SOAPSDK2= "http://www.w3.org/2001/XMLSchema-instance" xmlns:SOAPSDK3= "http://schemas.xmlsoap .org/soap/encoding/" xmlns:SOAP-ENV="http://schemas.xmlsoap .org/soap/envelope/"><SOAP-ENV:Body><SOAPS DK4:GetRecord xmlns:SOAPSDK4= "http://localhost/webservicesserv er/UsingDataSetNam eSpace/GetRecord"/></SOAP-ENV:Body></SOAP-ENV:Envelope>

My Web Service Response is...

<?xml version="1.0" encoding="utf-8"?><soap:Envel ope xmlns:soap="htt p://schemas.xmlsoap .org/soap/envelope/"
xmlns:xsi="http ://www.w3.org/2001/XMLSchema-instance"
xmlns:xsd="http ://www.w3.org/2001/XMLSchema"><soa p:Body><GetReco rdResponse
xmlns="http://localhost/webservicesserv er/UsingDataSetNam eSpace"><GetRec ordResult orderId="60823"
productCd="MBFX " carrierCd="CONC " statusCd="ACTV"
/></GetRecordRespon se></soap:Body></soap:Envelope>


I am unable to read DOMDocument by getElementsByTa gName or by xpath.

Thanks in advance for your Reply....