Rambler's Top100
Форум: MS ACCESSБолталкаVBVBA MS OfficeMS SQL server
Новые сообщения: 01000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Запрос на добавление
 
 автор: Гоблин   (27.11.2014 в 22:12)   личное сообщение
 
 

Привет.
Народ, подскажите плиз. туплю вот. Давно акса в руки не брал.
В общем нужен запрос на добавление.
Можно ли в VBA написать так, чтобы открывалось окно, куда вводить данные для добавления.
Ранее либо просто созданный в конструкторе запрос запускал, либо отдельную форму строил с кнопкой для добавления (запуска запроса)

А вот теперь думаю как бы сразу из VBA код прописать соответствующий.
Типа:
CurrentDb.Execute "insert into [ТАБЛИЦА КУДА ДОБАВЛЯЕМ] (Поле1, Поле2) Values ([Введи информацию],......."

Вот не работает так. Видимо из-за синтаксиса. Через RunSQL тоже пробовал. Что-то не так пишу.

  Ответить  
 
 автор: Гоблин   (28.11.2014 в 20:19)   личное сообщение
 
 

Из VBA вот как это делается.

DoCmd.RunSQL "INSERT INTO Таблица( Поле1, Поле2) SELECT [Введи данные] AS Выражение1, 'свободный текст, добавляемый в поле' AS Выражение2;", -1

  Ответить  
 
 автор: ГлазастыйМышь   (29.11.2014 в 16:03)   личное сообщение
 
 


"insert into [ТАБЛИЦА КУДА ДОБАВЛЯЕМ] (Поле1, Поле2) Values ('" & Inputbox("Тра ляля") & "' , ......."

после Values ( идет одинарная кавычка ('), потом двойная (")

  Ответить  
 
 автор: Гоблин   (29.11.2014 в 19:47)   личное сообщение
 
 

Недопонял. Одинарная, потом двойная, те, что за скобками, - это текст всажен.
Или еще где-то должны быть кавычки? В синтаксисе не силен. Но везде работает так, как написал.

На счет inputbox - долго же я эту хрень пытался применить. Не применялась.

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList