Zugriff auf html code über Twebbrowser

[5etH]

Hallo Zusammen,

ich habe momentan folgendes problem das ich eine druckerstatus page über twebbrowser aufrufe und einen bestimmten wert auslesen möchte.

meine frage ist nun wie ich das am besten anstelle ... leider habe ich von html nicht so die ahnung und wäre froh wenn ihr mir helfen könntet das umzusetzten

schonmal vielen dank
liebe grüße manu

[Volle]

Wurde hier, glaube ich, schon öfters gefragt.
Es gibt auch ein paar beispiele dazu, einfach mal danach suchen
Webbrowser Quellcode

mfg
Volle

[5etH]

ja das code auslesen habe ich jetzt geschaft ist auch soweit supi der text is jetzt in nem memo feld ... aber jetzt muss ich ja noch nach einem bestimmten segment suchen ... das hat ne bestimmte zeichenfolge (%
) das ist das einzigste mal das das im code vorkommt und ich will 2 zahlen die vor dem % zeichen sind auslesen.
bzw eben 3 stellen wwenn es 100% sind und diese zahl dann vergleichen

wie stelle ich das am besten an ?

[Volle]

Da hilft die die Funktion Pos() weiter.

in deinem Fall wäre der Aufruf dann (wahrscheinlich)

Delphi-Quellcode:

procedure Test
var position:integer;
begin
position:=Pos('%
',Memo1.Lines.Text);


end;

dann hast du in position die Stelle an der das %
steht. davon gehst du 3 stellen zurueck. dann bist du da wo bei 100% die 1 steht. Schaust ob an der Stelle im text ne 1 steht oder nicht und kopierst je nachdem 3 oder 2 zeichen.

Das Zeichen an einer bestimmten Position im Text bekommst du mit Memo1.Lines.Text[ZEICHENNUMMER]
in dem Fall waere es dann Memo1.Lines.Text[position-3]

mfg
Volle

[5etH]

alles klar das hat super geklappt aber eine frage habe ich noch ^^ immer wenn ich ne seite aufrufe kommt ne skript fehler meldung wie kann ich die umgehen ? weil das stört den programmablauf und ich will unterbinden das er das anzeigt und will das er einfach weiter macht

also wie wenn ich auf ja klicke ^^

[sniper_w]

Ich habe delphi jetzt nicht dabei, aber irgenwo gibt es eine Eingenschaft TWebBrowser.Silent die auf true gesetzt gehört.

[5etH]

nochmal ne frage zur indy komponente idsmtp und idmessage

ich würde gerne an simples mail schicken ohne viel trallalla ^^

mein problem ich weis nicht was ich wo zuordnen soll von den servereinstellungen her

ich hab an sich den smtp-server was ja wohl der host sein müsste

aber zusätzlich haben wir noch nen domainnamen aber wo soll der hin ?

[Meflin]

Zitat:

Zitat von 5etH

aber zusätzlich haben wir noch nen domainnamen aber wo soll der hin ?

Nirgends?! Alles was du wissen (und angeben) musst, sind SMPT-Server-Adresse (meistens smtp.wuppdi.tld), Benutzername, Passwort und evtl noch Port (was in 99,9% eh der Standart-Port ist).

[5etH]

ja ich hab mir schnell was gebastelt gehabt aber das geht so nicht wirklich

QT:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin

  idSMTP1.Host := '10.30.0.55';

idSMTP1.Port := 25;


 idmessage1.From.address:='[e-mail]';
 idmessage1.Recipients.EMailAddresses:='[e-mail]';
 idmessage1.Subject :='test';
 idmessage1.Body.Text := memo1.Lines.Text;


      idSMTP1.Connect;
      idSMTP1.Send(idmessage1); //hier kommt dann der fehler "Socket Error # 10061 Connection refused"
      idSMTP1.Disconnect;

end;

hoffe du oder ihr könnt mir da helfen hatte bis jetzt nur mit idftp zu tun ^^

[Meflin]

Da fehlen ja auch die Login-Daten...

[5etH]

ja das problem ist das die mail hausintern läuft und so etwas garnicht existiert ....

beispiel: wir haben drucker die automatisch ne mail schicken wenn der toner leer wird. Da musste ich auch weder benutzernamen noch PW angeben

kanns an was anderem liegen ?

[Meflin]

Hast du die IP mal angepingt bzw. ist sichergestellt, dass der Server auch erreichbar ist?
Edit: vielleicht fehlt auch das

Delphi-Quellcode:

SMTP.AuthenticationType := atNone;

[5etH]

probelm warscheinlich gefunden: McAfee blockt das ganze aus schutz vor massenmails werde ihn mal ausschalten und es dann testen und werde dann berichten was sache ist ^^

[5etH]

ja es war die firewall ^^

andere frage... ich hab das problem das ich den speicherort der exe ermitteln will was mit paramstring(0) ja geht aber wie kann ich nur den ordnerpfad ermitteln so das im string der exe name nicht auftaucht ?

[Klaus01]

Suche mal nach ExtractFilePath

Grüße
Klaus

[Meflin]

Zitat:

Zitat von 5etH

andere frage... ich hab das problem das ich den speicherort der exe ermitteln will was mit paramstring(0) ja geht aber wie kann ich nur den ordnerpfad ermitteln so das im string der exe name nicht auftaucht ?

P.S.: eigentlich gilt hier die Regel: neue Frage, neuer Thread :zwinker:

[SirThornberry]

Stop! Wie mein Vorredner bereits anmerkt - Pro Thread nur eine Frage damit es kein riesen durcheinander wird und man auch über die Suche noch etwas findet. (bezüglich Suche: über diese findet man auch die Antwort zu mindestens einer deiner Fragen) Zudem hat es den Vorteil das du jedem Thread für jede Frage einen aussagekräftigen Titel geben kannst.

Hätte ich schon eher den Thread bemerkt und gesehen das hier 2 Fragen drin sind wäre schon lange zu gewesen. Also bitte in diesem Thread nur noch zur ersten Frage antworten.