Visual Basic Forum

Verfasst am: 06.03.2012, 14:08 Aufrufe: 162

Timer1_Tick() Webbrowser1.Navigate ("www.google.at") end Sub ja hast recht sind keine 5 zeilen sondern nur 3

Verfasst am: 06.01.2012, 04:55 Aufrufe: 2691

... ist es die Startseite in einem Textdokument zu speichern. Die idee mit der Txt find ich gut aber ich Selber würdes eher so Machen weil man dann nichts extra abspeichern muss Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Text = "deine Startseite" If TextBox1.Text = "Deine Startseite" Then WebBrowser1 ...

Verfasst am: 02.11.2011, 21:54 Aufrufe: 453

... n schreiben das automatisch auf "JA" geklickt wird oder kann man diesen "Skriptfehler" beheben? Hat jemand vllt. das selbe Problem und konnte es evtl. beheben? Hier ein Screenshot: http://i40.tinypic.com/osy3b8.jpg Code: Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click WebBrowser1 ...

Verfasst am: 12.10.2011, 13:54 Aufrufe: 567

das heist du möchtest also so eine art bruteforce für eine webseite versuchen... ich würde das aber nicht mit sendkey sondern mit webbrowser1.Document.Forms(0).User.Value = "Admin" 'statt user musst du dir den namen der textbox aus dem quelltext der seite 'und zum bestätigen webbrowser1.Document.Forms(0).submit.Click viel erfolg lg

Verfasst am: 10.06.2011, 19:41 Aufrufe: 427

0 auf meinen htp-Server hochgeladen:http://wh4ude.wh.funpic.de/chv.html so weit ist ja noch alles schön und gut. Der Browser zeigt jetzt (auch in Visual-Basic Webbrowser) "3.0" an. Also hab ich dann mal weiter programmiert: Code von Button1(Click): If Webbrowser1.documenttext = "3.0" Then form3.show End if Voller freude mal ausprobieren... aber es öffnets sich kein form3. ...

Verfasst am: 31.05.2011, 14:44 Aufrufe: 447

hi ich kann zwar kaum vb.net aber so stark unterscheiden sich beide sprache ja doch nicht... probier mal ein do doEvents loop while WebBrowser1.Busy = True einzubauen... und zwar jedes mal bevor du die nächste seite aufrufen möchtest wenn dir das nicht reicht würde mir noch eine warteschleife in den sinn kommen system.threading.thread.sleep(5000) was halt unschön ist da ...

Verfasst am: 16.03.2011, 22:22 Aufrufe: 583

Hab noch ein problem Very Happy

Jetzt geht auf einmal was schief, was vorher exakt auf diese art ging Method or Data Member not found. Mit ner Verweisung auf die Zeilen wo jeweils steht "WebBrowser1.Navigate "www.adresse.de""

Verfasst am: 14.03.2011, 10:07 Aufrufe: 460

hi webbrowser1.Document.Forms(0).TextboxPfad.Value = Textbox3.Text 'wenn ich das richtig in erinnerung habe 'und TextBoxPfad musst du durch den namen von der textbox im webformular ersetzten 'und webbrowser1.Document.Forms(0).Submit.Click lg

Verfasst am: 28.02.2011, 10:11 Aufrufe: 583

hi hab ich schon mal gepostet Private Sub CommandXY_Click() WebBrowser1.Document.Forms(0).loginname.Value = "Name1" WebBrowser1.Document.Forms(0).loginpwd.Value = "Passwort1" On Error Resume Next WebBrowser1.Document.Forms(0).submit.Click do doEvents while webbrowser1.busy = True WebBrowser1.Navigate "http://www.schulterglatze.de/truppe/wache/teilnehmen" ...

Verfasst am: 26.02.2011, 12:57 Aufrufe: 583

Private Sub Command1_Click() (Account Nr. 1 ) WebBrowser1.Document.Forms(0).loginname.Value = "Name1" WebBrowser1.Document.Forms(0).loginpwd.Value = "Passwort1" On Error Resume Next WebBrowser1.Document.Forms(0).submit.Click End Sub ### Hier werden die Accountdaten eingegeben und der Grafische Anmelde-Button wird geklickt Private Sub Command100_Click() WebBrowser1.Navigate & ...

Verfasst am: 26.02.2011, 10:16 Aufrufe: 462

will ich aber das Live-Video anzeigen kommt die Fehlermeldung "Videostream - unbekannter Dateityp" (siehe Code Button1). Auszug aus dem Codexxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click WebBrowser1.Navigate("http://mediabox.dyndns.info/sn ...

Verfasst am: 11.02.2011, 11:09 Aufrufe: 334

hast schon mal webbrowser1.Navigate "www.wasweisncihwasduspielst.de" versucht?

Verfasst am: 16.01.2011, 10:19 Aufrufe: 583

hi das hast du ganz richtig verstanden... jetzt brauchst dass nur mehr zusammen setzen WebBrowser1.Navigate "www.google.de" do doEvents while webbrowser1.busy = True WebBrowser1.Navigate "www.youtube.com" oder du suchst nach dem delay modul und verwendest das lg

Verfasst am: 05.01.2011, 23:43 Aufrufe: 583

Okay.. Blicke aber nicht ganz durch.. könntest du mir mein Beispiel ersetzen? Command1_Click() WebBrowser1.Navigate "www.google.de" << hier soll nun eine 1-sekündige Pause gemacht werden (zum Laden etc.) WebBrowser1.Navigate "www.youtube.com" Hab extra die bekannten Adressen genommen und hoffe das wird nicht als Werbung gewertet Very Happy

EDIT: oder.... Busy bedeutet ...

Verfasst am: 05.01.2011, 17:08 Aufrufe: 583

mit sleep hälst du das ganze programm an!!! probiers mit do doEvents while webbrowser1.busy = True lg

Verfasst am: 05.01.2011, 01:02 Aufrufe: 583

.. durch den ersten Button wird dafür gesorgt, dass sich mein Account einloggt. ... funktionert auch alles, daher unwichtig. Command2_Click() WebBrowser1.Navigate "www.ich-mache-hier-schon-keine-werbung.de/nachtwache" Command3_Click() WebBrowser1.Navigate "www.ich-mache-hier-schon-keine-werbung.de/logout.html" Ich würde aber jetzt gerne, dass ich mit einem Button beide Links aufr ...

Verfasst am: 02.01.2011, 11:35 Aufrufe: 736

mach das mit focus geht bei checkbox und radiobutton: WebBrowser1.Document.GetElementById("id_der_checkbox").Focus() SendKeys.Send(" ") und für radiobutton: fPrivate Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged If RadioButton1.Checked = True Then If RadioButton2.C ...

Verfasst am: 31.12.2010, 14:46 Aufrufe: 736

de bei der Registrierung bin so weit gekommen bis jz funzt auch alles aber wie gesagt brauch nur noch die beiden checkboxen besaetigen aber keine ahnung wie hab schon ganze zeit gegoogelt aber nichts gefunden Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim allelements As HtmlElementCollection = WebBrowser1.Document.All WebBrowse ...

Verfasst am: 25.11.2010, 18:50 Aufrufe: 736

de bei der Registrierung bin so weit gekommen bis jz funzt auch alles aber wie gesagt brauch nur noch die beiden checkboxen besaetigen aber keine ahnung wie hab schon ganze zeit gegoogelt aber nichts gefunden Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim allelements As HtmlElementCollection = WebBrowser1.Document.All WebBrowse ...

Verfasst am: 07.11.2010, 13:42 Aufrufe: 613

' adapt the URL in the following line to where your upload.asp is vUrl = "http://www.gpsvisualizer.com/map?output_home" 'Do it! WebBrowser1.Navigate vUrl, 0, "", vPostData, vHeaders End Sub Der Code funktioniert auch wunderbar wenn ich eine Datei versenden möchte. Nun möchte ich aber noch weitere Dateien gleichzeitig versenden. Dazu benötige ich ein weiteres Feld, dieses lautet ...

Verfasst am: 06.11.2010, 15:39 Aufrufe: 870

schau du lädst die komponente "Microsoft Internet Controls" danach ziehst du einfach das webbrowser steuerelement auf deine form webbrowser1.Navigate "zuDerSeite" wenn die seite fertig gelade ist kannst du das formular ausfüllen lassen dazu.. schaust du dir den Quelltext der seite an... irgendwo hast du dann mal zum beispiel "<input type="text" name="Username&q ...

Verfasst am: 06.11.2010, 14:49 Aufrufe: 613

hi ganz leicht Wink

dim DeineVariable as string DeineVariable = WebBrowser1.Document.documentElement.outerHTML lg

Verfasst am: 06.11.2010, 14:45 Aufrufe: 613

Ich verwende folgenden Code um eine html Seite in ein webbrowser Objekt darzustellen. WebBrowser1.Navigate vUrl, 0, "", vPostData, vHeaders Ich möchte dann weiters den Quellcode dieser geöffneten Seite z.B. in eine Textvariable speichern. Wie kann ich dies durchführen! Vielen Dank für jede Antwort

Verfasst am: 22.06.2010, 14:14 Aufrufe: 446

<DIV id=but1 onclick="stEnd()" onmouseover="rahmen(1,1)" onmouseout="rahmen(0,1)">Beenden <<</DIV> Diesen Button möchte ich gerne gedrückt haben, habe aber keine Ahnung wie das Funktionieren soll. Ich habe es schon mit Webbrowser1.Document.Forms(0).InvokeMember("") ausprobiert. Ich arbeite gerade mit VB 200 ...

Verfasst am: 27.01.2010, 11:03 Aufrufe: 952

... uot;440" /> <input type="hidden" name="action_id" value="18428731" /> <input name="submit" type="submit" onload="this.disabled=false;" value="OK" style="font-size: 10pt;" /> </form> ich hab jetzt alles was ich an hilfen im netz finden konnte ausprobiert, es geht nix. Achja, VB6 WebBrowser1 ...

Verfasst am: 24.01.2010, 15:46 Aufrufe: 746

Net ein Programm basteln, dass es mir ermöglicht mich auf einer Website einzuloggen und dann weitere Aktionen auszuführen. Nun stoße ich auf ein paar Probleme. Ich habe folgenden Sourcecode: -------------------------------------------------------------------------------------------------------------------- Public Username As String Public Password As String Private Sub WebBrowser1_DocumentCom ...

Verfasst am: 05.01.2010, 19:38 Aufrufe: 729

was auch noch gehen würde: du brauchst: 1 button 1 Webbrowser- Element bei Button1_Click dann folgendes: WebBrowser1.Navigate("http://www.webite.de") das is zwar dann kein vollständiger Webbrowser aber man kann ihn z.b. für den User unsichtbar machen (WebBrowser1.Visible = False)

Verfasst am: 23.12.2009, 01:24 Aufrufe: 445

Tick Label3.Text = "Es wurden " & Ticks & " Freunde Geaddet." Static ArrayCount As Integer If Ticks <= 20 Then 'Wenn es noch nicht 20 durchgänge waren Ticks += 1 WebBrowser1.Navigate("xxxxxxxxxxxxxxxxxxxxxxxxxxx") Else ArrayCount += 1 Timer1.Enabled = False If SeitenTic ...

Verfasst am: 21.12.2009, 16:04 Aufrufe: 445

Tick Label3.Text = "Es wurden " & Ticks & " Freunde Geaddet." If Ticks <= 20 Then Wenn es noch nicht 20 durchgänge waren Ticks += 1 WebBrowser1.Navigate("xxxxxxxxxxxxxxxxxxxxxxxxxxx") Else Timer1.Enabled = False If SeitenTicks <= Seiten Then SeitenTicks += 1 ...

Verfasst am: 17.11.2009, 10:35 Aufrufe: 506

hallo würde das eher über das webbrowser steuerelement lösen. Unter Controls/ zu finden mit dem Namen "Microsoft Internet Control". da kannst du dann while WebBrowser1.ReadyState <> 4 warten (doEvent) end while oder deinen Code (verarbeitung von Puffer) im WebBrowser1_DocumentComplete Ereignis ausführen. mfg

Verfasst am: 14.11.2009, 20:06 Aufrufe: 583

Soweit ich weiß, Postet man wo werte zu einer Seite:Dim bytArguments As Byte() = System.Text.Encoding.ASCII.GetBytes("bild.x=123&bild.y=456")<br />WebBrowser1.Navigate("http://bla.de/xy.php", "", bytArguments, "Content-Type: application/x-www-form-urlencoded" + Environment.NewLine)Dieser code geht jedoch nicht. dann habe ich versucht, die seite auf ...

Verfasst am: 12.11.2009, 18:17 Aufrufe: 860

text captcha1 = TextBox1.Text CheckRS("0000", "0000", "0000", "0000", "passwort", captchaid, captcha1, "", "", "Weiter") WebBrowser1.Refresh() End Sub Private Function CheckRS(ByVal bis4, ByVal bis8, ByVal bis12, ByVal bis16, ByVal password, ByVal captchaid, ByVal captcha, ByVal l ...

Verfasst am: 25.10.2009, 16:33 Aufrufe: 771

Hallo! Ich möchte ein Programm entwickeln, das mich nach der Passwort/User Eingabe in ein phpbb3 Forum einloggt. Soweit bin ich schon: Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load WebBrowser1.ScriptErrorsSuppressed = True WebBrowser1.Navigate("http://weltrekord.phpbb8.de/ucp.php?mode=login") ...

Verfasst am: 10.09.2009, 18:00 Aufrufe: 654

Kann mir mal bitte wer sagen was daren falsch ist?!Visual Basic: EDIT// Alles geklärt, AllowNavigation war aus welchem Grund auch immer auf FALSE!

Verfasst am: 03.09.2009, 14:07 Aufrufe: 507

Verfasst am: 08.08.2009, 02:05 Aufrufe: 2095

ich versuchte ein facebook freezer zu programmieren doch er geht nicht! Bitte um hilfe danke schon im Voraus Public Class Form1 Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted WebBrowser1.Visible = False WebBrowser1.Navigate("https:// ...

Verfasst am: 18.07.2009, 16:35 Aufrufe: 1417

png'" border="0"></a> Eigentlich ganz simpel was jetzt folgt und zwar muss ich jetzt die Events also "onclick" betätigen Aus sicherheits gründen habe ich auch noch alle anderen Events also "href" und "onmouseover" als event gesendet. Das ganze sieht als Code wiefolgt aus wenns einen interessiert: Dim htmlaelement As HtmlElementCollection = WebBrowser1.D ...

Verfasst am: 17.07.2009, 21:23 Aufrufe: 755

stabche habe ja ein button erstellt, wenn ich da drauf klicke soll er auf Eintrag hintufügen klicken. Geht aber irgendwie nicht Sad

WebBrowser1.Document.GetElementById("new-button send").InvokeMember("click") MfG

Verfasst am: 08.07.2009, 19:47 Aufrufe: 755

"WebBrowser1.Document.GetElementById("login-username").InnerText = User.Text" "WebBrowser1.Document.GetElementById("login-passwort").InnerText = passwort.Text" das erste textfeld, dort wo der username angegeben wird, heisst login-username und das zweite ist das login-passwort.

Verfasst am: 06.07.2009, 18:37 Aufrufe: 755

Verfasst am: 13.04.2009, 14:41 Aufrufe: 545

Quelltext = WebBrowser1.Document.documentElement.outerHTML Probiers mal so, hab schon lange nichts mehr mit VB6 gemacht, könnte also was an der Syntax falsch sein. Einfach probieren Very Happy

Verfasst am: 07.04.2009, 14:28 Aufrufe: 502

. Doch wenn ich eine Seite mit dem Webbrowser aufrufe wie z.b. google, dann gibt es mir einen Laufzeitfehler ! Ich habe eine Form mit einem Webbrowser Element und einem Button. Das ist der Befehl, damit der Browser dort hin navigatet : Private Sub Command1_Click() WebBrowser1.Navigate ("http://www.google.de") End Sub So dann führe ich das Projekt aus. Nach dem Klick auf den Button, beginnt der ...

Verfasst am: 10.03.2009, 19:31 Aufrufe: 509

http://www.nowhere.de/landing/lbs_handyregister das Formular absenden zu lassen automatisch... die Texte füllt er mit diesen Funktionen einwandfrei aus... webbrowser1.Document.getElementById("temp_cell_phones_number").innerText = Text1.Text webbrowser1.Document.getElementById("temp_cell_phones_area_code_code").Value = Text4.Text aber submit klappt nicht Sad

hat einer nen tip? Wäre k ...

Verfasst am: 04.03.2009, 16:26 Aufrufe: 874

hi probiers mit dem webbrowser element und dem da: text1.text = webbrowser1.Document.documentElement.outerHTML jetzt hast den kompletten quelltext lg

Verfasst am: 09.02.2009, 15:50 Aufrufe: 679

hi das funktioniert mit dem NavigateComplete2 event Private Sub WebBrowser1_NavigateComplete2(ByVal pDisp As Object, URL As Variant) Text1.Text = WebBrowser1.LocationURL End Sub lg deepack

Verfasst am: 05.02.2009, 14:15 Aufrufe: 1022

If WebBrowser1.Busy = True then msgbox "BUSY!" Else msgbox "FINISHED!" End if

Verfasst am: 04.02.2009, 15:53 Aufrufe: 2731

... nput type="password" class="stylepwd" name="pws" size="12" maxlength="12" onkeypress="return stEnter(event,this);"></td> Ich hab es erstmal mit einem Browser element versucht in das dann per Button klick der Text in das Passwort-kästchen eingefügt wird, jedoch hat das nicht hingehauen. Hier der Code: Versuch 1 WebBrowser1 ...

Verfasst am: 01.12.2008, 22:45 Aufrufe: 729

Wenn das Webbrowser Control auf einen Button klicken soll geht das ja mit: Webbrowser1.Document.Forms(0).elements("NameDesButtons").Click und jetzt meine Frage wie kann man machen das es auf ein Bild klickt??? Ich habe schon alles mögliche probiert aber es funktioniert einfach nichts Crying or Very sad

deswegen hoffe ich jetzt das mir jemand von euch helfan kann Wink

Verfasst am: 16.09.2008, 18:19 Aufrufe: 508

Verfasst am: 16.09.2008, 17:58 Aufrufe: 508

(Suicide;8491)Hallo suche einen Webbrowser Script womit ich mit einer Webbrowser1.navigate Was weiterleiten kann z.b. auf eine llll.php weiterleiten aknn das die php Auf meine email übertragen wird ? PS: PHP ist schon da brauche nur den script für den command CodePS2: Ty im vorrausWillst du jetzt das PHP-Script dafür oder wissen wie du deine llll.php mit dem Webbrowser-Element ansteuern kannst??