Ошибка синтаксиса при выборе временной таблицы Ошибка доступа
Я пытаюсь вставить значения двух столбцов (conceptname, storeNumberID) из lodgingReport в temptable. Но есть синтаксическая ошибка, и я не могу найти исправление
db.Execute "Select [Concept Name],[Store Number ID] into" & TempTable & "from TblLodgingReport"
Полная функция (вставлено из комментариев):
Function CreateTempTable()
Dim db As Database
Set db = CurrentDb()
db.Execute "Select [Concept Name],[Store Number ID] into" & TempTable & _
"from TblLodgingReport"
MsgBox "table is created"
End Function
Я пробовал добавлять пробелы. Все та же ошибка
Эх ... Тогда вы, вероятно, делаете что-то странное, например, добавляете пробел в имя вашей таблицы. Добавьте квадратные скобки: "Select [Concept Name],[Store Number ID] into [" & TempTable & "] from TblLodgingReport".
Все равно не повезло :(
Включите полный код. Вероятно, где-то есть ошибки.
Здесь вы идете Функция CreateTempTable () Dim db As Database Set db = CurrentDb () db.Execute "Выберите [Название концепции], [ID номера магазина] в" & TempTable & "из TblLodgingReport. Таблица" MsgBox "создана" Конечная функция
Эх ... Вы нигде не определили переменную TempTable. Вы просто хотите сделать "Select [Concept Name],[Store Number ID] into [TempTable] from TblLodgingReport"?
Вы не объявляли переменную TempTable нигде в указанном вами коде. Скорее всего, это проблема, с которой вы столкнулись. В основном ваш код говорит, что нужно выполнить этот запрос: «Выберите [Название концепции], [Идентификатор номера магазина] в из TblLodgingReport»
Должен ли я объявить Temptable как вариант или как tabledefs?
Dim TempTable As String
Даже со строкой это та же ошибка
TempTable = "temptable" (необходимо настроить строку)
Это новая ошибка. Вот новый код: входные данные запроса должны содержать по крайней мере одну таблицу или запрос Dim db As Database Dim Temptable As String Temptable = "temptable" Set db = CurrentDb () db.Execute "Выберите [Название концепции], [Store Number ID] в" & Temptable & "из [TblLodgingReport];" MsgBox «таблица создана»
Похоже, пробел перед "от" все еще отсутствует. Это должно быть «от». Прямо сейчас SQL читает: Select [Concept Name],[Store Number ID] into temptablefrom [TblLodgingReport]
Это сработало!!!!! Спасибо вам большое
Для справки в будущем: Как отлаживать динамический SQL в VBA
Вам не хватает пробелов. Добавьте пробелы до и после кавычек
":"Select [Concept Name],[Store Number ID] into " & TempTable & " from TblLodgingReport"