Javascript ohne TWebBrowser ausführen

**s.h.a.r.k**

Wieso drei? Er referenziert doch genau einen -> Anker im Link! Den mittleren halt

**Sir Rufo**

Wieso drei? Er referenziert doch genau einen -> Anker im Link! Den mittleren halt

Genau den hätte ich nicht genommen.

Ich würde es mal mit synapse probieren. Da braucht auch nichts installiert werden und nach meinen Erfahrungen sehr sauber und extrem stabil.

**Schwedenbitter**

OK.

Dieses Thema hat mich auf folgende Idee gebracht:

zusammenfalten · markieren

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:

markieren

Code:

			<html><body>

<h2><b>ASP Error</b></h2>

vp_list_mailin(mode,entry,rnr,type,read);

</body></html>

Wenn ich das richtig verstehe, ist mein 'POST' angekommen und der Server ist sogar noch so nett und sagt mir, wie ich die Funktion richter Weise benutzen soll. Da ich read= nirgends finden kann, bleibt mir also doch nur ein Shniffer. Oder sehe ich das falsch?

Ich möchte keine anderen Komponenten verwenden (Indys eingeschlossen), wenn und soweit die Chance besteht, dass ich es mit den Bordmitteln hinbekomme.

[EDIT]
Habe jetzt den Traffic mal mit Live HTTP Headers mitgeschnitten und es hat den Anschein, dass die Variablen vertauscht und die Argumente andere sind. Ich muss jetzt leider warten, bis wieder ein Fax eingeht und werde es dann probieren. Bins schon ganz euphorisch!
[/EDIT]

Gruß, Alex

**Sir Rufo**

Zitat von Schwedenbitter:

zusammenfalten · markieren

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:

markieren

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

markieren

Code:

entry=0&nr=512&type

müsste es doch

markieren

Code:

entry=0&rnr=512&type

lauten

**Schwedenbitter**

Zitat von Sir Rufo:

Ist das ein Tippfehler in deinem Code?
statt

markieren

Code:

entry=0&nr=512&type

müsste es doch

markieren

Code:

entry=0&rnr=512&type

lauten

Ja - genau das. Und auch die Argumente sind anders als im html-Quelltext angegeben. Im Quelltext steht

markieren

Code:

type="77"

und

markieren

Code:

nr=512

(ohne das zusätzliche r), während es die Funktion umgekehrt und mit r will. Vielleicht eine Falle für Leute, die eine Software für die Anlagen schreiben wollen

Wie auch immer.
Es funktioniert jetzt über die URL

markieren

Code:

			http://192.168.1.2/vphone/vp-list-mailin.asp?mode=11&entry=0&rnr=77&type=512&read=
		

Danke für Eure Hilfe. Ich fasse mal zusammen:

1. Man kann ein 'POST' ziemlich einfach über TDownloadURL absetzen und damit eine Javascript-Funktion ausführen lassen.
2. Oben steht, wie es insbesondere bei einer OpenCom X320 geht.

**BUG**

Zitat von Schwedenbitter:

1. Man kann ein 'POST' ziemlich einfach über TDownloadURL absetzen und damit eine Javascript-Funktion ausführen lassen.

Kann man das so stehen lassen?
Denn JavaScript führst du damit ja nicht aus, sondern du hast die Funktionalität der JavaScript-Funktion nachprogrammiert, und die ruft eben eine URL auf (aber anscheinend mit

GET)

**Schwedenbitter**

Zitat von BUG:

Kann man das so stehen lassen?

Stimm insoweit, als es nicht exakt ausgedrückt ist. Nicht ich (mein Programm), sondern der Server führt das JS aus. Ich fordere ihn dazu nur auf und übergebe ihm mit/in der URL die Argumente. Und da diese wiederum nicht im Header, sondern eben in der URL selbst stehen, ist es per Definition nach dem Artikel von wikimedia.org ein 'GET'.

So gesehen ist aber auch das Thime nicht richtig formuliert, woran bislang keiner Anstoß genommen hat. Es müsste heißen: "Javascript ohne TWebBrowser auf einem http-Server ausführen lassen".

Soll ich es ändern?

Javascript ohne TWebBrowser ausführen

AW: Javascript ohne TWebBrowser ausführen

AW: Javascript ohne TWebBrowser ausführen

AW: Javascript ohne TWebBrowser ausführen

AW: Javascript ohne TWebBrowser ausführen

AW: Javascript ohne TWebBrowser ausführen

AW: Javascript ohne TWebBrowser ausführen

AW: Javascript ohne TWebBrowser ausführen

Forumregeln

s.h.a.r.k Registriert seit: 26. Mai 2004 3.159 Beiträge	#1 AW: Javascript ohne TWebBrowser ausführen 16. Nov 2010, 23:30 Wieso drei? Er referenziert doch genau einen -> Anker im Link! Den mittleren halt »Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
	Zitat