SQlite nicht löschen - mehrere Kriterien

**Tweaky**

Hi,

ich weiß, dass ich z. B. mit

AutoIt

_SQLite_Exec($hSqlite, "delete from moz_historyvisits where visit_type <> 7 AND visit_type <> 2")

Zeilen einer SQlite-Datei mit Ausnahmen (hier <>7 und <>2) löschen kann.

Nun habe ich allerdings mehrere Ausnahmen die in einem dynamischen Array stehen.

Wie bekomme ich dies nun in den obigen Befehl reingequetscht.

**AspirinJunkie**

Aus dem Array einen String mit den entsprechenden Bedingungen bauen und an den sqlite-Befehlsstring anhängen.

Für genauere Hinweise müsstest du ein Beispiel posten.

**Tweaky**

Ok daran habe ich auch schon gedacht.

Dachte es gibt vielleicht eine Möglichkeit: Zeilenweise durchlaufen und dann prüfen ob die Bedinungen erfüllt sind.

**Musashi**

Für Ausnahmen ist der NOT IN Operator gut geeignet :

AutoIt

#include <Array.au3>
Local $aExceptions[] = [1,4,7,12,22,31,43] ; zu Testzwecken : Array mit Ausnahmewerten
Local $sSQL = '"DELETE FROM moz_historyvisits WHERE visit_type NOT IN (' & _ArrayToString($aExceptions, ',') & ')"'
;_SQLite_Exec($hSqlite, $sSQL)

**Tweaky**

Hatte vergessen zu erwähnen, dass die Kriterien von 2 Spalten geprüft werden müssen.

Deshalb habe ich es so gemacht.

AutoIt

#include <Array.au3>
Global $aExceptions[4][2], $sAusnahme_func

$aExceptions[1][0] = 1
$aExceptions[1][1] = 2
$aExceptions[2][0] = 5
$aExceptions[2][1] = 50
$aExceptions[3][0] = 6
$aExceptions[3][1] = 9

;~ _ArrayDisplay($aExceptions)

For $w = 1 To UBound($aExceptions) - 1
    If $w <> 1 Then $sAusnahme_func &= " AND "
    $sAusnahme_func &= '(' & 'name <> ' & '"' & $aExceptions[$w][0] & '"' & " OR host_key <> " & '"' & $aExceptions[$w][1] & '"' & ')'
Next

Local $sSQL = '"DELETE FROM moz_historyvisits where ' & $sAusnahme_func & '"'
ConsoleWrite($sSQL & @CRLF)

Alles anzeigen

Oder habt ihr eine einfachere Lösung?

**AspirinJunkie**

Wenn ich das richtig verstehe, dann möchtest du alle die löschen, welche nicht deinen Kriterien entsprechen?
Dann funktioniert das schon so wie du es geschrieben hast aber es ist zugegeben erst einmal schwierig auf Anhieb zu verstehen was der SQL-Code macht.

Als Alternative könnte man sich einen zusammengesetzten Wert nehmen und dort dann wieder mit NOT IN arbeiten.
Also z.B. so:

AutoIt

Global $aExceptions[4][2]

$aExceptions[1][0] = 1
$aExceptions[1][1] = 2
$aExceptions[2][0] = 5
$aExceptions[2][1] = 50
$aExceptions[3][0] = 6
$aExceptions[3][1] = 9

Global $sSQL = 'DELETE FROM moz_historyvisits ' & _
               'WHERE name || "," || host_key NOT IN ('

For $w = 1 To UBound($aExceptions) - 1
    $sSQL &= '"' & $aExceptions[$w][0] & ',' & $aExceptions[$w][1] & '", '
Next
$sSQL = StringTrimRight($sSQL, 2) & ")"

ConsoleWrite($sSQL & @CRLF)

Alles anzeigen

Ob das unbedingt besser ist will ich gar nicht mal behaupten.
Zumindest eine Alternative und vielleicht eher zu verstehen.

**Tweaky**

OK das ist wirklich übersichtlicher.

Kann ich es herausfinden, ob denn was gelöscht wurde?

Kann ich herausfinden, wie viele Einträge verhanden sind?

**Musashi**

Zitat von Tweaky

Kann ich herausfinden, wie viele Einträge vorhanden sind?

Dafür verwendet man z.B. die Aggregatfunktion COUNT

SQL

SELECT COUNT(*) FROM tabellenname;

Ein gutes Tutorial, siehe : https://www.sqlitetutorial.net/sqlite-count-function/

**AspirinJunkie**

Setz nach dem Löschen folgenden Befehl ab:

SQL

SELECT changes() FROM moz_historyvisits;

**Tweaky**

Danke euch beiden.

Um zu prüfen, ob es Änderungen gibt verwende ich nun:

AutoIt

_SQLite_TotalChanges()

Dies funktioniert.

Um die Anzahl zu zählen verwende ich folgendes:

AutoIt

_SQLite_Query(..., "select count(*) from cookies", $hQuerys)
_SQLite_FetchData($hQuerys, $sOut)

Dies funktioniert soweit auch.

Allerdings kann ich anschließend den Ordner, in dem sich die sql-Datei befindet, nicht löschen.

AutoIt

_SQLite_Startup()
$hSqlite = _SQLite_Open(...)
_SQLite_Query($hSqlite, "select count(*) from moz_historyvisits", $hQuerys) ;hier liegt das Problem
_SQLite_FetchData($hQuerys, $sOut)
_SQLite_Close($hSqlite)
_SQLite_Shutdown()

DirRemove(..., 1) ;Dies funktioniert nicht
MsgBox(0,0,0)

Es liegt am Befehl "_SQLite_Query".

Erst wenn ich die MsgBox bestätige (also das Skript komplett beendet ist), kann ich den Ordner löschen.

Warum?

Ich habe SQLite doch korrekt beendet.

Velted

Moin,

Du hast SQLite vielleicht doch nicht korrekt beendet. Das Skript hält möglicherweise noch ein offenes Handle auf ein Query-Statement.

AutoIt

_SQLite_QueryFinalize($hQuerys)

könnte dann helfen.

**Tweaky**

AutoIt

_SQLite_QueryFinalize($hQuerys)

War genau richtig. Danke