1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. vel2000

Beiträge von vel2000

  • Mehrere Seiten gleichzeitig unsichtbar öffnen (ca.20)

    • vel2000
    • 1. Mai 2011 um 01:30
    Zitat

    Öhm naja wie gesagt verwende doch _ienavigate:


    Dein Beispiel mit google, heise etc. funktioniert.
    Bei meinen gewünschten Seiten, wird jedoch nur die erste geladen. Ich vermute mal wegen der Flash-Livestreams.

    [autoit]

    $myIE = _IECreate()
    _IENavigate($myIE,"zattoo.com/view#rtl")
    Sleep(1000)
    _IENavigate($myIE,"zattoo.com/view#prosieben")
    Sleep(1000)
    _IENavigate($myIE,"zattoo.com/view#ard")
    Sleep(1000)

    [/autoit]


    In der IE Eingabezeile, werden die anderen beiden zwar kurz angezeigt, aber nicht geladen
    EDIT: mir ist gerade was seltsames aufgefallen...
    Wenn z.B.: die Seite "zattoo.com/view#rtl" geladen ist, und ich paste "zattoo.com/view#prosieben" in die Eingabezeile und drücke "Enter", wird die Seite ebenfalls nicht geladen ?( . Nur wenn ich F5 drücke, oder den "aktualisieren" Button anklicke.
    Was ist das denn nun wieder? IE9

  • Mehrere Seiten gleichzeitig unsichtbar öffnen (ca.20)

    • vel2000
    • 30. April 2011 um 15:16
    Zitat

    Wo wird was übermittelt? Redest du von den Links in dieser Cache Datei? Wenn ja musste halt noch bei jedem Link ein

    nein, wenn wie im obigen Beispiel

    Code
    Send("http://abc.com/[color=#ff0000]view#abc1[/color]") geschickt wird, erhält der IE nur http://abc.com/[color=#ff0000]viewabc1[/color]


    Aber egal, da diese Methode nichts taugt.
    Separate Authentifizierung ist nicht nötig, erledigt der Browser automatisch.
    Separate Fenster/Tabs funktioniert auch nicht mehr, da alle anderen geblockt sind, sobalt das erste Fenster/Tab, die Authorisierung erhalten hat! (ging aber mal)
    Dh: Entweder müssen die Fenster ein nach dem anderen geöffnet und geschlossen werden (funktioniert, aber saulahm), oder am besten Mausklicks auf die entsprechenden Links simuliert werden.
    Wenn ich die Links manuell anklicke, habe ich die gewünschten Dateien nämlich innerhalb von 5-10 Sekunden pro Link. Bei der Seite handelt es sich um Zatt** Schweiz.
    Ein entsprechender Link sieht so aus. (Mit Firebug ermittelt):

    Code
    <li class="zapper_prosieben">
    		<span class="channel-search"></span>
    		<a class="name" href="/view/prosieben" onclick="playercontroller.switchMetachannel('prosieben', 'zapper'); return false;">
    			<img src="/static/images/black.jpg" original="/static/images/channels/b_42x24/Pro7.png" alt="Pro7 Schweiz" />
    			<div class="updatable_content">
    			<span class="now-showing">
    
    			</span>
    			<span class="next-showing"><span class="next">next:</span>
    
    			</span>
    			</div>
    		</a>
    	</li>
    Alles anzeigen
  • Mehrere Seiten gleichzeitig unsichtbar öffnen (ca.20)

    • vel2000
    • 30. April 2011 um 11:04

    SO,
    ich habe jetzt mal alles durchprobiert und es funktioniert auch irgendwie....
    Das Problem ist aber, erstens dauert es sehr lange und zweitens laden die Seiten ewig weiter, und da sie Flash-Movies beinhalten, ist die Bandbreite recht schnell verbraucht. Zudem sind seit neuestem weitere Seitenaufrufe geblockt, solange ein Movie läuft.. :thumbdown:
    ABER: nach längerem hin und herüberlegen und probieren, hab ich festgestellt, daß es reichen würde, wenn man die einzelnen Links nacheinander aufruft.
    Mit anderen Worten so:
    Zuerst die Hauptseite aufrufen, warten bis die geladen ist (30 Sekunden) und dann auf dieser Seite nacheinander die Links aufrufen. Quasi das anklicken simulieren. (Adressen sind bekannt)
    Also zuerst http://hauptseite/ link1..dann ca . 20 Sekunden warten, http://hauptseite/Link2 "anklicken" usw.
    Ich habs auch mal so probiert:

    [autoit]

    #include <IE.au3>
    $oIE = _IECreate("http://abc.com", 0, 1, 0) ;das ist die Homepage
    Sleep(30000)

    [/autoit][autoit][/autoit][autoit]

    ;Link1
    Send("^t") ;neuen Tab öffnen
    Send("http://abc.com/view#abc1") ;internetseite angeben
    Send("{ENTER}") ;enter
    Sleep(15000) ;warten
    Send("^w") ;Tab schließen

    [/autoit][autoit][/autoit][autoit]

    Sleep(1000)

    [/autoit][autoit][/autoit][autoit]

    ;Link2
    Send("^t")
    Send("http://abc.com/view#abc2")
    Send("{ENTER}")
    Sleep(15000)
    Send("^w")

    [/autoit][autoit][/autoit][autoit]

    Sleep(1000)

    [/autoit]


    Funktioniert allerdings nur solange das Fenster den Fokus behält.... :(
    Zweitens werden die Links in dem Format: "view#abc2" als "viewabc2" übermittelt, also unbrauchbar.
    Den Rest, das kopieren und auslesen, habe ich mittlerweile hinbekommen. es geht also nur noch um den Seitenaufruf

  • Mehrere Seiten gleichzeitig unsichtbar öffnen (ca.20)

    • vel2000
    • 29. April 2011 um 14:32
    Zitat


    Ganz einfach würde es statt mit WinHttp & co auch mit InetRead / InetGet gehen - sogar gleichzeitig.
    Da alle 4 textbasiert sind, sparst du dir auch das laden von Werbung, Bildern, Flash, JavaScript, Videos usw - du bekommst nur den Quelltext der Seite zurück

    Tja, so einfach ist es nicht, ansonsten hätte ich mir ein kleines Shell Script gebastelt und die Seiten mit CURL/Wget geladen.
    Kurze Erklärung: Beim laden der Seite mit FF/IE (Authentifizierug notwendig), wird dynamisch ein Link generiert, der eine zeitbegrenzte Gültigkeit hat. Eine kleine Datei wird dabei im Cache gespeichert, aus der man diesen Link auslesen kann. Im Quelltext ist er nicht enthalten.
    Also Quelltext auslesen fällt weg!
    Und der IE aus dem Grund, weil dort die entsprechenden Dateien sehr einfach im Cache zu finden sind. Beim FF werden sie umbenannt und sind damit nutzlos.
    Fazit: Es geht nur so, wie ich es beschrieben habe...(zudem beim Aufruf der Seiten noch "X-forwarded-for" gesetzt sein muss und die ganze Geschichte noch zusätzlich über TOR läuft...) ;)
    Kann man nicht, den IE nur einmal laden, und die ganzen Seiten in Tabs?

    Zitat

    1
    StringRegExp

    Hab ich schon gefunden.
    Ist aber mehr oder weniger eine Auflistung/Erklärung der versch. Regular Expressions.
    Meine Syntax ist schon ok, funktioniert z.B. auch zuverlässig in Notepad++
    Ein kleines Beispiel, das den obigen egrep Aufruf umsetzt und das gefundene, in eine Datei schreibt, bzw. es an diese anhängt, wäre nett. Der Rest ist schon nervig genug.. :rolleyes:
    thanks im voraus

  • Mehrere Seiten gleichzeitig unsichtbar öffnen (ca.20)

    • vel2000
    • 29. April 2011 um 08:26

    Hallo zusammen,
    1. Ich möchte mit dem IE ($oIE) mehrere Seiten gleichzeitig, bzw in kurzem Abstand öffnen.
    2. Dann warten bis bestimmte Dateien, (deren jeweiliger Dateiname einen bestimmten String enthält) in den temporären Internet Dateien gelandet ist. Dann sollte sich diejenige Seite/Tab wieder schliessen
    (2. wäre nicht ganz so wichtig, aber nett zu haben)
    3. Sollen dann die Dateien aus dem Cache an einen anderen Ort kopiert werden (nicht so kompliziert), (und nach Links durchsucht werden, komplizierter)
    Letzteres mache ich bisher per "egrep" unter Cygwin,

    Code
    egrep -o -h 'http://[^"]*' /home/xxx/datei >> /home/xxx/neue_Datei.txt


    denke aber, das Autoit eine ähnliche Funktion enthalten wird..
    Bisher bin mehr oder unelegant vorgegangen und zwar so:

    [autoit]

    #include <IE.au3>
    ProcessClose("iexplore.exe")
    Sleep(500)
    Run("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8") ;leert zuerst den cache
    $oIE = _IECreate("seite1.com/test", 0, 0)
    $oIE = _IECreate("seite2.com/test", 0, 0)
    $oIE = _IECreate("seite3.com/test", 0, 0)
    ProcessClose("iexplore.exe")

    [/autoit]


    So landen dann auch die gewünschten Dateien im Cache (der zuerst geleert wird).
    Es werden natürlich auch diverse iexplore Prozesse gestartet, zwar unsichtbar, aber immerhin.
    Das geht doch mit Sicherheit eleganter..;)

  • [Newbie] VLC nach Internet disconnect/IP-Wechsel neu starten?

    • vel2000
    • 18. Dezember 2010 um 14:27

    Das nenn ich mal ein super Forum :thumbup:
    kompetente Antworten, die wirklich weiterhelfen!
    Ich habe heute ein wenig Zeit gehabt und bin, dank zusammengesuchter Code-Fragmente nun ein wenig weiter.
    Habe mir mit Koda eine Gui gebastelt, die zwar (im Moment) nicht schön ist, aber funktioniert :D
    Ich habe direkt noch ein paar andere Funktionen integriert.
    Zudem lasse ich VLC, während der IP-Überwachung, nicht mehr neu starten, sondern betätige nur nur die Stop/Play Tasten, reicht auch..
    Das Script ist bestimmt nicht optmal und beinhaltet mit Sicherheit einiges überflüssiges..aber "it works"

    Spoiler anzeigen
    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_outfile=VLC-starten.exe
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <Date.au3>
    #include <Inet.au3>
    FileInstall("C:\users\vel\Desktop\stream playlist auf Muvid.bat", "C:\Temp\stream playlist auf Muvid.bat")
    FileInstall("C:\users\vel\Desktop\Batch Dateien\stream zum verserver\logos-icons\internet_radio.jpg", "C:\Temp\internet_radio.jpg")
    FileInstall("J:\VLC\Revolunet\skyy.jpg", "C:\Temp\skyy.jpg")
    FileInstall("C:\users\vel\Desktop\Batch Dateien\stream zum verserver\logos-icons\VLC-Vserver-aus-logo.jpg", "C:\Temp\VLC-Vserver-aus-logo.jpg")
    FileInstall("C:\users\vel\Desktop\Batch Dateien\stream zum verserver\logos-icons\PNG\ard_logo.jpg", "C:\Temp\ard_logo.jpg")
    FileInstall("C:\users\vel\Desktop\Batch Dateien\sky.bat", "C:\Temp\sky.bat")
    FileInstall("C:\users\vel\Desktop\radio.bat", "C:\Temp\radio.bat")

    [/autoit] [autoit][/autoit] [autoit]

    Opt("GUIOnEventMode", 1)
    #Region ### START Koda GUI section ### Form=c:\users\vel\desktop\test.kxf
    $Form1_1 = GUICreate("Form1", 617, 438, -1, -1)
    GUISetBkColor(0xA0A0A4)
    GUISetOnEvent($GUI_EVENT_CLOSE, "Form1_1Close")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1_1Minimize")
    GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1_1Maximize")
    GUISetOnEvent($GUI_EVENT_RESTORE, "Form1_1Restore")
    $Button2 = GUICtrlCreateButton("VLC-STOPPEN", 223, 352, 169, 73)
    GUICtrlSetFont($Button2, 12, 400, 0, "Verdana")
    GUICtrlSetBkColor($Button2, 0xFF0000)
    GUICtrlSetCursor ($Button2, 0)
    GUICtrlSetOnEvent($Button2, "Button2Click")
    $Pic1 = GUICtrlCreatePic("C:\Temp\skyy.jpg", 127, 135, 169, 73)
    GUICtrlSetTip($Pic1, "SKY starten")
    GUICtrlSetCursor ($Pic1, 0)
    GUICtrlSetOnEvent($Pic1, "Pic1Click")
    $Pic2 = GUICtrlCreatePic("C:\Temp\internet_radio.jpg", 128, 16, 169, 105)
    GUICtrlSetTip($Pic2, "Internet-Radio Stream zum Muvid")
    GUICtrlSetCursor ($Pic2, 0)
    GUICtrlSetOnEvent($Pic2, "Pic2Click")
    $Pic3 = GUICtrlCreatePic("C:\Temp\VLC-Vserver-aus-logo.jpg", 318, 16, 169, 105)
    GUICtrlSetTip($Pic3, "VLC stoppen")
    GUICtrlSetCursor ($Pic3, 0)
    GUICtrlSetOnEvent($Pic3, "Pic3Click")
    $Button1 = GUICtrlCreateButton("VLC -Playliste > MUVID", 320, 136, 169, 73)
    GUICtrlSetFont($Button1, 11, 400, 0, "Verdana")
    GUICtrlSetColor($Button1, 0xFF0000)
    GUICtrlSetTip($Button1, "Playliste auf den Muvid streamen")
    GUICtrlSetCursor ($Button1, 0)
    GUICtrlSetOnEvent($Button1, "Button1Click")
    $Pic4 = GUICtrlCreatePic("C:\Temp\ard_logo.jpg", 128, 216, 169, 73)
    GUICtrlSetOnEvent($Pic4, "Pic4Click")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    $datum = _Now()
    $ip = _GetIP()
    FileWriteLine("c:\ip_log.txt", "Programm gestartet am " & $datum & " mit IP: " & $ip)

    [/autoit] [autoit][/autoit] [autoit]

    While (1)
    if (ProcessExists("vlc.exe")) Then
    $PublicIP_alt = _GetIP()
    Sleep(10000)
    $PublicIP_neu = _GetIP()
    If $PublicIP_alt <> $PublicIP_neu Then
    $datum = _Now()
    FileWriteLine("c:\ip_log.txt", "IP-Wechsel am " & $datum & " Neue IP: " & $PublicIP_neu)
    Send("^!s")
    Sleep(5000)
    Send("^!p")
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    WEnd ; ''

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Func Button1Click()
    ProcessClose("vlc.exe")
    Sleep(500)

    [/autoit] [autoit][/autoit] [autoit]

    Run("C:\Temp\stream playlist auf Muvid.bat")
    EndFunc ;==>Button1Click
    Func Button2Click()
    If ProcessExists("vlc.exe") Then ; Erstelle die MsgBox
    ProcessClose("vlc.exe")
    Else
    MsgBox(4096, "Achtung", "VLC läuft nicht!") ; ''
    EndIf
    EndFunc ;==>Button2Click

    [/autoit] [autoit][/autoit] [autoit]

    Func Pic2Click()
    ProcessClose("vlc.exe")
    Sleep(500)

    [/autoit] [autoit][/autoit] [autoit]

    Run("C:\Temp\radio.bat")
    ; Else
    ; MsgBox(4096, "Achtung", "VLC läuft nicht!")
    ; Exit
    EndFunc ;==>Pic2Click
    Func Pic3Click()
    If ProcessExists("vlc.exe") Then ; Erstelle die MsgBox
    ProcessClose("vlc.exe")
    Else
    MsgBox(4096, "Achtung", "VLC läuft nicht!") ; ''
    EndIf
    EndFunc ;==>Pic3Click
    Func Form1_1Close()
    Exit ; Beende das Script
    EndFunc ;==>Form1_1Close
    Func Form1_1Maximize()

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc ;==>Form1_1Maximize
    Func Form1_1Minimize()

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc ;==>Form1_1Minimize
    Func Form1_1Restore()

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc ;==>Form1_1Restore

    [/autoit] [autoit][/autoit] [autoit]

    Func Pic1Click()
    ProcessClose("vlc.exe")
    Sleep(500)

    [/autoit] [autoit][/autoit] [autoit]

    Run("C:\Temp\sky.bat") ;<---- startet VLC und verbindet zu dem "Sky-Streaming-Server"
    EndFunc ;==>Pic1Click
    Func Pic4Click()
    ProcessClose("vlc.exe")
    Sleep(500)

    [/autoit] [autoit][/autoit] [autoit]

    Run("C:\Program files\VideoLAN\VLC_1.0.5\vlc.exe http://xxx:xxx@xxxx.dyndns.info:8889/ext;QUALITY=250/1") ;<--- startet VLC und schaltet den VDR-Server in D auf ARD um
    EndFunc ;==>Pic4Click

    [/autoit]


    nochmals recht vielen Dank

  • [Newbie] VLC nach Internet disconnect/IP-Wechsel neu starten?

    • vel2000
    • 17. Dezember 2010 um 11:14

    hey, das ging ja fix mit den Antworten :thumbup:
    werde das ein oder andere gleich mal testen..

    Zitat

    Was mich noch interessiert, was macht dein VLC denn die ganze Zeit? Also wofür brauchst du das?

    Mein VLC empfängt TV-Streams von meinem Server in Deutschland und restreamt die dann per Multicast hier.
    Nur funktioniert leider kein auto-reconnect bei IP-Wechsel.
    Und da mein DSL Hier (in Asien) leider alles andere als stabil ist...müsste ich halt jedesmal den VLC neu starten. Lästig :thumbdown:

    EDIT: das Script von chip reicht im Grunde, jetzt noch eine Frage:
    Ich habe das ein wenig modifiziert und würde gerne eine kleine Gui (Koda) haben um den den VLC manuell starten zu können.
    Mein Code sieht zur Zeit so aus:

    [autoit]


    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <Inet.au3>
    #Region ### START Koda GUI section ### Form=C:\Users\vel\Desktop\vlc-start-stop.kxf
    $Form1 = GUICreate("Form1", 625, 444, 192, 124)
    $Button1 = GUICtrlCreateButton("Start VLC", 16, 8, 585, 137, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("VLC stoppen", 112, 224, 409, 97, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    [/autoit][autoit][/autoit][autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1

    [/autoit][autoit][/autoit][autoit]

    Run ("C:\Users\vel\Desktop\radio.bat")
    $ip = _GetIP()
    While (1)
    If $ip <> _GetIP() Then
    $PID = ProcessExists("vlc.exe")
    If $PID > 0 Then
    ProcessClose($PID)
    ProcessWaitClose($PID)
    EndIf
    Run("C:\Users\vel\Desktop\radio.bat")
    $ip = _GetIP()
    EndIf
    Sleep(100)

    [/autoit][autoit][/autoit][autoit]

    WEnd
    Case $Button2
    ProcessClose("vlc.exe")

    [/autoit][autoit][/autoit][autoit]

    EndSwitch
    WEnd

    [/autoit]


    Starten/Restart von VLC und IP Check funktioniert auch, nur hätte ich gern noch einen Button in der Gui um den VLC zu stoppen.
    Der Stop Button funktioniert leider nur, wenn der VLC NICHT übers Script gestartet wurde...(hat wohl was mit der Schleife zu tun), wie löse ich das denn jetzt

    OT:

    Zitat

    Ist ja auch noch/wieder früh!

    bei mir nicht mehr.. ;)

  • [Newbie] VLC nach Internet disconnect/IP-Wechsel neu starten?

    • vel2000
    • 17. Dezember 2010 um 03:42

    Hallo zusammen,
    ich bin auf der Suche nach einem einfachen Script, welches meine Internet Verbindung überwacht (ggfs. per Ping o.ä). Und dann bei
    IP-Änderung, reconnect oder wenn z.B. 30 Sekunden keine Netzaktivität stattfand, VLC neu startet.
    Ich habe das bisher per Batch-Datei erledigt. Ist allerdings eine mehr unschöne Angelegenheit, da die dauernden pings auf google, unnötige Netzwerklast erzeugen...
    Meine bisherige Batch-Datei:

    Code
    :deconnecte
    cd c:\
    ping -n 4 -w 5000 www.google.com
    if %errorlevel%==1 goto deconnecte
    
    
    cd C:\Program files\VideoLAN\VLC_1.1.5
    start VLC.exe --http-caching=15000 "C:\Users\vel\Desktop\radio.xspf"
    :connecte
    cd c:\
    ping -n 4 -w 5000 www.google.com
    if %errorlevel%==0 goto connecte
    cd C:\Program files\VideoLAN\VLC_1.1.5
    ::VLC-QUIT.exe
    TASKKILL /F /IM "vlc.exe"
    goto deconnecte
    Alles anzeigen

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™