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. hajoh25

Beiträge von hajoh25

  • Programm zum durchsuchen von .inf Datein

    • hajoh25
    • 15. Juli 2015 um 14:44

    Hallo Leute,
    ich wollte in letzter Zeit ein Programm schreiben, mit dem ich eine .ini bzw. eine .inf Datei nach einem Wort zu durchsuchen und danach die Zeile auszugeben, die 2 Zeilen darunter liegt. Das Wort, wonach die Datei durchsucht werden soll, soll man vorher durch einen Input-Eingabefeld festlegen.
    Bei meinem Code funktioniert das Fenster, aber wenn man den Button drckt, passiert nicht. Da ich mich erst 2 Tage mit dem Programm auseinander setze, bitte ich um eure Hilfe.

    Danke im vorraus :)

    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <MsgBoxConstants.au3>
    #include <WinAPIFiles.au3>


    $Form1 = GUICreate("Nummer suchen", 288, 130, 192, 124)
    $Name = GUICtrlCreateLabel("Name", 16, 16, 48, 23)
    GUICtrlSetFont(-1, 12, 800, 0, "Arial")
    $Input = GUICtrlCreateInput("", 16, 40, 249, 28)
    GUICtrlSetFont(-1, 12, 800, 0, "Arial Narrow")
    $Button1 = GUICtrlCreateButton("Suchen", 16, 72, 81, 33)
    GUICtrlSetFont(-1, 12, 800, 2, "Arial Narrow")
    GUISetState(@SW_SHOW)


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


    EndSwitch
    WEnd


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


    $datei = IniRead("C:\Users\Johannes\Desktop\caller.inf", "section2", "key", "NotFound")
    $eingabe = $Input


    $count = _FileReadLines($datei)


    For $i = 1 to $count
    $line = FileReadLine($datei, $i)


    If StringInStr($line, $Input) Then
    $z = 2
    $b = & i + $z


    $line = FileReadLine($datei, $b)
    MsgBox(0, "Nummer gefunden!" & $Input & @CRLF & "" & $line)
    EndIf
    Next


    EndSwitch
    WEnd

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™