How do I import a large XML stream using VB6 or VB.NET

[Eric]

I built a webservice and it needs to pass large amounts of
data (50MB+). I built a VB6 test app that uses soap to
call the webservice. When the stream of data getting
passed back gets larger than 16MB then the VB app fails
("Run-time error '91': Object variable or With block
variable not set" - break occurs on line "Print #hFile,
Reader.RPCResult.Text- see code below.)

I think it's a limitation of RAM on the client machine but
cannot be sure. I can import a 16MB file on a 800Mhz
128MB system. I was able to import 22MB on a 2.1Ghz 256MB
system before getting this error. The soap code looks
like:
Set Connector = New HttpConnector

Connector.Property("EndPointURL")
= "http://172.31.1.1/SagittaWS/Transporter.asmx"
Connector.Property("SoapAction")
= "http://172.31.1.1/SagittaWS/PassThroughReq"

Connector.Property("Timeout") = 400000000 '@ 111 hours
Connector.BeginMessage

Set Serializer = New SoapSerializer
Serializer.Init Connector.InputStream

Serializer.startEnvelope
Serializer.startBody

'custom3

xmlMsg = "<PassThroughReq
xmlns=""http://172.31.1.1/SagittaWS"">"

xmlMsg = xmlMsg & "<XMLinput>"
xmlEncoded = "<INPUT>" & Contents & "</INPUT>"
xmlMsg = xmlMsg & xmlEncoded
xmlMsg = xmlMsg & "</XMLinput>"
xmlMsg = xmlMsg & "</PassThroughReq>"

Serializer.writeXML xmlMsg
Serializer.endBody
Serializer.endEnvelope
Connector.EndMessage

Set Reader = New SoapReader
Reader.Load Connector.OutputStream

If Not Reader.Fault Is Nothing Then
MsgBox Reader.faultstring.Text, vbExclamation
Else
Dim hFile
hFile = FreeFile()
Open App.Path & "\response.xml" For Output Access
Write As hFile
Print #hFile, Reader.RPCResult.Text

Close hFile
End If

Am I doing this correctly?
Thanks
Eric