ReSQL.ru
     
powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Помогите с вводом данных
7 сообщений из 7, страница 1 из 1
Помогите с вводом данных
    #39365369
MasterStraga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MasterStraga
Гость
Добрый день!
Пытаюсь создать БД, для учета измерительного комплекса в электросетевой компании. Это моя первый опыт работы с Accessом и заплюхался я уже капитально. Вопрос в следующем:
имеется основная таблица "Присоединение" к которой прикручены 4 таблицы справочники. Имеется основная форма "Форма просмотр", через которую можно только просматривать данные. На этой форме есть кнопка добавления нового присоединения, при нажатии которой появляется форма "ФормаДобавленияОбщая". На данной форме описывается новое присоединение и измерительный комплекс установленный на нем. Если какие то данные уже имеются в справочниках (потребители, типы счетчиков, ТТ) то они выбираются из выпадающего списка и должны автоматически подставляться в поля. Если их нет, то с помощью соответствующих кнопок вызываются формы для внесения новых данных в справочники.
И вот что то не работает у меня это как задумано.
...
Рейтинг: 0 / 0
13.12.2016, 06:37
| Ответить | Цитировать | Написать  
Помогите с вводом данных
    #39365445
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
MasterStragaНа этой форме есть кнопка добавления нового присоединения, при нажатии которой появляется форма "ФормаДобавленияОбщая".
Сделай эту форму свободной, а введённые в ней значения добавляй VBA-кодом.
...
Рейтинг: 0 / 0
13.12.2016, 09:26
| Ответить | Цитировать | Написать  
Помогите с вводом данных
    #39366347
MasterStraga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MasterStraga
Гость
Akina,
спасибо за совет. А можно по подробней? А то я только начал изучать все это дело.
...
Рейтинг: 0 / 0
14.12.2016, 06:42
| Ответить | Цитировать | Написать  
Помогите с вводом данных
    #39367198
malinin25
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
malinin25
Гость
MasterStraga,

можно и по подробней, только в гугле, почитай лучше там, много дополнительно интересного найдешь для себя
...
Рейтинг: 0 / 0
14.12.2016, 21:04
| Ответить | Цитировать | Написать  
Помогите с вводом данных
    #39367299
Фотография Tarasios
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Tarasios
Участник
malinin25,

Тут человек за халявой пришёл, а вы его гуглить отправляете. Не по людски это )))
...
Рейтинг: 0 / 0
15.12.2016, 03:15
| Ответить | Цитировать | Написать  
Помогите с вводом данных
    #39367319
_ИванЫч_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_ИванЫч_
Гость
MasterStraga, можно, например, по событию на нажатие кнопки (knDobavlenie) данные добавляются в таблицу (Table):

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Private Sub knDobavlenie_Click()
Dim rs As DAO.Recordset

Set rs = CurrentDb.OpenRecordset("Table", dbOpenDynaset)
rs.AddNew

rs!Pole_v_Table = Me!Pole_v_Forme
rs!Pole2_v_Table = Me!Pole2_v_Forme ' и т.д.

rs.Update
rs.Close
Set rs = Nothing

End Sub
...
Рейтинг: 0 / 0
15.12.2016, 07:55
| Ответить | Цитировать | Написать  
Помогите с вводом данных
    #39367334
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
_ИванЫч_
Код: vbnet
1.
2.
rs!Pole_v_Table = Me!Pole_v_Forme
rs!Pole2_v_Table = Me!Pole2_v_Forme ' и т.д.

Плохо. Нужно использовать явное приведение типов, а то локальные форматы даты и разделитель дробных или разрядов такую фигню понапишут в таблицу, что только держись...
...
Рейтинг: 0 / 0
15.12.2016, 08:47
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Помогите с вводом данных
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&fpage=87&tid=1612879]:
 0ms
get settings:
 8ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 33ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 48ms
get tp. blocked users:
 2ms
others: 389ms
total:  512ms
созд. / загр.: 512ms
x
x
Закрыть


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