kostenloser Webspace werbefrei: lima-city

vb-klicktool

lima-city → Forum → Programmiersprachen → Basic

1. Autor dieses Themas

   zordy

   

   zordy hat kostenlosen Webspace.

   22:42, 9.10.2007

   hallo,
   ich möchte ein vb prgramm schreiben, dass alle 2 Minuten den Firefox oder IE aufruft und dann eine gewisse url aufruft. Ist das in vb möglich?

2. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

3. lccserver

   

   lccserver hat kostenlosen Webspace.

   1:29, 10.10.2007

   @TThobsen: Ich denke mal zordy ist eher an nem kleinen Beispielcode, als 'nem "Ja" oder "Nein" interessiert...*gg*
   
   Gib einfach folgenden Code an:
   
   Private Sub StartProgramm()
   'Startet Internet-Explorer >> www.Google.de
   Process.Start("IExplore.exe http://www.google.de")
   'Startet Netscape >> www.Google.de
   Process.Start("Netscp.exe http://www.google.de")
   '...usw
   End Sub
   
   Das Zeitlimit kannst beispielsweise mit nem Timer realisieren, falls es noch Unklarheiten gibt, meld dich einfach noch mal...

4. cbhp

   Co-Admin

   cbhp hat kostenlosen Webspace.

   9:19, 10.10.2007

   
   
   
   Private Sub StartProgramm()
   'Startet Internet-Explorer >> www.Google.de
   Process.Start("IExplore.exe http://www.google.de")
   'Startet Netscape >> www.Google.de
   Process.Start("Netscp.exe http://www.google.de")
   '...usw
   End Sub
   
   Das Zeitlimit kannst beispielsweise mit nem Timer realisieren, falls es noch Unklarheiten gibt, meld dich einfach noch mal...
   

   
   
   Ja, so gehts in VB .NET,
   in VB 6 und VBA siehts so aus:
   
   

   Shell "c:\programme\internet explorer\iexplore.exe http://www.google.de"
   Shell "c:\programme\mozilla firefox\firefox.exe http://www.google.de"

5. Autor dieses Themas

   zordy

   

   zordy hat kostenlosen Webspace.

   9:59, 10.10.2007

   könnte man das auch noch automatisieren.
   so das es das alle zwei minuten macht?

6. lccserver

   

   lccserver hat kostenlosen Webspace.

   11:19, 10.10.2007

   Klar, ich nutze dafür immer Timer:
   -Erstelle einen Timer
   >>Name: Timer1
   >>Interval: 100
   >>Enabled: True
   
   
   Quellcode:
   
   Dim Ticket As Integer
   
   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
   Ticket = Ticket + 1 '>Zähler (Ticket) um eins erhöhen (1 entspricht 0.1 Sekunden)
   
   If Ticket = 1200 Then
   StartProgramm() 'Sub-Routine ausführen
   Ticket = 0 'Variable Ticket auf 0 setzen >> Wieder von vorn zählen
   End If
   End Sub
   
   
   Private Sub StartProgramm()
   'Startet Internet-Explorer >> www.Google.de
   Process.Start("IExplore.exe http://www.google.de"
   'Startet Netscape >> www.Google.de
   Process.Start("Netscp.exe http://www.google.de"
   End Sub
7. Autor dieses Themas

   zordy

   

   zordy hat kostenlosen Webspace.

   12:50, 10.10.2007

   Zum oberen:
   wird die seite eigentlich wirklich neu geladen oder einfach aus dem cache aufgerufen?
   das wär jetzt aber in vb.net oder?
   gibt es auch einen befehl, mit dem ich über vb die verbnindung zum internet trennen kann und wieder einwählen kann.
   

8. cbhp

   Co-Admin

   cbhp hat kostenlosen Webspace.

   13:26, 10.10.2007

   VB 6: Realisierung mit Timer
   

   Setze Timer.Interval = 60000 'Entspricht 1 Minute
   Setze Timer.Enabled = True 'Aktiviere den Timer
   
   Option Explicit
   Dim Counter As Integer
   
   Private Sub Timer1_Timer()
       If Counter < 2 Then 'Um 2 Minuten zu erreichen, wird eine Z&auml;hlvariable eingebaut
           Counter = Counter + 1
       Else
           Shell "c:\programme\internet explorer\iexplore.exe http://www.google.de"
           Shell "c:\programme\mozilla firefox\firefox.exe http://www.google.de"
           Counter = 0
       End If
   End Sub

   
   
   
   VB .NET: Realisierung mit Timer
   

   Setze Timer1.Interval = 120000 '(1000 Millisekunden * 60 Sekunden * 2 Minuten)
   Setze Timer1.Enabled = True 'Aktiviere den Timer
   
   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       Diagnostics.Process.Start("iexplore.exe", "http://www.google.de")
       Diagnostics.Process.Start("firefox.exe", "http://www.google.de")
   End Sub

   
   
   
   Die Internetverbindug lässt sich nicht einfach so trennen, denn es hängt davon ab, wie die Verbindung hergestellt wird, z.B. über ein Modem mit einem Einwählprogramm oder einer Verbindung über den Router, WLAN-Netzwerk...
   Die Internetseite wird genauso neu geladen, wie wenn du als Benutzer eine Seite im Webbrowser eintippst und aufrufst.
9. Autor dieses Themas

   zordy

   

   zordy hat kostenlosen Webspace.

   13:42, 10.10.2007

   bei einem modem müsste es möglich sein oder?

10. cbhp

    Co-Admin

    cbhp hat kostenlosen Webspace.

    17:16, 10.10.2007

    
    bei einem modem müsste es möglich sein oder?
    

    
    
    
    Probier's aus.... Einwählprogramm schließen und neu öffnen vielleicht? ;)

11. f********r

    14:52, 16.10.2007

    1. Hier gehts um VB, nicht um JS oder sonstiges.
    2. Wollen wir ja beim Thema bleiben und uns net damit befassen ob Knights Spammen
    3. -closed-
    
    Falls Noch Fragen Auftauchen sollten PN an mich.
    
    
    LG, Felix
    
    
    

12. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

    lima-city: Gratis werbefreier Webspace für deine eigene Homepage

Dir gefällt dieses Thema?