Синтаксическая ошибка в выражении SQL (2)
Я пытаюсь запустить этот оператор SQL в макросе VBA, но по какой-то причине он не запускается из-за синтаксической ошибки, которую я не могу точно определить. Я довольно новичок в VBA, поэтому любая помощь в выявлении этой ошибки будет принята с благодарностью.
Dim dte As String, db As Database, tableName As String, DataDump As Recordset, clientTable As Recordset
Set db = CurrentDb
dte = InputBox("What date was the Data Dump run?", "Please Input a date")
tableName = "FN_DataDump_ALL_" & dte
Set DataDump = db.OpenRecordset(tableName, dbOpenDynaset, dbEditAdd)
Set clientTable = db.OpenRecordset("Clients", dbOpenDynaset, dbEditAdd)
MySQL = "SELECT DISTINCT DD.[Client ID] " & _
"INTO Clients " & _
"FROM " & tableName & "as DD " & _
"Where CL.[Client ID] NOT IN (SELECT DD.[Client ID] ""FROM"" & tableName & ""as DD"") "
db.Execute MySQL
1 ответ
Решение
Неуместные цитаты вокруг FROM
и недостающее пространство произведено TABLENAMEAS
вместо:
= "SELECT DISTINCT DD.[Client ID] " & _
"INTO Clients " & _
"FROM " & tableName & " as DD " & _
"Where CL.[Client ID] NOT IN (SELECT DD.[Client ID] FROM " & tableName & " as DD)"