Курс лекций по V B 5.0
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: шпаргалки по управлению, скачать изложение
| Добавил(а) на сайт: Оскар.
Предыдущая страница реферата | 9 10 11 12 13 14 15 16 17 18 19 | Следующая страница реферата
Dim dbs As Database, Rst As RecordSet
Set dbs=OpenDatabase (“Nwind.mdb”
[ Set rst = dbs.OpenRecordSet (“Сохраняет_Запрос”)] или если сохранение запроса не существует
Dim strQuerySQL As String
Set dbs=OpenDatabase (...
StrQuerySQL=“Select * From Products”_ & “Order by ProductName”
Set rst=dbs.OpenRecordSet (strQuerySQL)
Перемещение по набору записей
Методы MoveFirst, MoveLast, MoveNext, MovePrevious - перемещает указатель.
Move [n]
Переделы набора записей определяется свойствами BOF и EOF, количество записей свойством - RecordCount.
Найти определенную запись в наборе можно с помощью метода Seek (для
Table) и Find (dynaset, snapshop): FindFirst, FindLast, FindNext,
FindPrevious.
Например rstOrderDetails.Find “Order ID= ” & rstOrders.[Order ID] - для первой записи в Orders найти .... запись в OrderDetails
rst Suppliers.Index=“CompanyName” rst Suppliers.Seek “=” str CompanyNAme
If rst Suppliers. NoMatch Then ...
(используется текущий индекс таблицы, определенной свойством Index).
Свойство NoMatch используется для проверки найденной записи, критерий
поиска.
После создания объекта RecordSet типа table или dynaset в переменной
можно удавлять или добавлять, модифицировать новые записи (Update, Delete,
AddNew).
.... модификации намного эффективнее с помощью запросов SQL.
Dim dbs As DataBAse, qdfChangeTitles As QueryDef
Set dbs = Open Database (‘ Nwind.mbb)
Set qdfChangeTitles=dbs.Create QueryDef (“ “) qdf ChangeTitles.SQL=“Update Employers” & “Where Title = ‘Бухг’”
После извлечения записи можно обращаться к ее отдельным полям через коллекцию Fields объекта RecordSet по его свойству Name (имя столбца в таблицк) rst Employers.Fields (“LastName”) или rstEm.LastName или rstEm.Fields(0) - индексом в коллеции
Типы данных объекта Field: dbChar, bdByte, dbDouble, dbInteger, dbSingle, dbLong, dbText.
При работе с данными Field используется его свойство Value.
Sub Change Title( ) rstEmployces.LastName.Value=strName
Рекомендуем скачать другие рефераты по теме: бесплатные рефераты без регистрации, доклад по истории на тему.
Категории:
Предыдущая страница реферата | 9 10 11 12 13 14 15 16 17 18 19 | Следующая страница реферата
Главная