|
| Autor |
Nachricht |
Nyx_
Newbie
Anmeldedatum: 15.11.2007
Beiträge: 6
|
Probleme bei Webbrowser
Verfasst am: 17.11.2007, 17:41 |
|
|
Hi
ich bin gerade dabei einen Webbrowser zu erstellen, und bin jetzt auf ein Problem gestoßen ^^
Screenshot
http://img3.imagebanana.com/img/nzeufkde/screeni.JPG
Ich will mich im Login-Fenster anmelden, mit Usernamen Passwort und URL, wenn ich auf OK klicke melde ich mich auf der Seite an.
Soweit sogut 
jetzt will ich aber eine Art " Mailchecker / Watcher " hinzufügen
und da fehlt es gerade an der umsetzung 
Per Add geht ein Eingabefenster auf, in dem ich das Schlüsselwort bzw Wörter eingeben will und die dann in der textbox angezeigt werden soll.
Wenn ich Start klicke soll alle 30 sekunden (den teil habe ich schon fertig ^^ ) die seite aktualisiert werden und bei veränderung der Seite, also wenn dann das Schlüsselwort auf der Seite erscheint soll ich per öffnen eines fensters darauf hingewiesen werden.
Also wenn zb jetzt von gerade auf eben "Geburtstag", "Gewonnen" "(1) Nachricht von ..." auftaucht dann alamieren
kann mir da zufällig jemand weiterhelfen wie ich das umsetzten kann??
thx, Nyx |
|
| |
|
 |
vb6er_
Tutorial Leser
Anmeldedatum: 04.11.2007
Beiträge: 48
|
Verfasst am: 17.11.2007, 18:13 |
|
|
| Ich würde sagen den quelltext über ne schleife als auslesen lassen und wenn das wort gefunden wurde ne msgbox anzeigen lassen. |
|
| |
|
|
Nyx_
Newbie
Anmeldedatum: 15.11.2007
Beiträge: 6
|
Verfasst am: 17.11.2007, 19:54 |
|
|
| vb6er hat Folgendes geschrieben: | | Ich würde sagen den quelltext über ne schleife als auslesen lassen und wenn das wort gefunden wurde ne msgbox anzeigen lassen. |
und wie würde der code dafür aussehen?  |
|
| |
|
|
vb6er_
Tutorial Leser
Anmeldedatum: 04.11.2007
Beiträge: 48
|
Verfasst am: 17.11.2007, 20:26 |
|
|
In meinem neuen Prog hab ich nen Updater.... der funktioniert so wenn man auf updates suchen geht geht er in einem versteckten browser auf ne HP durchsucht da den quelltext und wenn die version 1.0 is und im quelltext 1.1 steht gibt er aus das es nen neues update gibt...ja aus dem code wirste dir sicherlich was basteln können...musst halt mit ner schleife arbeiten.
| Code: | Dim sQuelltext As String
sQuelltext = WebBrowser1.Document.documentElement.outerHTML
InStr 1, sQuelltext, "1.0.0"
If InStr(1, sQuelltext, "1.0.0") <> 0 Then
MsgBox "Sie besitzen die aktuellste Version von ****** !"
pl_neueversion = "Version aktuell!"
Else
MsgBox "Es ist eine neue Version von ****** vorhanden klicken Sie bitte auf Downloaden!"
pl_neueversion = "Es ist eine neue Version verfügbar!"
End if |
|
|
| |
|
|
Nyx_
Newbie
Anmeldedatum: 15.11.2007
Beiträge: 6
|
Verfasst am: 18.11.2007, 01:21 |
|
|
nur mit dem
| Code: | | If InStr(1, sQuelltext, "1.0.0") <> 0 Then |
also <> 0 kann ich nichts anfangen ...
und mein Timer geht auch leider nicht, daher bräuchte ich noch irgendetwas, das meine funktion check alle 60 Sekunden ausführt
was nehm ich da am besten? Timer, Wait, Sleep  |
|
| |
|
|
Nyx_
Newbie
Anmeldedatum: 15.11.2007
Beiträge: 6
|
Verfasst am: 20.11.2007, 12:43 |
|
|
| Code: | Dim sQuelltext As String
sQuelltext = WebBrowser1.Document.documentElement.outerHTML
txtAusgab.Text = sQuelltext"
|
bringt bei mir leider einen Laufzeitfehler "424"
Objekt erforderlich
woran kann das liegen, ich find es nicht |
|
| |
|
|
vb6er_
Tutorial Leser
Anmeldedatum: 04.11.2007
Beiträge: 48
|
Verfasst am: 20.11.2007, 13:31 |
|
|
Hast du eine txt box die so heißt?
txtAusgab.Text |
|
| |
|
|
Nyx_
Newbie
Anmeldedatum: 15.11.2007
Beiträge: 6
|
Verfasst am: 21.11.2007, 20:02 |
|
|
| vb6er hat Folgendes geschrieben: | Hast du eine txt box die so heißt?
txtAusgab.Text |
ja das wrar aus meiner Testform. dafür hab ich allerdings schon eine lösung gefunden
nun "nur" noch folgendes Problem ^^
| Code: |
dim link as string
txtLink.Text = link
browser.navigate link
.....
|
soweit sogut, ich komme zu der URL die ich in das Textfeld eingebe, doch wenn ich auf einen Link drücke, verändert sich die URL, die in txtLink steht nicht, ich will aber das txtLink immer die aktuelle Seite anzeigt 
dafür jemand eine Lösung?? |
|
| |
|
|
Registrieren
Login
