Salve ragazzi, sono nuovo di qui ed avrei bisogno di un piccolo aiuto:
Ho questo script in PHP perfettamente funzionante:
<?php
$PIVA = '12345678901';
$PAESE = 'IT';
$client = new SoapClient("
http://ec.europa.eu/taxation_customs/vies/checkVatService.wsdl");
var_dump($client->checkVat(array(
'countryCode' => $PAESE,
'vatNumber' => $PIVA
)));
?>
Questo script controlla che una determinata P.IVA esiste consultando via SOAP il db del VIES.
Ora lo dovrei riprodurre in VB6 ma non mi funziona:
Private Sub Command1_Click()
Dim client, result
Set client = CreateObject("MSSOAP.SoapClient30")
client.MSSoapInit "
http://ec.europa.eu/taxation_customs/vies/checkVatService.wsdl"
result = client.checkVat("countryCode=IT", "vatNumber=12345678901")
End Sub
Quando lo eseguo ottengo l'errore HRESULT = 80070057 (Parametro non corretto)
Qualcuno saprebbe aiutarmi?
Grazie.