JSON no visual basic

[Jonhwell]

Pessoal, preciso fazer um trabalho de integração, em JSON com o visual basic, é teoricamente simples preciso montar a string de variavel e mandar para o webservice que ta em php. Em php eu fiz e funcionou normalmente. Mas pelo vb não faço ideia de como fazer. Vou postar o código aqui em PHP, facilitanto para que saiba em ambas as linguagens como fazer.

 

<?php
$url = "http://xxx/webapi/api/";
$data = array(
"service"        => "Automation",
"phone"          => "5399999999",
"ruleid"         => "0000",
"clientid"       => "00000",
"eventid"        => "00000",
"token"          => "xxxxxxxxxxxxxxxxxxxxxx",
"returnurl"      => "http://xxx/hura/le.php"
);
 
$postdata = json_encode($data);
 
$opts = array('http' =>
        array(
            'method'  => 'POST',
            'header'  => 'Content-type: application/x-www-form-urlencoded',
            //'header'  => 'Content-type: application/json',
            'content' => $postdata
     )
);
 
$context = stream_context_create($opts);
$result = file_get_contents($url, false, $context);
echo $result;
?>

[Jonhwell]

Bom consegui fazendo um post direto no php. Deixo aki para futuras referencias. POdem encerrar.

 

Set myMSXML = CreateObject("Microsoft.XmlHttp")
myMSXML.open "POST", "http://....", False
myMSXML.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
myMSXML.setRequestHeader "User-Agent", "Firefox 3.6.4"
myMSXML.send "param1=value2&param2=value2"
MsgBox myMSXML.responseText

 

Tem que usar msxml 6.0.

[Graymalkin]

Eu ia te sugerir usar o JSON.net, que é fácil e prático: https://json.codeplex.com/

Abraços!