Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.12.2015, 14:05   #1
superpsih
Пользователь
 
Регистрация: 14.11.2013
Сообщений: 74
По умолчанию Добавление записей в таблицу

Есть следующая задача:
На форме человек в первый TextBox вводит имя объекта (например, x125)
Во второй вводит число (например 3).
При нажатии на кнопку в таблицу добавляется 3 записи (в поле счётчик не добавляется ничего, в первое полe добавляется x-125-a1, в поля в которых есть значение по умолчанию, добавляется значение по умолчанию). В итоге, в таблице должны появиться три записи для x-125-a1, x-125a2 и x-125a3.
Как это можно реализовать?
Вложения
Тип файла: zip 1.zip (25.0 Кб, 9 просмотров)

Последний раз редактировалось superpsih; 23.12.2015 в 15:03. Причина: добавил вложение
superpsih вне форума Ответить с цитированием
Старый 23.12.2015, 14:45   #2
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Ну вот почему б не сделать и прикрепить базку с формой с 2мя техтбоксами, с таблицой с нужными полями. Какие-то значения по умолчанию, какие значение, в каких полях, чье умолчание?
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 23.12.2015, 15:03   #3
superpsih
Пользователь
 
Регистрация: 14.11.2013
Сообщений: 74
По умолчанию

Цитата:
Сообщение от Aleksandr H. Посмотреть сообщение
Ну вот почему б не сделать и прикрепить базку с формой с 2мя техтбоксами, с таблицой с нужными полями. Какие-то значения по умолчанию, какие значение, в каких полях, чье умолчание?
Сделал. Вот.
Вложения
Тип файла: zip 1.zip (25.0 Кб, 14 просмотров)
superpsih вне форума Ответить с цитированием
Старый 23.12.2015, 16:06   #4
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

повесь на кнопку
Код:
Private Sub Command2_Click()
    Dim sqtSQL As String
    Dim steps As Integer
    Dim i As Integer
    steps = CInt(Form_Form1.Text3)
    For i = 1 To steps
        sqtSQL = "INSERT INTO Table1 (Name_) VALUES ('" & Form_Form1.ID & "-a" & i & "');"
        DoCmd.SetWarnings False
        DoCmd.RunSQL sqtSQL
        DoCmd.SetWarnings True
    Next
End Sub
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 23.12.2015, 16:34   #5
superpsih
Пользователь
 
Регистрация: 14.11.2013
Сообщений: 74
По умолчанию

Спасибо! SQL я ещё не знаю, буду пробовать.
superpsih вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Добавление записей в таблицу! Анастасия1902 БД в Delphi 2 03.10.2012 09:23
Добавление Записей в таблицу DJ DIMON PHP 10 31.10.2011 20:12
добавление записей в таблицу MDmitry PHP 3 27.12.2009 11:08
Одновременное добавление записей в таблицу PitmanMSK Microsoft Office Access 3 02.09.2009 21:56
добавление записей в таблицу strannik БД в Delphi 5 10.05.2007 08:12