Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#19

AW: Javascript ohne TWebBrowser ausführen

  Alt 17. Nov 2010, 10:01
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  With TDownloadURL.Create(self) Do
  Try
    URL:='http://192.168.1.2/vphone/vp-list-mailin.asp?mode=11&entry=0&nr=512&type="77"&read=';
    FileName:='Dummy.html';
    Try
      ExecuteTarget(nil);
      ShowMessage('Executed OK');
    Except
      On E : Exception Do ShowMessage(E.Message);
    End;
  Finally
    Free;
  End;
end;
Zwar löscht er mir den Eintrag auch nicht. Aber ich bekomme eine html-Datei zurück, die mir mögliche Fehler verrät:
Code:
<html><body>
<h2><b>ASP Error</b></h2>
vp_list_mailin(mode,entry,rnr,type,read);
</body></html>
Ich möchte keine anderen Komponenten verwenden (Indys eingeschlossen), wenn und soweit die Chance besteht, dass ich es mit den Bordmitteln hinbekomme.
Ist das ein Tippfehler in deinem Code?
statt
Code:
entry=0&nr=512&type
müsste es doch
Code:
entry=0&rnr=512&type
lauten
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat