InsideTM
Junior Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Доброе время суток.
Подскажите пожалуйста как реализовать, замучался уже, третий день брожу по мсдну но толкового ответа не нашёл.
Есть три таблицы
1. device_type - типы устройств
В ней device_type_id (PK, счётчик), device_type_name (текст)
2. model - модели устройст
В ней model_id(PK, счётчик), model_device_type_id(FKEY int), model_vendor_id(FKEY int), model_name(nvarchar), ....
3. device - сами устройства (серийники и тд)
В ней device_id(PK, счётчик), device_model_id(FKEY int),......
Создаю форму для device.
Добавляю комбобокс для выбора типа устройст (cbo_device_type_name)
Для него источник данных: SELECT "device_type"."device_type_id", "device_type"."device_type_name" FROM "device_type" ORDER BY "device_type_name";
В таблицах он ничего не меняет, работает фильтром.
Создаю второй комбобокс (cbo_model).
Влияет на данные из device_model_id. Источник строк пустой.
Первому комбобоксу пишу в afterupdate() следующее:
Private Sub cbo_device_type_name_AfterUpdate()
Me.cbo_model.RowSource = "SELECT model_id, model_name FROM" & _
" model WHERE model_device_type_id = " & Me.cbo_device_type_name & _
" ORDER BY model_name"
Me.cbo_model = Me.cbo_model.ItemData(0)
End Sub
При выполнении всего этого дела получаю ошибку 800200009 "Введённое значение не подходит для данного поля"
я понимаю, что находит он имена, то есть текст, а формат поля у него цифровой (для записи фкеем). Как сделать так, чтобы выводил он текст, но работал с ID?
Заранее спасибо, уверен, что вопрос ньюбский и ответ на поверхности, но VB это не моё. Я вообще сисадмин =) А это так, в догонку к основным обязанностям )
Добавлено:
отмечу. база SQL 2005
Access 2007
Добавлено:
Вопрос решил сам. руборд помогает отвлечся от америкосов. проблема в "присоеденённом поле", где стояло 2 почему-то, сразу не догадался. Надо брать английскую лицензию. |
