VB.NET koduna bu PHP kodu dönüştürmek için yardımcı

2 Cevap php

Ben POST üzerinden XML göndermek için bir kod var. Ama bu kod PHP ve VB.NET içinde gerek.

Bu kodu dönüştürmek için herhangi bir yardım?

$XMLFile= (here i have created the xml file. XML is encoded ISO-8859)

$ch = curl_init();
curl_setopt($ch, CURLOPT_URL,"URL WHERE I SEND XML");
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch,CURLOPT_RETURNTRANSFER,true);
curl_setopt($ch, CURLOPT_POSTFIELDS,"XMLDATA=".$XMLFile);
$results=curl_exec ($ch);
curl_close ($ch);

$results=stripslashes($results);

$xmlreturned=new SimpleXMLElement($results);

if($xmlreturned->NotificationResultHeader->RRC==0){
if($xmlreturned->NotificationResultList->NotificationResult->NRC==0){
echo "OK. SUCCES";

Ve ben de bu PHP kodu dönüştürmek nasıl:

$msg=htmlentities($msg);
$msg=urlencode($msg);

2 Cevap

Sen HttpWebRequest ve HttpWebResponse sınıfları kullanmanız gerekir. Kod böyle bir şey olmazdı ki (my VB is a bit rusty these days):

Dim xmlDoc as XmlDocumnet
'
'  prepare you xml doc here...
'
Dim encoding as ASCIIEncoding = New ASCIIEncoding()
Dim postData as String 
postData = "XMLDATA=" + xmlDoc.ToString()
Dim data() as Byte 
data = encoding.GetBytes(postData)

' Prepare web request...
Dim myRequest as HttpWebRequest 
    myRequest = CType(WebRequest.Create("URL TO POST HERE"), HttpWebRequest)
myRequest.Method = "POST"
myRequest.ContentType="application/x-www-form-urlencoded"
myRequest.ContentLength = data.Length
Dim newStream as Stream  = myRequest.GetRequestStream()
' Send the data.
newStream.Write(data, 0, data.Length)

' Get the response
Dim myResponse as HttpWebResponse
myResponse = myRequest.GetResponse()

Bakınız: htmlentities solution ve urlencode solution

Eğer bir web hizmetini çağırmak için çalıştığınız gibi ve kadar kıvrılma gibi görünüyor. (Bir WSDL ve yerde bir XSD yoktur anlamı) uygun bir web hizmeti var ise, sizin için bir proxy oluşturmak, hangi proje için bir Servis başvurusu (veya VS2005 veya VS2003 iseniz bir Web başvurusu) eklemek gerekir (yerine el bir sunucuya XML damping) kullanın.

etiketler