Beiträge von Sentex

  • Hilfe

    Es geht um eine Internetseite die mir gehört, leider ist das alles in HTML leider kann ich die nicht in TXT Konvertieren, nagut könnte ich schon, sitze aber dort jahre dran. Und ich benötige alles als TXT datein.

    um welche seite es sich handelt würde ich dir nur privat mitteilen.

  • Hilfe

    Hallo Ich benötige eure Hilfe, und zwar mit den Script kann ich zwar auf internetseiten bestimmte sachen finden und speichern.

    jetzt soll es aber jede seite in TXT speichern auch fortlaufend in 1 To 904625697166532776746648320380374280100293470930272690489102837043110636675

    also seite 1 in 1.txt seite 2 in 2.txt usw....

    für eure hilfe wer ich sehr dankbar


    #include <IE.au3>
    $oIE = _IECreate()
    For $i = 1 To 904625697166532776746648320380374280100293470930272690489102837043110636675
    _IENavigate($oIE, "http://xxxxxx.io/" & $i)
    If StringInStr(_IEDocReadHTML($oIE), "123") Then
    FileDelete($i & ".txt")
    FileWrite($i & ".txt", _IEDocReadHTML($oIE))
    _IEQuit($oIE)
    Exit
    EndIf
    Next
    _IEQuit($oIE)

  • Dringent hilfe

    Hallo ist es möglich mit Autoit ein Programm zu schreiben, was nur direkt in einer Internetseite nach ein Link sucht.

    Die internetseite hat viele unterlinks

    diesete.de/1

    dieseite.de/2

    die unterseiten sind fortlaufend.

    Natürlich wenn er die Links gefunden hat sollte er auf der seite Bleiben, und die ganze seite per TXT abspeichern

  • Suchprogramm

    Könntest du mir sowas schreiben.

    ich habe zwar was gefunden. aber es sucht nur auf der seite und nicht in den unterlinks

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <IE.au3>

    $oIE = _IECreateEmbedded()
    $Browser = GUICreate("", 625, 445, 192, 124)
    $Browser2 = GUICtrlCreateObj($oIE, 8, 0, 609, 401)
    GUISetState(@SW_HIDE, $Browser)
    $Button1 = GUICtrlCreateButton("Zurück zur SuchBot", 256, 408, 139, 25, $WS_GROUP)
    $SuchBot = GUICreate("SuchBot", 223, 78, 192, 124)
    $Input1 = GUICtrlCreateInput("http://", 8, 8, 201, 21)
    $Button2 = GUICtrlCreateButton("Los Gehts!", 8, 32, 201, 17, $WS_GROUP)
    $Label1 = GUICtrlCreateLabel("@ .ShiNy", 8, 56, 49, 17)
    GUISetState(@SW_SHOW, $SuchBot)

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    GUISetState(@SW_HIDE, $Browser)
    GUISetState(@SW_SHOW, $SuchBot)
    Case $Button2
    If GUICtrlRead($Input1) = "http://" Then
    MsgBox(16, "Error", "Du hast keine Ganzes Link angegeben")
    ElseIf GUICtrlRead($Input1) = "" Then
    MsgBox(16, "Error", "Du hast keine URL angegeben")
    Else
    _IENavigate($oIE, GUICtrlRead($Input1))
    GUISetState(@SW_HIDE, $SuchBot)
    GUISetState(@SW_SHOW, $Browser)
    EndIf
    EndSwitch
    WEnd