Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Замучался с datagrid... 
:(
    Опции темы
MEATNE@
Дата 22.10.2003, 12:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 22.10.2003

Репутация: нет
Всего: нет



Помогите кто нибудь!

Две таблицы ms access:

MATERIAL.MDB
-COD long;
-NAME text;
-COMMENT text;
SCLAD.MDB

-COD long;
-RAZMER double;
-MATERIAL long;
-KOL long;

На форме расположен adodc с запросом :
SELECT DISTINCTROW SCLAD.COD,SCLAD.RAZMER, SCLAD.MATERIAL, MATERIAL.NAME, SCLAD.KOL
FROM MATERIAL INNER JOIN SCLAD ON MATERIAL.COD = SCLAD.MATERIAL;

adodc выводится на datagrid.

При поытке удалить строку выдается сообщение:"Не достаточно сведений ключевого поля для обновления", хотя этот же зарос в access позволяет это сделать.

И при изменения колонки с SCLAD.MATERIAL не удается обновить колонку с MATERIAL.NAME. (datagrid.refresh - тишина, adodc.refresh - все виснет).

Конечно можно использовать другие control'ы, но уже принципиально хочется разобраться.
Заранее благодарен!!!

PM MAIL   Вверх
Vach
Дата 22.10.2003, 19:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 304
Регистрация: 17.10.2003
Где: Санкт-Петербург

Репутация: 8
Всего: 18



Как у тебя выглядит ConnectionString?
PM MAIL ICQ   Вверх
MEATNE@
Дата 23.10.2003, 12:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 22.10.2003

Репутация: нет
Всего: нет



Вот так:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\lraskroy\main.mdb;Persist Security Info=False
PM MAIL   Вверх
Vach
Дата 23.10.2003, 19:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 304
Регистрация: 17.10.2003
Где: Санкт-Петербург

Репутация: 8
Всего: 18



Уфффф. Я уж подумал что это у тебя две разные таблицы. smile.gif
Как я понял дело тут в ключевых полях.
Установи в таблице MATERIAL поле COD как ключевое
в таблице SCLAD поле MATERIAL как ключевое
(если данные в таблицах не противоречивы ключ встанет, или проверь ручками значения полей)

А далее:
Код

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data " & _
 "Source=D:\forum.vingrad.ru\Замучался с datagrid\main.mdb;" & _
 "Persist Security Info=False"
Adodc1.CursorType = adOpenDynamic
Adodc1.LockType = adLockOptimistic
Adodc1.CursorLocation = adUseClient
Adodc1.Mode = adModeUnknown
Adodc1.RecordSource = "SELECT DISTINCTROW SCLAD.COD as SCOD, MATERIAL.COD as MCOD, " & _
 "SCLAD.RAZMER, SCLAD.MATERIAL, SCLAD.KOL, MATERIAL.NAME " & _
 "FROM MATERIAL INNER JOIN SCLAD ON MATERIAL.COD = SCLAD.MATERIAL;"
Adodc1.Refresh
Adodc1.Recordset.AddNew
 Adodc1.Recordset!SCOD = 2
 Adodc1.Recordset!MCOD = 2
 Adodc1.Recordset!RAZMER = 1
 Adodc1.Recordset!MATERIAL = 1
 Adodc1.Recordset!Name = 1
 Adodc1.Recordset!KOL = 1
Adodc1.Recordset.Update

Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Delete adAffectCurrent
Adodc1.Recordset.Update

Удачи.
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0821 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.