Einzelnen Beitrag anzeigen

nahpets
(Gast)

n/a Beiträge
 
#2

AW: Problem bei Seitenabfrage über Indy

  Alt 28. Mär 2017, 15:51
Bad Request Exception lässt darauf schließen, dass in der URL irgendwas nicht stimmt.

Habe den Quelltext mal ein bisserl angepasst (ungetestet):
Delphi-Quellcode:
  sUrllong := 'http://evatr.bff-online.de/evatrRPC?UstId_1=%s&UstId_2=%s&Firmenname=%s&Ort=%s&PLZ=%s&Strasse=%s&Druck=ja';
  If ShortQuery Then
  Begin
    sUrllong := Format('http://evatr.bff-online.de/evatrRPC?UstId_1=%s&UstId_2=%s'
              + '&Firmenname=%s&Ort=%s&PLZ=%s&Strasse=%s&Druck=ja',[
                 sagustid, // agustid,
                 aAdressenRec.Land+aAdressenRec.ust_id_nr, // customersustid
                 '', // firmenname
                 '', // firmaort,
                 '', // firmaplz,
                 ''  // firmastrasse
                ]);
  End
  else
  Begin
    sUrllong := Format('http://evatr.bff-online.de/evatrRPC?UstId_1=%s&UstId_2=%s'
              + '&Firmenname=%s&Ort=%s&PLZ=%s&Strasse=%s&Druck=ja',[
                 sagustid, // agustid,
                 aAdressenRec.Land+aAdressenRec.ust_id_nr // customersustid,
                 aAdressenRec.Name, // firmenname,
                 aAdressenRec.Ort, // firmaort,
                 aAdressenRec.Plz, // firmaplz,
                 aAdressenRec.Strasse // firmastrasse
               ]);
   End;
    FormMain.Add_Debug('UST-ID Abfrage über Bundeszentralamt für Steuern ###############'+
    #13#10+sUrlLong);

   Try
     idHttp1 := TIdHTTP.Create;
     responseStream := TMemoryStream.Create;
     Screen.Cursor := crHourGlass;
    try
      IdHTTP1.Get(sUrlLong, responseStream);
      IdHTTP1.Disconnect(True);
    except on E: EIdException Do
      FormMain.add_info('UST Abfrage gescheitert '+E.Message);
    end;
    SetString(resultstring, PAnsiChar(responseStream.Memory), responseStream.Size);
   Finally
     idHttp1.Free;
     responseStream.Clear;
     responseStream.Free;
     Screen.Cursor := crDefault;
   End;
Wenn Du die bei FormMain.Add_Debug ausgegebene sUrlLong unverändert im Browser eingibst, funktioniert das?

Da ich keine Ahnung habe, welche Werte genau übergeben werden müssen, hab' ich es mal mit Nonsens versucht.
Es wird ein Ergebnis geliefert, welches besagt, dass meine Daten Nonsens sind.

Es wird aber keine Exception geworfen.
  Mit Zitat antworten Zitat