mit autoit und SQLite einträge in DB schreiben/auslesen

  • Hallo @ all ..

    Ich kenne mich leider nicht so gut aus in sqlite..das ist schon ein kleines problem.
    bin aber lernbereit.
    nun zu meinem folgenden problem.

    ich habe ein kleines programm was mir bei meiner arbeit etwas helfen soll.
    Ich arbeite in der Gastronomie.
    es soll meine daten in eine datenbank eintragen und auslesen diese dann in die entsprechenden eintragen/auslesen.

    vielleicht kann mir jemand helfen dies zu erklären wie ich ein input feld auslese(das ist klar) und in die sqlite datenbank eintrage in ein neues feld..

    hier mein programm beispiel.

    Spoiler anzeigen
    [autoit]

    ;denke daran das du noch in dem programm die inputfelder sortieren musst wenn du alles zusammenbaust.
    ;und das du sie sortierst.
    ;und die if anweisungen kontrolieren die hauen nicht hin.
    ;und das du ladebalken erstellst mit gui.so das beim auslesen oder programmstart eine zweite ui kommt mit ladebalken.
    ;der dafür notwendige include ist schon drinne

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

    ;EIN HERSTELLERFELD MUSS NOCH ERSTELLT WERDEN
    Opt("GUIOnEventMode", 0)
    #NoTrayIcon
    #include <GuiListView.au3>
    #include <GUIConstants.au3>
    #include "SQLite.au3"

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

    #include <ButtonConstants.au3>
    #include <ComboConstants.au3>
    #include <DateTimeConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>
    #include <ProgressConstants.au3>

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

    #include <GUIListBox.au3>
    #include <IE.au3>
    #include <WinAPI.au3>

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

    ;----------------------------------------
    #include <array.au3>
    #include "mysql.au3"
    ; MYSQL starten, DLL im PATH (enthält auch @ScriptDir), sont Pfad zur DLL angeben. DLL muss libmysql.dll heißen.
    ;-----------------------------------
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Verwaltungs- / Warenbestandsprogramm Vers.: 1.00 by Black_Hackers", 803, 669, 180, 52)
    $Tab1 = GUICtrlCreateTab(8, 8, 785, 649)
    $TabSheet1 = GUICtrlCreateTabItem("Waren Eintragen")
    GUICtrlSetState(-1,$GUI_SHOW)
    $Group1 = GUICtrlCreateGroup("Waren Eintragen", 16, 41, 769, 265)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Input1 = GUICtrlCreateInput("Produkt-Nr.:", 32, 65, 169, 22)
    $Input2 = GUICtrlCreateInput("Produkt.:", 32, 89, 169, 22)
    $Combo1 = GUICtrlCreateCombo("Einheit wählen", 32, 113, 169, 25)
    GUICtrlSetData(-1, "Kg|Gramm|Stk|Liter|Flaschen|Dosen|Kisten")
    $Combo2 = GUICtrlCreateCombo("Abteilung wählen", 32, 137, 169, 25)
    GUICtrlSetData(-1, "Küche|Service|Sonstiges")
    $Input3 = GUICtrlCreateInput("Maximal-Bestand.:", 32, 161, 169, 22)
    $Input4 = GUICtrlCreateInput("Melde-Bestand.:", 32, 185, 169, 22)
    $Input5 = GUICtrlCreateInput("Mindest-Bestand.:", 32, 209, 169, 22)
    $Input6 = GUICtrlCreateInput("Preis.:", 32, 233, 169, 22)
    $Input7 = GUICtrlCreateInput("Lieferant.:", 216, 65, 169, 22)
    $Input8 = GUICtrlCreateInput("Kunden-Nummer.:", 216, 89, 169, 22)
    $Input9 = GUICtrlCreateInput("Adresse.: Straße, Hausnummer", 216, 113, 169, 22)
    $Input10 = GUICtrlCreateInput("Adresse.: Plz, Ort", 216, 137, 169, 22)
    $Input11 = GUICtrlCreateInput("Telefon-Nr.:", 216, 161, 169, 22)
    $Input12 = GUICtrlCreateInput("Fax-Nr.:", 216, 185, 169, 22)
    $Input13 = GUICtrlCreateInput("Internetseite.:", 216, 209, 169, 22)
    $Input14 = GUICtrlCreateInput("Bemerkung.:", 216, 233, 169, 22)
    $MonthCal1 = GUICtrlCreateMonthCal("2012/06/08", 400, 65, 185, 185); <--------hier soll er die daten aus der config dann lesen.
    $Date1 = GUICtrlCreateDate("2012/06/08 07:33:19", 592, 65, 185, 193)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Button1 = GUICtrlCreateButton("Ware Eintragen", 24, 265, 753, 33)
    $Group2 = GUICtrlCreateGroup("Waren Löschen", 16, 313, 769, 265)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Combo3 = GUICtrlCreateCombo("Produkt wählen", 30, 335, 169, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
    $Input15 = GUICtrlCreateInput("Produkt-Nr.:", 30, 359, 169, 22)
    $Input16 = GUICtrlCreateInput("Einheit.:", 30, 383, 169, 22)
    $Input17 = GUICtrlCreateInput("Abteilung.:", 30, 407, 169, 22)
    $Input18 = GUICtrlCreateInput("Maximal-Bestand.:", 30, 431, 169, 22)
    $Input19 = GUICtrlCreateInput("Melde-Bestand.:", 30, 455, 169, 22)
    $Input20 = GUICtrlCreateInput("Mindest-Bestand.:", 30, 479, 169, 22)
    $Input21 = GUICtrlCreateInput("Preis.:", 30, 503, 169, 22)
    $Input22 = GUICtrlCreateInput("Lieferant.:", 213, 335, 169, 22)
    $Input23 = GUICtrlCreateInput("Kunden-Nummer.:", 213, 359, 169, 22)
    $Input24 = GUICtrlCreateInput("Adresse.: Straße, Hausnummer", 213, 383, 169, 22)
    $Input25 = GUICtrlCreateInput("Adresse.: Plz, Ort", 213, 407, 169, 22)
    $Input26 = GUICtrlCreateInput("Telefon-Nr.:", 213, 431, 169, 22)
    $Input27 = GUICtrlCreateInput("Fax-Nr.:", 213, 455, 169, 22)
    $Input28 = GUICtrlCreateInput("Internetseite.:", 213, 479, 169, 22)
    $Input29 = GUICtrlCreateInput("Bemerkung.:", 213, 503, 169, 22)
    $Date2 = GUICtrlCreateDate("2012/06/08 07:33:22", 592, 337, 185, 193)
    $MonthCal2 = GUICtrlCreateMonthCal("2012/06/08", 392, 337, 185, 185)
    $Button2 = GUICtrlCreateButton("Ware abrufen", 24, 538, 361, 33)
    $Button3 = GUICtrlCreateButton("Waren löschen", 399, 538, 377, 33)
    $Edit1 = GUICtrlCreateEdit("WERBEBANNER", 16, 585, 769, 65)
    GUICtrlSetData(-1, "WERBEBANNER")
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    $COMBOaktuel = IniReadSectionNames(@ScriptDir & "\index.ini")

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

    If FileExists($COMBOaktuel) Then
    MsgBox(4096, "Datei C:\autoexec.bat", "Existiert")

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

    Else
    For $i = 1 To $COMBOaktuel[0]
    GUICtrlSetData ($Combo3 , $COMBOaktuel[$i])
    GUISetState (-1)
    Next
    EndIf

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    _DATENiniPRUEFEN()
    _warenSCHREIBEN()
    _INPUTauslesen()
    Case $Button2
    ExitLoop

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

    EndSwitch
    WEnd

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

    Func _DATENiniPRUEFEN()
    $SEKTION = GUICtrlRead($Input1)
    $variable1 = IniReadSection(@ScriptDir & "\index", $SEKTION)

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

    If @error Then
    MsgBox(4096, "Achtung", "keine Ini Datei vorhanden, oder kein Eintrg gefunden")

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

    Else
    For $i1 = 1 To $variable1[0][0]
    GUICtrlSetData ($Input1,$SEKTION)
    GUICtrlSetData ($Input2,$variable1[$i1][0])
    GUICtrlSetData ($Combo1,$variable1[$i1][1])
    MsgBox(16,"Achtung","Der Eintrag ist bereits Vorhanden.")
    Next
    EndIf

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

    EndFunc

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

    ;hier unten soll mit einer if anweisung überprüft werden ob der eintrag vorhanden ist.Die ifabfrage hat noch so seine macken.

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

    Func _warenSCHREIBEN()
    $SEKTION = GUICtrlRead($Input1)
    $LESEausINPUT = GUICtrlRead($Input1)
    $LESEausINI = IniReadSection(@ScriptDir & "\index.ini", $SEKTION)
    $LESEfilename2 = GUICtrlRead ($Input1)
    $LESEsection2 = GUICtrlRead($Input2)
    $LESEkey2 = GUICtrlRead($Combo1)
    $LESEvalue2 = GUICtrlRead($Combo2)
    $INIschreiben = IniWrite (@ScriptDir & "\index.ini",$LESEfilename2,$LESEsection2,$LESEkey2)

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

    If $LESEausINI < 0 Then
    MsgBox(1,"","bereits vorhanden")
    ElseIf $LESEausINI > 0 Then
    MsgBox(48,"Daten erstellt","Ihr Eintrag wurde erfolgreich erstellt.")

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

    EndIf

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

    EndFunc
    ;hier soll er alle einträge in eine ini datei eintragen.aber den ini namen der zur erstellenden ini soll er aus der index ini lesen.
    Func _INPUTauslesen()

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

    $leseCOMBO1 = GUICtrlRead($Combo1)
    $leseCOMBO2 = GUICtrlRead($Combo2)
    $leseINPUT1 = GUICtrlRead($Input1)
    $leseINPUT2 = GUICtrlRead($Input2)
    $leseINPUT3 = GUICtrlRead($Input3)
    $leseINPUT4 = GUICtrlRead($Input4)
    $leseINPUT5 = GUICtrlRead($Input5)
    $leseINPUT6 = GUICtrlRead($Input6)
    $leseINPUT7 = GUICtrlRead($Input7)
    $leseINPUT8 = GUICtrlRead($Input8)
    $leseINPUT9 = GUICtrlRead($Input9)
    $leseINPUT10 = GUICtrlRead($Input10)
    $leseINPUT11 = GUICtrlRead($Input11)
    $leseINPUT12 = GUICtrlRead($Input12)
    $leseINPUT13 = GUICtrlRead($Input13)
    $leseINPUT14 = GUICtrlRead($Input14)

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

    $var = IniReadSectionNames(@ScriptDir & "\index.ini")

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

    If @error Then
    MsgBox(4096, "", "Es ist ein Fehler aufgetreten. Wahrscheinlich keine INI Datei vorhanden.")
    Else
    For $i = 1 To $var[0]
    MsgBox(4096, "", $var[$i])
    IniWrite (@ScriptDir & "\index.ini",$var[$i],"Produkt-Nr.:"& $leseInput1 & @CRLF & "Produkt.:"& $leseInput2 & @CRLF & "Einheit.:"& $leseCombo1 & @CRLF & "Abteilung.:"& $leseCombo2 & @CRLF & "Maximal.:" & $leseInput3 & @CRLF & "Melde.:" & $leseInput4 & @CRLF & "Minimal.:" & $leseInput5 & @CRLF & "Preis.:" & $leseInput6 & @CRLF & "Lieferant.:"& $leseInput7 & @CRLF & "Kunden-Nr.:" & $leseInput8 & @CRLF & "Strasse.:" & $leseInput9 & @CRLF & "Ort.:" & $leseInput10 & @CRLF & "Tel-Nr.:" & $leseInput11 & @CRLF & "Fax-Nr.:"& $leseInput12 & @CRLF & "Internet.:" & $leseInput13 & @CRLF & "Bemerkung.:" & $leseInput14,"")
    Next

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

    EndIf
    EndFunc

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

    ; MYSQL starten, DLL im PATH (enthält auch @ScriptDir), sont Pfad zur DLL angeben. DLL muss libmysql.dll heißen.
    _MySQL_InitLibrary()
    If @error Then Exit MsgBox(0, '', "")
    MsgBox(0, "DLL Version:",_MySQL_Get_Client_Version()&@CRLF& _MySQL_Get_Client_Info())

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

    $MysqlConn = _MySQL_Init()

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

    ;Fehler Demo:
    MsgBox(0,"Fehler-Demo","Fehler-Demo")
    $connected = _MySQL_Real_Connect($MysqlConn,"127.0.0.1","root","","micha1621")
    If $connected = 0 Then
    $errno = _MySQL_errno($MysqlConn)
    MsgBox(0,"Error:",$errno & @LF & _MySQL_error($MysqlConn))
    If $errno = $CR_UNKNOWN_HOST Then MsgBox(0,"Error:","$CR_UNKNOWN_HOST" & @LF & $CR_UNKNOWN_HOST)
    Endif

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

    ; XAMPP micha1621
    MsgBox(0, "XAMPP-Micha1621-demo", "XAMPP-micha1621-demo")

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

    $connected = _MySQL_Real_Connect($MysqlConn, "127.0.0.1", "root", "", "micha1621")
    If $connected = 0 Then Exit MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn))

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

    $query = "SELECT * FROM `kontakt-daten`"
    _MySQL_Real_Query($MysqlConn, $query)

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

    $res = _MySQL_Store_Result($MysqlConn)

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

    $fields = _MySQL_Num_Fields($res)

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

    $rows = _MySQL_Num_Rows($res)
    MsgBox(0, "", $rows & "-" & $fields)

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

    MsgBox(0, '', "Zugriff Methode 3 - alles in ein 2D Array")
    $array = _MySQL_Fetch_Result_StringArray($res)
    _ArrayDisplay($array)
    $array[0] = $array[0]
    For $i = $i +1
    MsgBox(0,"",$array[$i])

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

    Next

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

    ; Abfrage freigeben
    _MySQL_Free_Result($res)

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

    ; Verbindung beenden
    _MySQL_Close($MysqlConn)
    ; MYSQL beenden
    _MySQL_EndLibrary()

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

    hier meine datenbank

    Spoiler anzeigen

    Habe schon einen lösungsansatz..
    aber bekomme kein nix ausgelesen.

    Spoiler anzeigen
    [autoit]

    ;EIN HERSTELLERFELD MUSS NOCH ERSTELLT WERDEN
    Opt("GUIOnEventMode", 0)
    #NoTrayIcon
    #include <GuiListView.au3>
    #include <GUIConstants.au3>
    #include "SQLite.au3"

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

    #include <ButtonConstants.au3>
    #include <ComboConstants.au3>
    #include <DateTimeConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>
    #include <ProgressConstants.au3>

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

    #include <GUIListBox.au3>
    #include <IE.au3>
    #include <WinAPI.au3>

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

    ;----------------------------------------
    #include <array.au3>
    #include "mysql.au3"
    ; MYSQL starten, DLL im PATH (enthält auch @ScriptDir), sont Pfad zur DLL angeben. DLL muss libmysql.dll heißen.
    ;-----------------------------------
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Verwaltungs- / Warenbestandsprogramm Vers.: 1.00 by Black_Hackers", 803, 669, 180, 52)
    $Tab1 = GUICtrlCreateTab(8, 8, 785, 649)
    $TabSheet1 = GUICtrlCreateTabItem("Waren Eintragen")
    GUICtrlSetState(-1,$GUI_SHOW)
    $Group1 = GUICtrlCreateGroup("Waren Eintragen", 16, 41, 769, 265)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Input1 = GUICtrlCreateInput("Produkt-Nr.:", 32, 65, 169, 22)
    $Input2 = GUICtrlCreateInput("Produkt.:", 32, 89, 169, 22)
    $Combo1 = GUICtrlCreateCombo("Einheit wählen", 32, 113, 169, 25)
    GUICtrlSetData(-1, "Kg|Gramm|Stk|Liter|Flaschen|Dosen|Kisten")
    $Combo2 = GUICtrlCreateCombo("Abteilung wählen", 32, 137, 169, 25)
    GUICtrlSetData(-1, "Küche|Service|Sonstiges")
    $Input3 = GUICtrlCreateInput("Maximal-Bestand.:", 32, 161, 169, 22)
    $Input4 = GUICtrlCreateInput("Melde-Bestand.:", 32, 185, 169, 22)
    $Input5 = GUICtrlCreateInput("Mindest-Bestand.:", 32, 209, 169, 22)
    $Input6 = GUICtrlCreateInput("Preis.:", 32, 233, 169, 22)
    $Input7 = GUICtrlCreateInput("Lieferant.:", 216, 65, 169, 22)
    $Input8 = GUICtrlCreateInput("Kunden-Nummer.:", 216, 89, 169, 22)
    $Input9 = GUICtrlCreateInput("Adresse.: Straße, Hausnummer", 216, 113, 169, 22)
    $Input10 = GUICtrlCreateInput("Adresse.: Plz, Ort", 216, 137, 169, 22)
    $Input11 = GUICtrlCreateInput("Telefon-Nr.:", 216, 161, 169, 22)
    $Input12 = GUICtrlCreateInput("Fax-Nr.:", 216, 185, 169, 22)
    $Input13 = GUICtrlCreateInput("Internetseite.:", 216, 209, 169, 22)
    $Input14 = GUICtrlCreateInput("Bemerkung.:", 216, 233, 169, 22)
    $MonthCal1 = GUICtrlCreateMonthCal("2012/06/08", 400, 65, 185, 185); <--------hier soll er die daten aus der config dann lesen.
    $Date1 = GUICtrlCreateDate("2012/06/08 07:33:19", 592, 65, 185, 193)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Button1 = GUICtrlCreateButton("Ware Eintragen", 24, 265, 753, 33)
    $Group2 = GUICtrlCreateGroup("Waren Löschen", 16, 313, 769, 265)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Combo3 = GUICtrlCreateCombo("Produkt wählen", 30, 335, 169, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
    GUICtrlSetData(-1, "mutti|Metro|Zur Linde")
    $Input15 = GUICtrlCreateInput("Produkt-Nr.:", 30, 359, 169, 22)
    $Input16 = GUICtrlCreateInput("Einheit.:", 30, 383, 169, 22)
    $Input17 = GUICtrlCreateInput("Abteilung.:", 30, 407, 169, 22)
    $Input18 = GUICtrlCreateInput("Maximal-Bestand.:", 30, 431, 169, 22)
    $Input19 = GUICtrlCreateInput("Melde-Bestand.:", 30, 455, 169, 22)
    $Input20 = GUICtrlCreateInput("Mindest-Bestand.:", 30, 479, 169, 22)
    $Input21 = GUICtrlCreateInput("Preis.:", 30, 503, 169, 22)
    $Input22 = GUICtrlCreateInput("Lieferant.:", 213, 335, 169, 22)
    $Input23 = GUICtrlCreateInput("Kunden-Nummer.:", 213, 359, 169, 22)
    $Input24 = GUICtrlCreateInput("Adresse.: Straße, Hausnummer", 213, 383, 169, 22)
    $Input25 = GUICtrlCreateInput("Adresse.: Plz, Ort", 213, 407, 169, 22)
    $Input26 = GUICtrlCreateInput("Telefon-Nr.:", 213, 431, 169, 22)
    $Input27 = GUICtrlCreateInput("Fax-Nr.:", 213, 455, 169, 22)
    $Input28 = GUICtrlCreateInput("Internetseite.:", 213, 479, 169, 22)
    $Input29 = GUICtrlCreateInput("Bemerkung.:", 213, 503, 169, 22)
    $Date2 = GUICtrlCreateDate("2012/06/08 07:33:22", 592, 337, 185, 193)
    $MonthCal2 = GUICtrlCreateMonthCal("2012/06/08", 392, 337, 185, 185)
    $Button2 = GUICtrlCreateButton("Ware abrufen", 24, 538, 361, 33)
    $Button3 = GUICtrlCreateButton("Waren löschen", 399, 538, 377, 33)
    $Edit1 = GUICtrlCreateEdit("WERBEBANNER", 16, 585, 769, 65)
    GUICtrlSetData(-1, "WERBEBANNER")
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    $COMBOaktuel = IniReadSectionNames(@ScriptDir & "\index.ini")

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

    If FileExists($COMBOaktuel) Then
    MsgBox(4096, "Datei C:\autoexec.bat", "Existiert")

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

    Else
    For $i = 1 To $COMBOaktuel[0]
    GUICtrlSetData ($Combo3 , $COMBOaktuel[$i])
    GUISetState (-1)
    Next
    EndIf

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

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

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

    Case $Button2
    ExitLoop

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

    EndSwitch
    WEnd

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

    _MySQL_InitLibrary()
    If @error Then Exit MsgBox(0, 'Error', "Failed to load libmysql.dll!")

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

    $MysqlConn = _MySQL_Init()
    $connected = _MySQL_Real_Connect($MysqlConn, "127.0.0.1", "root", "", "micha1621")
    If $connected = 0 Then Exit MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn))

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

    $Produkt = GUICtrlRead ($Combo3)
    $sUserNameEscaped = _MySQL_Real_Escape_String($MysqlConn, $Produkt)
    _MySQL_Real_Query ($MysqlConn, "SELECT * FROM kontakt-daten WHERE Kontakt = '" & $sUserNameEscaped & "';")
    $hQueryResult = _MySQL_Store_Result($MysqlConn)
    If Not $hQueryResult Then Exit MsgBox(0, "", "No Result")
    $aFirstRow = _MySQL_Fetch_Row_StringArray ($hQueryResult)
    _MySQL_Free_Result($hQueryResult)

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

    MsgBox (0, "Produkt", $Produkt & " has " & $aFirstRow[0] & " Daten.")

    [/autoit]
  • Die DB die du ansprechen willst kan keine SLite-DB sein, denn sonst könntest du nicht mit phpMyAdmin einen SQL Dump erzeugen. Es ist höchstwarscheinlich eine MySQL-DB.
    Mit Funktionen der SQLite.au3 kanst du jedoch nur SQLite-DB's lesen und schreiben.

    mfg autoBert