Beiträge von NapNap

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_Language=1031
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include<array.au3>
#include <string.au3>
#include <Constants.au3>


$adCN = ObjCreate("ADODB.Connection")
$sql_server="server"
$sql_db="datenbank"
$adCN.Open("Driver={Pervasive ODBC Client Interface}; ServerName=" & $sql_server & "; DBQ=" & $sql_db & ";")


;Duplikate finden
; Kopieren aller Liefertermine
$query = $adCN.Execute("INSERT INTO t1 (s1,s2,s3) select s1,s2,s3,s4 from t0")


; Leeren der Tabelle "t2"
$query = $adCN.Execute("DELETE FROM t2")


; Alle Datensätze von t1 nach t2 kopieren
$query = $adCN.Execute("INSERT INTO t2 SELECT * FROM t1")


; Alle doppelte Datensätze suchen und löschen in t1
$query = $adCN.Execute("DELETE FROM t1 WHERE EXISTS (SELECT ID FROM t1 t2 WHERE t1.s2 = t2.s2 AND t1.s3 = t2.s3 AND t1.s4 = t2.s4 AND t1.ID > t2.ID)")