ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Заполнение таблицы в БД из поля(TextBox) в форме
25 сообщений из 43, страница 1 из 2
  1  все
Заполнение таблицы в БД из поля(TextBox) в форме
    #39223648
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
Приветствую, копался в интернете на тему заполнения таблицы из TextBox в форме и наткнулся на статью
http://vbbook.ru/vb.net/primeru-rabotu-s-access/
и не совсем понял зачем нужно прописывать это? если форма и таблица, находятся в одной БД, то эта часть кода будет выглядеть по-другому?
Код: vbnet
1.
2.
Dim z As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:1Приложение Microsoft Office Access.mdb") 'Устанавливаем соединение с базой данных.
        z.Open() 'Открываем соединение.


и второе

Код: vbnet
1.
Dim t As New OleDb.OleDbCommand("UPDATE [Таблица1] SET [Поле1] = ' " & " " & TextBox1.Text & " '  WHERE [Код] = 1", z)


зачем мне нужно переменная z?
...
Рейтинг: 0 / 0
25.04.2016, 10:45
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39223669
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MrShin
Участник
Так вы на VB пишете или на VBA? Это несколько разные вещи.
В обоих случаях команды будут принципиально похожии - открыть соединение (переменная z) и выполнить команду SQL для этого соединения. В VBA обычно используется только DAO или ADO вместо OleDb, команды и объекты там другие.
...
Рейтинг: 0 / 0
25.04.2016, 11:02
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39223682
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
MrShin,
на VBA, т.е. мне в любом случае придется прописывать первую строчку для кнопки? даже если форма и таблица в одной БД?
...
Рейтинг: 0 / 0
25.04.2016, 11:12
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39223696
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MrShin
Участник
Вы задачу опишите. Если текстбокс связанный, то вообще ничего прописывать нужно, Акцесс все там сделает.
Если несвязанный, то зависит от задачи - иногда достаточно только выполнить команду, рекордсет не нужен. А если нужно, например, вставить новую строку в таблицу и получить ключ, сгенерированный Акцессом, то лучше открыть рекордсет и прочесть значение ключевого поля новой записи, чем искать потом новую запись.
...
Рейтинг: 0 / 0
25.04.2016, 11:28
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39223707
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
MrShin,

в этой теме лежит база
мне пока нужно(пока без флажка, можно сделать, просто по нажатию кнопки) просто перенести номер машины из TextBox, в таблицу.
...
Рейтинг: 0 / 0
25.04.2016, 11:47
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39223708
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
MrShin,

я не совсем понимаю, что такое связанный текст бокс)
...
Рейтинг: 0 / 0
25.04.2016, 11:47
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39223764
f
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
f
Участник
В источнике данных которого поле таблицы.
...
Рейтинг: 0 / 0
25.04.2016, 12:40
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39223814
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
F,

Нет мое поле не связано
...
Рейтинг: 0 / 0
25.04.2016, 13:13
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39224637
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
MrShin,

https://cloud.mail.ru/public/MkMe/MWvnC1mWe

Вот БД, я попытался по кнопке импортировать запись из поля "Тип Работы" в таблицу KL, в столбец vagon01_QQ, где ID у записи 29017, но как-то не особо получилось, можете подсказать, что не так?
...
Рейтинг: 0 / 0
26.04.2016, 12:17
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39224653
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MrShin
Участник
Retvisanно как-то не особо получилось
Замените Text23.Text на Me.Text23 и заработает

Но вообще таблица странная, похоже, нормализовывать базу надо, тогда и апдейты могут не понадобиться. И вместо листбокса проще работать с субформами
...
Рейтинг: 0 / 0
26.04.2016, 12:31
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39224654
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
__Michelle
Участник
RetvisanMrShin,

https://cloud.mail.ru/public/MkMe/MWvnC1mWe

Вот БД, я попытался по кнопке импортировать (?!) запись из поля "Тип Работы" в таблицу KL, в столбец vagon01_QQ, где ID у записи 29017, но как-то не особо получилось, можете подсказать, что не так?Почему не UPDATE?
Код: sql
1.
CurrentDb.Execute "UPDATE KL SET vagon01_QQ=""" & Me.[Тип Работы] & """ WHERE ID=29017"

Кавычки потому, что vagon01_QQ - текстовое.
...
Рейтинг: 0 / 0
26.04.2016, 12:31
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39224656
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
__Michelle
Участник
Базу не смотрела. И не скачивала.
...
Рейтинг: 0 / 0
26.04.2016, 12:33
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39224716
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
__Michelle,

Спасибо! все заработало, разобрался)
...
Рейтинг: 0 / 0
26.04.2016, 13:17
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39226804
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
__Michelle,

можете подскажать что неправильно?
Код: vbnet
1.
CurrentDb.Execute "UPDATE KL SET vagon01_QQ = """ & " " & Me.Text23 & """ WHERE [ID] = """ & " " & Me.txtkod & """   "



мне нужно заменить фиксированный ID, на переменную, которая храниться в поле формы
что не так я сделал?
...
Рейтинг: 0 / 0
28.04.2016, 16:30
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39226834
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
__Michelle
Участник
Попробуйте
Код: sql
1.
CurrentDb.Execute "UPDATE KL SET vagon01_QQ = """ & " " & Me.Text23 & """ WHERE [ID]=" & Me.txtkod

И вопрос: красным выделенное это что и зачем?
...
Рейтинг: 0 / 0
28.04.2016, 16:49
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39226843
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
__Michelle,

не знаю, вроде как в синтаксисе примера, что видел это было, щас попробую удалить)
...
Рейтинг: 0 / 0
28.04.2016, 16:57
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39226856
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
__Michelle,

спасибо, все отлично работает)
...
Рейтинг: 0 / 0
28.04.2016, 17:09
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39230302
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
__Michelle,
приветствую
тут возникла проблема, когда я выбираю несколько значений,в моем txtkod,появляются несколько ID
, которые разделены между собой запятыми и при нажатии кнопки вылетает по этой причине
...
Рейтинг: 0 / 0
05.05.2016, 19:25
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39230322
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
__Michelle
Участник
Код: sql
1.
CurrentDb.Execute "UPDATE KL SET vagon01_QQ = """ & " " & Me.Text23 & """ WHERE [ID] In (""" & Replace(Me.txtkod,",",""",""") & """)"
...
Рейтинг: 0 / 0
05.05.2016, 19:57
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39230326
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
__Michelle
Участник
Поправка - забыла убрать одну Вашу дребедень
Код: sql
1.
CurrentDb.Execute "UPDATE KL SET vagon01_QQ=""" & Me.Text23 & """ WHERE [ID] In (""" & Replace(Me.txtkod,",",""",""") & """)"
...
Рейтинг: 0 / 0
05.05.2016, 20:02
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39230591
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
__Michelle,

вот, такую ошибочку выдает((
...
Рейтинг: 0 / 0
06.05.2016, 10:33
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39230630
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
__Michelle
Участник
А смысл сообщения поняли?
"Нельзя обратиться к свойству или методу контрола, пока этот контрол не имеет фокуса."
Обычно такое бывает со свойством Text.
И не в SQL, а в VBA.

Что там у Вас происходит, не знаю.
Может, скопировали запрос с ошибкой.

Покажите в точности текст применяемого запроса.
...
Рейтинг: 0 / 0
06.05.2016, 10:56
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39230633
Фотография __Michelle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
__Michelle
Участник
И строку кода покажите, на которую указывает сообщение.
...
Рейтинг: 0 / 0
06.05.2016, 10:57
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39230650
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
__Michelle,
Вот если я делаю запрос все работает, и с кнопки его запускаю

UPDATE KL SET vagon01_QQ = Forms!KL!Text23 WHERE Eval([ID] & " In (" & Forms!KL!txtkod & ")") ;

вот как это выглядит в форме
...
Рейтинг: 0 / 0
06.05.2016, 11:09
| Ответить | Цитировать | Написать  
Заполнение таблицы в БД из поля(TextBox) в форме
    #39230654
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Retvisan
Гость
__Michelle,

Код: vbnet
1.
2.
3.
Private Sub Command54_Click()
CurrentDb.Execute "UPDATE [KL] SET [vagon01_QQ]=""" & Me.Tip_raboty.Text & """ WHERE [ID] In (""" & Replace(Me.txtkod, ",", """,""") & """)"
End Sub



вот так в VBA
...
Рейтинг: 0 / 0
06.05.2016, 11:11
| Ответить | Цитировать | Написать  
25 сообщений из 43, страница 1 из 2
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Заполнение таблицы в БД из поля(TextBox) в форме
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39230322&tid=1613598]:
 0ms
get settings:
 11ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 37ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 61ms
get tp. blocked users:
 1ms
others: 17ms
total:  165ms
созд. / загр.: 165ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]