Send XML string through HTTP

[rrocket]

I need to send xml data to a specified server and return the results. I have it covered in classic asp, but need to upgrade to .net 2.0 (C#). If anyone has a link to a tutorial or insight I would appreciate it.

This is what I have so far, but I cannot get it to work...

string postData = this.tbSend.Text;
        string uriString = "http://website.com";
        String strXML;
 
        XMLHTTPClass xmlHTTP = new XMLHTTPClass();
 
        xmlHTTP.open("POST", uriString, false, null, null);
        xmlHTTP.send(postData);
 
        while (xmlHTTP.readyState != 4)
        {
        }
 
        strXML = (string)xmlHTTP.responseText;
        this.tbGet.Text = strXML; 

What namespace does xmlHTTPClass use? I have been checking the web for a while, but cannot come up with anything.

[rrocket]

Does anyone have a clue on how to do this? Just to clarify further.... Values from a form will populate a XML string that is sent to DHL... Once they get the information they will also return rates to me.

Is this the right forum for this type of question or should I put it in the XML forum too?

[kenobewan]

This post may help:
How to receive/send XML file through HTTP Post?

[Plater]

It's MSXML2.XMLHTTPClass, but that's not .NET.

I think you could accomplish this with XMLDocument.


I found this that seems to comapre .NET vs MSXML2
http://forums.microsoft.com/MSDN/Sho...15773&SiteId=1

[radcaesar]

Use Remoting/WebService

Create the instance of that remote class in your code.

Using that proxy, call that method and pass your xml string.

:)

[rrocket]

This might help to explain what I am trying to do a bit better. This is a portion that I did with Classic ASP.

Sub RateWrite
    counter = 1    
    Set xmlhttp = Server.CreateObject("Microsoft.XMLHTTP")
    'xmlhttp.setOption 2, SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS
    xmlhttp.open "POST" ,"http://eCommerce.airborne.com/ApiLandingTest.asp",False
    xmlhttp.setRequestHeader "Content-Type", "text/xml"    
    'xmlhttp.open "POST" ,"https://www.zgraph.net",False
    xmltext ="<?xml version=""1.0"" encoding=""UTF-8""?>"&_
    "<eCommerce action=""Request"" version=""1.1"">"&_
        "<Requestor>"&_
            "<ID>DHLID</ID>"&_
            "<Password>DHLPass</Password>"&_
        "</Requestor>"
    For x = 0 to 5
        xmltext = xmltext &_
        "<Shipment action=""RateEstimate"" version=""1.0"">"&_
            "<ShippingCredentials>"&_
                "<ShippingKey>123456</ShippingKey>"&_
                "<AccountNbr>123456</AccountNbr>"&_
            "</ShippingCredentials>"&_
            "<ShipmentDetail>"&_
                "<ShipDate>"&datePart("yyyy",cDater)&"-"
                If datepart("m",cDater) < 10 Then
                    xmltext = xmltext & "0"&datePart("m",cDater)
                Else
                    xmltext = xmltext & datePart("m",cDater)
                End If
                xmltext = xmltext & "-"
                If datepart("d",cDater) < 10 Then
                    xmltext = xmltext & "0"&datePart("d",cDater)
                Else
                    xmltext = xmltext & datePart("d",cDater)
                End If
                xmltext = xmltext & "</ShipDate>"&_
                "<Service>"&_
                    "<Code>"&arrMethod(x,0,0)&"</Code>"&_
                "</Service>"&_
                "<ShipmentType>"&_
                    "<Code>"&cType&"</Code>"&_
                "</ShipmentType>"
                if cType = "P" and cInsureAmt > 5000 then
                    xmltext = xmltext & _
                    "<Weight>"&cWeight&"</Weight>" & _
                    "<ContentDesc>"&cShipDesc&"</ContentDesc>" & _
                    "<Dimensions>"&_
                        "<Length>"&cLength&"</Length>"&_
                        "<Width>"&cWidth&"</Width>"&_
                        "<Height>"&cHeight&"</Height>"&_
                    "</Dimensions>"
                elseif cType="P" then
                    xmltext = xmltext & _
                    "<Weight>"&cWeight&"</Weight>" & _
                    "<Dimensions>"&_
                        "<Length>"&cLength&"</Length>"&_
                        "<Width>"&cWidth&"</Width>"&_
                        "<Height>"&cHeight&"</Height>"&_
                    "</Dimensions>"
                End If
                'Additional Protection
                If StripCommas(cInsureAmt) > 100 Then
                xmltext = xmltext & "<AdditionalProtection>"&_
                "<Code>"&"AP"&"</Code>"&_
                "<Value>"&StripCommas(cInsureAmt)&"</Value>"&_
                "</AdditionalProtection>"
                End if
                'End Additional Protection
                If trim(arrMethod(x,0,1)) <> "" Then
                    xmltext = xmltext & _
                    "<SpecialServices>" & _
                        "<SpecialService>" & _
                            "<Code>"&arrMethod(x,0,1)&"</Code>" & _
                        "</SpecialService>" & _
                    "</SpecialServices>"                        
                End If
            xmltext = xmltext & _
            "</ShipmentDetail>" & _
            "<Billing>"&_
                "<Party>"&_
                    "<Code>S</Code>"&_
                "</Party>"&_
            "</Billing>"&_
            "<Sender>"&_
                "<SentBy>" & "The Freight Rate Company" & "</SentBy>"&_
                "<Address>"&_
                    "<CompanyName>The Freight Rate Company</CompanyName>"&_
                    "<Street>123 Main Street</Street>"&_
                    "<City>" & "City" & "</City>"&_
                    "<State>"&cStateFrom&"</State>"&_
                    "<Country>US</Country>"&_
                    "<PostalCode>"&cZipFrom&"</PostalCode>"&_
                "</Address>"&_
            "</Sender>"&_
            "<Receiver>"&_
                "<Address>"&_
                    "<CompanyName>The Freight Rate Company</CompanyName>"&_
                    "<Street>123 Main Street</Street>"&_
                    "<City>" & "City" & "</City>"&_
                    "<State>"&cStateTo&"</State>"&_
                    "<Country>US</Country>"&_
                    "<PostalCode>"&cZipTo&"</PostalCode>"&_
                "</Address>"&_
            "</Receiver>"&_
            "<TransactionTrace>"&_
                "<SpecialType>"&arrMethod(x,0,1)&"</SpecialType>"&_
            "</TransactionTrace>"&_
        "</Shipment>"
    Next
    Set x = nothing
    xmltext = xmltext & "</eCommerce>"
 

[radcaesar]

Sorry buddy, I had misunderstood

Here is the code which will do that in .NET

http://codebetter.com/blogs/darrell.norton/archive/2003/07/17/468.aspx

[Plater]

Yeah that's what I thought, the link I left was a conversion for it too.

[rrocket]

Thanks guys... That was the info I needed. Not to say that I will not have more questions later, but for now I am at least able to keep on plugging. :)