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

Beiträge von Tacheles75

  • Bilder öffnen durch einem Pfad aus einer .csv Datei

    • Tacheles75
    • 6. Mai 2015 um 18:32

    Klasse Raupi,

    vielen Dank der Schlüssel war "GUICtrlRead". Ich muss noch viel lernen :)

    Hab jetzt auch statt "SplashImageOn" den befehl "ShellExecute" angewendet, da ich es dort selbst beenden, und sich nicht auf Zeit das Fenster schliesst!

    Danke noch einmal, bestimmt nicht meine letzte Frage

    Gruß Sascha

  • Bilder öffnen durch einem Pfad aus einer .csv Datei

    • Tacheles75
    • 6. Mai 2015 um 17:31

    Hallo alle zu sammen,

    ich bin recht neu im Thema und hab schon einiges verstanden. Also Ausgangsdatei hab ich das Bookmanagment script benutzt.
    Mein Projekt ist eine Fehlerdatenbank in den man Fehlernummer, Fehlerbeschreibung, Mögliche Ursache, Fehler Beheben schreiben bzw auslesen kann!
    Das Klappt auch schon recht gut! So jetzt, wo ihr mir helfen könntet:

    Ich möchte gern Bilder zu den Einträge hinterlegen die mit einem Button, zu öffnen sind (cool wäre mehrere Bilder aber eins pro Eintrag wäre schon Top)

    Ich hab also versucht in die datenbank.csv einen eintrag mit dem pfad der jpg datei geschrieben nur ich bekomme es nicht hin die Datei zu öffen!

    Probiert hab ich schon Fileopen, SplashImageOn, ShellExecute, FileOpenDialog aber nichts hat geklappt.
    Vielleicht hab ich noch nicht den richtigen Befehl gefunden oder den script falsch geschrieben!
    Bin mir auch nicht sicher ob es nur mit einer func klappt!

    Hier eine vereinfachter Script

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

    #include <GUIConstantsEx.au3>
    #include <File.au3>

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

    Global $Dateiname = "datenbank.csv"
    Global $inhalt
    Global $Zeile
    Global $datensatz

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

    dim $input[4]
    dim $label[4]

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

    GUICreate("Fehlerabfrage", 400, 400, 250, 10)

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

    $label[0] = GUICtrlCreateLabel("", 1, 1, 1, 1)
    $label[1] = GUICtrlCreateLabel("Eingabe 1:", 20, 20, 200, 25)
    $label[2] = GUICtrlCreateLabel("Eingabe 2:", 20, 60, 200, 25)
    $label[3] = GUICtrlCreateLabel("Bild Pfad:", 20, 100, 200, 25)

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

    $input[0] = GUICtrlCreateInput("", 1, 1, 1, 1)
    $input[1] = GUICtrlCreateInput("", 100, 20, 200, 25)
    $input[2] = GUICtrlCreateInput("", 100, 60, 200, 25)
    $input[3] = GUICtrlCreateInput("", 100, 100, 200, 25)

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

    $Button1 = GUICtrlCreateButton("zurück", 100, 170, 80, 25)
    $Button2 = GUICtrlCreateButton("weiter", 200, 170, 80, 25)
    $Button3 = GUICtrlCreateButton("Bild", 100, 140, 80, 25)

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

    $mlMenuDatei = GUICtrlCreateMenu("Datei")
    $mlprogrammbeenden = GUICtrlCreateMenuItem("Beenden", $mlMenuDatei)

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

    GUISetState(@SW_SHOW)

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

    Einlesen_Datei()

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

    $datensatz = 2
    Anzeige_Datensatz_nr($datensatz)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    case $Button1
    $datensatz = $datensatz - 1
    Anzeige_Datensatz_nr($datensatz)
    case $Button2
    $datensatz = $datensatz + 1
    Anzeige_Datensatz_nr($datensatz)
    Case $Button3
    Anzeige_Bild()
    EndSwitch
    WEnd

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

    Func Anzeige_Bild()
    SplashImageOn("Splash Fenster", $input[3], 250, 50)
    Sleep(3000)
    SplashOff()
    EndFunc

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

    func Einlesen_Datei()
    $inhalt = FileRead($Dateiname)
    if $inhalt = "" then $inhalt = neue_Datei()
    $zeile = StringSplit($inhalt, @crlf, 3)
    endfunc

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

    func Anzeige_Datensatz_nr($nummer)
    if UBound($zeile) <= 2 then return
    if $nummer < 1 then $nummer = UBound($zeile) - 2
    if $nummer > UBound($zeile) - 2 then $nummer = 1
    $datensatz = $nummer
    $feld = StringSplit($zeile[$nummer], "|", 3)
    for $i = 0 to UBound($input) - 1
    GUICtrlSetData($input[$i], $feld[$i])
    Next
    endfunc

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

    func neue_Datei()
    $Datensatz = ""
    for $i = 0 to UBound($input) - 1
    $Datensatz = $Datensatz & GUICtrlRead($label[$i]) & "|"
    Next
    FileWrite($Dateiname, $Datensatz & @crlf)
    Einlesen_Datei()
    EndFunc

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

    Die datenbank.csv sieht so aus
    Anzahl id|Eintrag 1|Eintrag 2|Bild Pfad
    |Eintrag1|Eintrag1|"C:\bilder\1.JPG"
    |Eintrag2|Eintrag2|"C:\bilder\2.JPG"
    |Eintrag3|Eintrag3|"C:\bilder\3.JPG"

    Also wenn ihr lust habt mir zu helfen dann her mit Euren lösungen.

    Danke sagt Sascha

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™