Unzulässige SQL Anweisung: 'DELETE', 'INSERT'... erwartet

[Ben.Wisch]

 

Hallo Zusammen,

ich hatte gestern bereits ein dummer Problem, das von einem Forum's Kollegen sehr schnell gelöst wurde. Danke nochmals auf diesem Weg.
Nun habe ich ein neues Problen - Unzulässige SQL Anweisung: "DELETE'..usw erwartet.
Diese Meldung kommt aus folgender Source:

Private Sub Befehl15_Click()
On Error GoTo Err_Befehl15_Click

Dim strSQL2 As String       ' Insert

'--------------------------------------------------------
' Einfügen Datensatz
'--------------------------------------------------------

DoCmd.SetWarnings False

srtSQL2 = "INSERT INTO Allgemein2(nummer) " & _
          "SELECT nummer " & _
          "FROM Allgemein " & _
          "WHERE nummer NOT IN (SELECT nummer FROM Allgemein);"

'srtSQL2 = "INSERT INTO Allgemein2 ( nummer ) SELECT nummer " & _
'          "FROM Allgemein;"  ' WHERE nummer='" & Me![nummer]_ & "';"
                             ' group by Allgemein.nummer;"
'         ' "SELECT Allgemein.nummer " & _

           
Debug.Print strSQL2

DoCmd.RunSQL strSQL2

'--------------------------------------------------------
' Fehlermeldungen
'--------------------------------------------------------

DoCmd.SetWarnings True
Exit_Befehl15_Click:
    Exit Sub

Err_Befehl15_Click:
    MsgBox Err.Description
    Resume Exit_Befehl15_Click
   
End Sub

Ist da draussen jemand der mein erloschenes Licht zu leuchten bringt. 

[DF6GL]

Hallo,

und was soll diese (erste) Insert-Anweisung nun genau leisten?

Den zweiten SQL-String könnte kch ja noch nachvollziehen.., bis auf das fehlerhafte Semikolon mittendrin und den fehlerhaften Syntax. 

[Ben.Wisch]

Hallo DF6GL,

Grüße an den Bodensee. Also eigentlich sollte der Insert Befehl Datensätze in eine Tabelle schreiben, mit Daten aus einer "Start"-Tabelle. Ich habe diese Syntax bei ms-office gefunden, sie soll keine doppelten Datensätze einfügen. Scheint wohl nicht zu klappen wie?

Ben.Wisch

[DF6GL]

Hallo,

ja, was ein Insert machen soll, weiß ich schon...

Code [Auswählen] Erweitern


srtSQL2 = "INSERT INTO Allgemein2  ([nummer])  SELECT Allgemein.[nummer] FROM Allgemein group by Allgemein.[nummer] "


Ich frage mich immer noch nach dem Sinn des Ganzen...

[Ben.Wisch]

Hi,

es geht einfach um eine Arbeitsbeschaffungsmaßnahme meiner GL. Ich soll in der ersten Tabelle Daten pflegen und die zweite Tabelle soll von Mitarbeitern bearbeitet werden, die nicht auf die erste zugreifen sollen. IN KEINSTER WEISE . so die Aussage der GL. Also brauche ich ein Instert um die zweite Tabelle mit nicht indizierten Nummern zu füllen. Ich kann ja auch nichts dafür, wenn mir meine GL solche Aufgaben stellt. Ich hätte den ganzen Sch"%"§ über eine Excel Tabelle abgefrühstückt und dann in Access importiert, darf ich aber nicht.

Tschuldigung für meine Ausführungen, aber ich bin gerade ein bisschen angepisst, von den Auftragsgebern. Keine Kohle für Weiterbildung, aber Ergebnisse in kürzester Zeit erwarten.

Also schon mal Danke für die Antworten und vielleicht bis bald.

Ben.Wisch