| Вопрос: Adodc1 и Recordset? | Добавлено: 16.11.05 07:21 |
Автор вопроса:  Rafail
|
|
Привет!
Начал с АДО заниматься и у меня не получаеться поиск,допустим по имени поля в Table1(mdb файл).Используеться Adodc1.Recordset... В DAO работает Data1.Recordset.FindFirst "Name = '" _ & Trim(InputBox("Введите имя:")) & "'" If Data1.Recordset.NoMatch Then MsgBox "Имя не найдено" А вот прописываю Adodc1.Recordset.FindFirst "Name = '" _ & Trim(InputBox("Введите имя:")) & "'" If Adodc1.Recordset.NoMatch Then MsgBox "Имя не найдено" В общем он ищет и находит,но NoMatch-не понимает,кто нибудь может подскажет!? |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  Hunter2003 ICQ: 287314254 Вопросов: 14 Ответов: 72 |
Профиль | Цитата | #1 | Добавлено: 17.11.05 09:51 |
|
Используй метод Find (Criteria, SkipRows, SearchDirection, Start), где:
Criteria A String value that contains a statement specifying the column name, comparison operator, and value to use in the search. SkipRows Optional. A Long value, whose default value is zero, that specifies the row offset from the current row or Start bookmark to begin the search. By default, the search will start on the current row. SearchDirection Optional. A SearchDirectionEnum value that specifies whether the search should begin on the current row or the next available row in the direction of the search. An unsuccessful search stops at the end of the Recordset if the value is adSearchForward. An unsuccessful search stops at the start of the Recordset if the value is adSearchBackward. Start Optional. A Variant bookmark that functions as the starting position for the search. А когда свойство Adodc1.Recordset.EOF=True, то поиск не дал результатов. |
||
|
Номер ответа: 2 Автор ответа: Rafail Вопросов: 3 Ответов: 8 |
Профиль | Цитата | #2 | Добавлено: 18.11.05 17:06 |
|
Большое спасибо,все получилось,но теперь появилась еще одна проблема!
Имею форму с Adodc1 И две кнопки "<" и ">" и Кнопка "добавить" Private Sub Command5_Click() Adodc1.Recordset.AddNew 'Добавляем запись End Sub Нажав ее и если запись новую не сделаю и допустим Нажимаю одну из кнопок Private Sub Command2_Click() Adodc1.Recordset.MoveNext If Adodc1.Recordset.EOF Then Adodc1.Recordset.MovePrevious End Sub выдет ошибку:"Неудаеться вставить пустую строку,небходимо хотябы один столбец значений",а если запись сделаю,то все нормально. Пытался,но не получаеться,с DAO получаеться а с ADO,нет. баз маленькая *.mdb |
||
Страница: 1 |