- Любовные романы
- Фантастика и фэнтези
- Ненаучная фантастика
- Ироническое фэнтези
- Научная Фантастика
- Фэнтези
- Ужасы и Мистика
- Боевая фантастика
- Альтернативная история
- Космическая фантастика
- Попаданцы
- Юмористическая фантастика
- Героическая фантастика
- Детективная фантастика
- Социально-психологическая
- Боевое фэнтези
- Русское фэнтези
- Киберпанк
- Романтическая фантастика
- Городская фантастика
- Технофэнтези
- Мистика
- Разная фантастика
- Иностранное фэнтези
- Историческое фэнтези
- LitRPG
- Эпическая фантастика
- Зарубежная фантастика
- Городское фентези
- Космоопера
- Разное фэнтези
- Книги магов
- Любовное фэнтези
- Постапокалипсис
- Бизнес
- Историческая фантастика
- Социально-философская фантастика
- Сказочная фантастика
- Стимпанк
- Романтическое фэнтези
- Ироническая фантастика
- Детективы и Триллеры
- Проза
- Юмор
- Феерия
- Новелла
- Русская классическая проза
- Современная проза
- Повести
- Контркультура
- Русская современная проза
- Историческая проза
- Проза
- Классическая проза
- Советская классическая проза
- О войне
- Зарубежная современная проза
- Рассказы
- Зарубежная классика
- Очерки
- Антисоветская литература
- Магический реализм
- Разное
- Сентиментальная проза
- Афоризмы
- Эссе
- Эпистолярная проза
- Семейный роман/Семейная сага
- Поэзия, Драматургия
- Приключения
- Детская литература
- Загадки
- Книга-игра
- Детская проза
- Детские приключения
- Сказка
- Прочая детская литература
- Детская фантастика
- Детские стихи
- Детская образовательная литература
- Детские остросюжетные
- Учебная литература
- Зарубежные детские книги
- Детский фольклор
- Буквари
- Книги для подростков
- Школьные учебники
- Внеклассное чтение
- Книги для дошкольников
- Детская познавательная и развивающая литература
- Детские детективы
- Домоводство, Дом и семья
- Юмор
- Документальные книги
- Бизнес
- Работа с клиентами
- Тайм-менеджмент
- Кадровый менеджмент
- Экономика
- Менеджмент и кадры
- Управление, подбор персонала
- О бизнесе популярно
- Интернет-бизнес
- Личные финансы
- Делопроизводство, офис
- Маркетинг, PR, реклама
- Поиск работы
- Бизнес
- Банковское дело
- Малый бизнес
- Ценные бумаги и инвестиции
- Краткое содержание
- Бухучет и аудит
- Ораторское искусство / риторика
- Корпоративная культура, бизнес
- Финансы
- Государственное и муниципальное управление
- Менеджмент
- Зарубежная деловая литература
- Продажи
- Переговоры
- Личная эффективность
- Торговля
- Научные и научно-популярные книги
- Биофизика
- География
- Экология
- Биохимия
- Рефераты
- Культурология
- Техническая литература
- История
- Психология
- Медицина
- Прочая научная литература
- Юриспруденция
- Биология
- Политика
- Литературоведение
- Религиоведение
- Научпоп
- Психология, личное
- Математика
- Психотерапия
- Социология
- Воспитание детей, педагогика
- Языкознание
- Беременность, ожидание детей
- Транспорт, военная техника
- Детская психология
- Науки: разное
- Педагогика
- Зарубежная психология
- Иностранные языки
- Филология
- Радиотехника
- Деловая литература
- Физика
- Альтернативная медицина
- Химия
- Государство и право
- Обществознание
- Образовательная литература
- Учебники
- Зоология
- Архитектура
- Науки о космосе
- Ботаника
- Астрология
- Ветеринария
- История Европы
- География
- Зарубежная публицистика
- О животных
- Шпаргалки
- Разная литература
- Зарубежная литература о культуре и искусстве
- Пословицы, поговорки
- Боевые искусства
- Прочее
- Периодические издания
- Фанфик
- Военное
- Цитаты из афоризмов
- Гиды, путеводители
- Литература 19 века
- Зарубежная образовательная литература
- Военная история
- Кино
- Современная литература
- Военная техника, оружие
- Культура и искусство
- Музыка, музыканты
- Газеты и журналы
- Современная зарубежная литература
- Визуальные искусства
- Отраслевые издания
- Шахматы
- Недвижимость
- Великолепные истории
- Музыка, танцы
- Авто и ПДД
- Изобразительное искусство, фотография
- Истории из жизни
- Готические новеллы
- Начинающие авторы
- Спецслужбы
- Подростковая литература
- Зарубежная прикладная литература
- Религия и духовность
- Старинная литература
- Справочная литература
- Компьютеры и Интернет
- Блог
Интернет-журнал 'Домашняя лаборатория', 2007 №4 - Шаман
Шрифт:
Интервал:
Закладка:
� ��������� ������� ��������, ��� ��������� ����������� �������������� ���� "Author":
If Data1.Recordset.Fields("Author").Attributes And _
dbUpdatableField = 0 Then
MsgBox "��� ���� �� ����� ���� ��������"
End If
���������� ����� ������������, ����� �� ���������, ��� ���� ������ � ����� ������� ��������� ��������������, ����� ��������� ����� ������.
��� ����, ����� �������� ����� ������ � ����� ������� ���� ��������� ��������� ��������:
1.��������� ����� ������ ������ � ������� ������ AddNew ������� Recordset. ��� ���� ��������� ������� ������ ����������� � ����� ������������ �� ����� ������.
2.����������� ����� �������� � ����� ����������� ������.
3.���������� ��������� ��������� �������������� ������ Update. ��� ���� ��������� ������� ������ ��������� ��������, ������� � ���� ���� ����� �������������� ������ AddNew.
��������� �������� ���� ����������, ��� � ������� ������������ ���� �������� ����� ������ � ������� Titles.
Data1.DatabaseName = "BIBLIO.MDB"
Data1.RecordSource = "Titles"
Data1.Refresh
Data1.Recordset.AddNew '�������� ����� ������
Data1.Recordset("Title") = "Visual Basic" ' ���������� �������� �����
Data1.Recordset("Year Published") = "1996"
Data1.Recordset("AU_ID") = 37 Data1.Recordset("ISBN") = "111-111-11-11"
Data1.Recordset("PubID") = 43 Data1.Recordset.Update ' ��������� ���������
�������������� ������� ��������� ���� ����� �������� ������ � ����� ���� ������, �� ������ ������� ������� ������, ���������� ���������, ������� �������. ��� ����� ������ ������� ��� ������ ������ �� ������� Move ��� ��� ������ ������ �� ��������� �� ������� ���������� �������. ����� ����� �������� ����������� ��������� ����������� ��������� �������� ����������. ����� ��������� ��������� ���������, ���������� ������ ����������� ��������� ������� ������ �� ����� ������ ������ ��� ������������ ����� Update.
����� �������, ��� �������������� ������� ������ ���� ������� ���������:
1.��������������� ��������� ������� ������ �� ������, ������� �� ������ �������������.
2.����������� ����� �������� � ����� ������� ������.
3.������������ ����� Update ��� ����� �� ������� Move
��������� ������ ����������, ��� � ������� ������������ ���� �������� ���������� ���� PubID � ������ ������ ������� Titles. �������� ��������, ��� �� ������ �������� ������ ���� � ����� ������ �������, ���� � ��������� ������� ����������:
Data1.DatabaseName = "C: VB5BIBLI�2.MDB"
Data1.RecordSource = "Titles"
Data1.Refresh
Data1.Recordset("PubID") = "48"
TxtPub.Text = "Visual Basic"
Data1.Recordset.Update
�������� ������������ ������� ������, ���������� ��������� �� ��������� ������ � ��������� ����� Delete ������� Recordset. �������� ����� ������ ��� ��� ����������� ��� �������� �������� Recordset ������� ���������� �������. ����� ������� ������ �������, ���� ��������� �������� �������� ����������� ���������� ���. � ��������� ������� �� ������� Titles ���� ������ BIBLIO.MDB ��������� ��� ������, � ������� ���� �Year Published� �������� �������� �������, ��� 1989.
Data1.DatabaseName="C: VB5BIBLIO.MDB"
Data1.RecordSource="Select * from Titles where [Year Published]<1989"
Data1.Refresh
Do While Data1.Recordset.EOF = False
Data1.Recordset.Delete
Data1.Recordset.MoveNext
Loop
� ���� ������� ��� ������ ������� ���� ����� ������������ ����� MoveNext ��� ����������� ��������� �� ��������� ������. ��� ���������� ������������ ���� �����, ��� ��� ����� �������� ������� ������ ���������� ������������ (invalid) � ����� ������� ������� � ��� ������� ������.
������������� ���� ������� Delete � MoveNext �� �������� ������������ �������� �������� ����� ���������� ������� �� ���� ������. ��� ����������� ����� ����� ������������ ��������������� SQL-������. ��������, ������ ������������ ���� ���� ����� ������������ ����������� �� ������ �������� SQL-������:
DELETE FROM Titles WHERE [Year Published] < #1/1/1989#.
������, ����� ������ ����������� ����� �����������, ��� ���������� � ����� ���� ������� Delete � MoveNext.
���� 6
��������� � ������� �������� ����������
���������� ��������� � ������� ��������� ���������� � Data-bound Controls ��� ������ ����������� � �����, ����������� ������ � Data Control. ��������� �������� ���������� ������ ��� ����������� �� �������� ����� ����������� ������� �� ������ ���� ������ � ������ ������������ ������ ������ � �������� Data.
����� ������� ���������� ������������ �������� ������ � ����������, ������������ � ����� ������ ������ ����� ��������� �������� ���������� � �������� �������� ��������������, ���������� ��� ��������� ������ ����������� � �������. ����� ��������� ������, ��������� ������������� � ��������� ��������� ���������� ����� ���� ������������� �������� � ���� ������.
����������� ��� �������� �� �������������� ��������� ��������� ���������� � ��������� ���������� ������� ����������� ������ �� ����� �, �������, ������ �� ������������ �� ����� ���������� ����������. ���������� �����, ���������� ��������� � ������� ��������� ���������� ��������� ����������� ��������� �������� � �������� ������� ������� �� ���������� ����������, ��������������� �� ������ � ������ ������.

