NEWBIE NEEDS HELP!

  • Thread starter Thread starter T.Horton
  • Start date Start date
T

T.Horton

Currently in a VB6 application I am using SOAP to send an XML file
to 3rd part application. I have not been successfull in finding a way
to convert the code below to something similar in ASP.NET (VB.NET):

-----------
Dim Connector
Dim Serializer
Dim Reader

'On Error GoTo cleanUp

Set Connector = CreateObject("MSSOAP.HttpConnector")
Set Serializer = CreateObject("MSSOAP.SoapSerializer")
Set Reader = CreateObject("MSSOAP.SoapReader")

' The following Connector settings establish the SOAP Listener
' connection

Connector.Property("EndPointURL") = "http://" + txbHostListener +
":8080/ssc/servlet/SUGSoap"
Connector.Property("SoapAction") = "uri:Principal-" & txbComponent
Connector.Property("Timeout") = 300000
Connector.Connect

Dim StartTime
Dim ElapsedTime
StartTime = Now()

' The following builds the SOAP Message by Using the
' Serializer which generates the XML SOAP Message
' and executes the SOAP Request


Connector.BeginMessage
Serializer.Init Connector.InputStream
Serializer.startEnvelope
Serializer.SoapNamespace "xsi",
"http://www.w3.org/1999/XMLSchema-instance"
Serializer.startBody
Serializer.startElement txbMethod, "Principal-" &
txbComponent, , "m"
Serializer.startElement "strPayload"
Serializer.SoapAttribute "xsi:type", "", "xsd:string"
Serializer.writeString sscPayload
Serializer.endElement
Serializer.endElement
Serializer.endBody
Serializer.endEnvelope
Connector.EndMessage

' The following Reader object opens the SOAP Response
' and evaluates if any SOAP Fault was raised
' The SOAP Response is placed in the strResult variable

Reader.Load Connector.OutputStream
Dim strResult
If Not Reader.Fault Is Nothing Then
strResult = Reader.faultstring.Text
Else
strResult = Reader.RPCResult.Text
End If
------------------

Can anyone give me some assitance on this?

Thanks,

Thomas Horton
 
Your post went unanswered. Have you resolved this issue? If you still need
help, please post the original question with your request.
 
This issue is still pending and in need of serious help.

Currently in a VB6 application I am using SOAP to send an XML file to
3rd part application. I have not been successfull in finding a way to
convert the code below to something similar in ASP.NET (VB.NET). My main
concern is the connector and serializer portions of the code:

-----------
Dim Connector
Dim Serializer
Dim Reader

'On Error GoTo cleanUp

Set Connector = CreateObject("MSSOAP.HttpConnector")
Set Serializer = CreateObject("MSSOAP.SoapSerializer")
Set Reader = CreateObject("MSSOAP.SoapReader")

' The following Connector settings establish the SOAP Listener
' connection

Connector.Property("EndPointURL") = "http://" + txbHostListener +
":8080/ssc/servlet/SUGSoap"
Connector.Property("SoapAction") = "uri:Principal-" & txbComponent
Connector.Property("Timeout") = 300000
Connector.Connect

Dim StartTime
Dim ElapsedTime
StartTime = Now()

' The following builds the SOAP Message by Using the
' Serializer which generates the XML SOAP Message
' and executes the SOAP Request


Connector.BeginMessage
Serializer.Init Connector.InputStream
Serializer.startEnvelope
Serializer.SoapNamespace "xsi",
"http://www.w3.org/1999/XMLSchema-instance"
Serializer.startBody
Serializer.startElement txbMethod, "Principal-" &
txbComponent, , "m"
Serializer.startElement "strPayload"
Serializer.SoapAttribute "xsi:type", "", "xsd:string"
Serializer.writeString sscPayload
Serializer.endElement
Serializer.endElement
Serializer.endBody
Serializer.endEnvelope
Connector.EndMessage

' The following Reader object opens the SOAP Response
' and evaluates if any SOAP Fault was raised
' The SOAP Response is placed in the strResult variable

Reader.Load Connector.OutputStream
Dim strResult
If Not Reader.Fault Is Nothing Then
strResult = Reader.faultstring.Text
Else
strResult = Reader.RPCResult.Text
End If
------------------

Can anyone give me some assitance on this?

Thanks,

Thomas Horton
 
You may not find a lot of help here because this newsgroup does not support
vb6.

If you were to consider writing the application in .net, then you would just
need to take a .net string and push it across the wire, using a webservice
or .net remoting.
 
I posted this message here becasue I want to write the aplication in
.NET but I have not been able to find a way to do this same sort of
functionality in .NET. Every resource I have looked into does not give
me a solution to perform the same task in .NET. Do you know how to do
this or somewhere I can go to get the knoledge to do this?

-Tom
 
Back
Top