прайс ошибка

Добавлено:
Ср окт 12, 2011 5:52 pm
velka71
При открытии прайс-листы ошибка метода LoadGrid(завершение) Не удалось включить ограничения. По меньшей мере одна строка содержит значение,нарушающее ограничения по определённости значений,уникальности или внешним ключам.Та же ошибка при открытии объекты учёта
Re: прайс ошибка

Добавлено:
Чт окт 13, 2011 6:29 am
dmitry
Чтобы понять причину:
- Скопируйте текст ниже.
- Нажмите в программе Ctrl+F10.
- Вставьте текст, нажмите "ОК".
Dim R As DAO.Recordset
R = DB.OpenRecordset("SELECT ID FROM Articles GROUP BY ID HAVING Count(ID)>1;")
If R.RecordCount = 0 Then
Microsoft.VisualBasic.MsgBox("Причина не выявлена", , "Проверка")
Else
Microsoft.VisualBasic.MsgBox("Дублируется ID=" & R("ID").Value, , "Проверка")
End If
R.Close()
Появится сообщение с результатом проверки, что в нем будет написано?