LoveRead.info » Книги » Разная литература » Интернет-журнал "Домашняя лаборатория", 2007 №4 - Коллектив авторов

Интернет-журнал "Домашняя лаборатория", 2007 №4 - Коллектив авторов

Книгу Интернет-журнал "Домашняя лаборатория", 2007 №4 - Коллектив авторов читаем онлайн бесплатно полную версию! Чтобы начать читать не надо регистрации. Напомним, что читать онлайн вы можете не только на компьютере, но и на андроид (Android), iPhone и iPad. Приятного чтения!

111 0 22:43, 29-10-2022
Интернет-журнал "Домашняя лаборатория", 2007 №4 - Коллектив авторов
29 октябрь 2022

Книга Интернет-журнал "Домашняя лаборатория", 2007 №4 - Коллектив авторов читать онлайн бесплатно без регистрации

Большой и увлекательный, научно-прикладной и образовательный, но некоммерческий интернет-журнал, созданный группой энтузиастов. Интернет-журнал содержит материалы, найденные в Интернет или написанные для Интернет. Основная тематика статей — то, что можно сделать самому, от садовых поделок до сверхпроводников, но есть и просто полезные материалы.

    1 ... 184 185 186 187 188 189 190 191 192 ... 206
    Перейти на страницу:

    ������������� �������� Database � ������ ���������� ���������� ��������� �������� ������ �� ������ Database, ������� ������ �������� Data.

    ���������: Set databaseobject = data1.Database.

    ������ Data ������� ������ Database �� ������ ����� ������� DatabaseName, Exclusive, ReadOnly, � Connect. ��� ��� ������ Database ����� ���� ����������� �������� � ������ ��, ������� �� ���� ������, �� ������ ������������ �� � ����������. ��������, �� ������ ������������ ������ Close ��� Execute. ��������� �������� ������ � �������� Database ��������� � ������, ����������� �������� ������� � ������.

    � DatabaseName

    ������������� �������� DatabaseName ��������� �������� ��� ���������� ��� � ����������������� ��������� ������ ��� ������� Data.

    ���������: data1.DatabaseName=string.

    ��������� ��������� string ���������� ����������������� � ��� ����� ���� ������ � �������� MS Access � Btrieve. ���� ������������ ���� ������, ����������� �� ����-�������, �� ������ ������ �������� ������ ���� � ���������� �����, ��������:

    \SERVERDATADATABASE.MDB.

    ��� ��� ������ � ������� dBASE, Paradox � ��. ������ string ������ ��������� ������ ���� � �����.

    ��� ��� ������ ODBC ��� �������� �� ������������, ��� ��� ��� ����������� ��������� ��� ����� � ����� ������ ��������������� ��������� Connect.

    ���� �� �� ����� ������ ���������� ��������� �������� DatabaseName, �� ����� ��������� ��������� ���������� ��������� ����� Refresh ������� Data.

    ���������������� ������������� �������� DatabaseName � ������ ���������� ����������. ��� �����:

    1.��������� ������, ��������� ��� ��������� ����������� ����� BIBLIO.MDB.

    2.�������� ���������� �������� DatabaseName ������� ���������� ������� Data1.

    3.��������� ��������� ��� � ��������� ��������� ��������� � �������� �����:

    Private Sub Form_Load()

    data1.databasename= "c: vb5biblio.mdb"

    data1.refresh

    End Sub

    4.���������� ������.

    ��� ���������� ���������� ��� ������ � ������ ������ ����� �� ����������� ������������ � ���������� ��������� ��������� ���������� �������� DatabaseName �� ����� ���������� ���������. ��� ����� ���� �� ������ ������ ��� ������������. ������� �������� ������������� ��������� � ������������ ������ �������� ����� � ������ ��� ������ � ����������� ������ ������������ ������ ���������� � ����������� ����������� ���� ���������� � �������� �������� ���������. ���, �������������� ��� ��������, ����� ��������, ��������, � ��������� ��������� ������� Load ��� Activate ��������������� �������� �����.

    ������ �������� ����������� ���� � ����� ���� ������ �������� ������������� ����������� ������� Visual Basic � ������� ���. ���� ���� ������ �� ����� �� �������, �� �������, � ���� ���� ��������� ����� �������� �������. ����� �� ��� �������� �������� Path, ������� ���������� ���� � ������������ �����. ���� �� ����������� ��������������� ����� ���������� Visual Basic, ��������, ��� ������� ����������, �� App.Path ���������� ���� � ����� �������, ������� �� ���������.

    ����� ����� ��� ������ ��� ����� ��������� ��������� � ����������� DBASE ��������, � ������� ��������� ���� ���������� (������). ����� �� ������ ���������� ����������� ���� � ����� � ������� ���������� ��������� ����. ������ �������, �� �������� ����������� ���������� (������) ����� ���������� ��� ������.

    Dim DBName As String

    DBName = "BIBLIO.MDB"

    Data1.Databasename = App.Path+"DBASE"+DBName Data1.Refresh

    � EOFAction

    �������� EOFAction ���������� �������� ������� Data, ���� �������� EOF (end of file � ����� �����) � ���������� �� ������ ������� ����������� � True.

    ���������: data1.EOFAction=value.

    �������� value ����� ���� ������� �� ���� �����������: MoveLast, EOF, ��� AddNew.

    ��� �������� ������� Data �������� EOFAction ��������������� �� ��������� ��� MoveLast. ��� ���� ������� �������� ��������� ������ � ������ �������.

    ��������� �������� EOFAction � EOF �������� � ����, ��� ��� ����������� ��������� ������� ������ �� ������� ������ �����, ������� ������ ���������� ������������ (invalid) � ����� ������� �� �������������� �������� � ������. � ���� ������ ���������� ������� Validate �� ��������� ������ � ������ �, �����, ������� Reposition, ��� �� ������������ ������. ��� ���� ������ ����������� ��������� �� ��������� ������ �� ������� ���������� ������� ���������� ����������.

    ���� ���������� �������� EOFAction � AddNew, �� ��� ����������� ��������� ������� ������ �� ��������� ������ ������, ���������� ������� Validate �� ��������� ������, �����, � ����� ������� ����������� ����� ������ ������ � ���������� ������� Reposition. ����� ������������ ����� �������� ��������� ����� ������, ��� ��� ������� ��������� � ������ ���������� � ������ �����������. ���� ����� ����� ������������ ���� ����������� ������ � ���������� ��������� ������� ������ �� ����� ������ ������, �� ����� ������, ��� ���������� ������, ����� �������� � ����� ������� � ����� � ���� ������. � ��������� ������, ���� ������������ �� ���� ������ � ���������� ���������, �� ������ ����� ������ �� ����������� � ����� �������. ����� �������, ��������� �������� EOFAction � AddNew ���� ����������� ������������ ��������� � ���� ������ ����� ������ � ������� ������� Data � ��������� � ��� ��������� ����������.

    ���������� �������� EOFAction ������� ���������� ������� data1 � ������ ���������� ���������� ����� ��������� �������:

    data1.EOFaction=vbEOFActionMoveLast,

    data1.EOFaction=vbEOFActionEOF,

    data1.EOFaction=vbEOFActionAddNew.

    ��������� ��������� �������� EOFAction ��������� � ��������� �������.

    ��������� ∙ �������� ∙ ��������

    vbEOFActionMoveLast ∙ 0 ∙ MoveLast

    vbEOFActionEOF ∙ 1 ∙ EOF

    vbEOFActionAddNew ∙ 2 ∙ AddNew

    �������� ������ ����������, � ������� ���� ����������� ��������� � ���� ������ ����� ������.

    ��� �����:

    1.��������� ���������������

    1 ... 184 185 186 187 188 189 190 191 192 ... 206
    Перейти на страницу:
    1. Жалоба
    Отзывы - 0

    Прочитали книгу? Предлагаем вам поделится своим отзывом от прочитанного(прослушанного)! Ваш отзыв будет полезен читателям, которые еще только собираются познакомиться с произведением.


    Уважаемые читатели, слушатели и просто посетители нашей библиотеки! Просим Вас придерживаться определенных правил при комментировании литературных произведений.

    • 1. Просьба отказаться от дискриминационных высказываний. Мы защищаем право наших читателей свободно выражать свою точку зрения. Вместе с тем мы не терпим агрессии. На сайте запрещено оставлять комментарий, который содержит унизительные высказывания или призывы к насилию по отношению к отдельным лицам или группам людей на основании их расы, этнического происхождения, вероисповедания, недееспособности, пола, возраста, статуса ветерана, касты или сексуальной ориентации.
    • 2. Просьба отказаться от оскорблений, угроз и запугиваний.
    • 3. Просьба отказаться от нецензурной лексики.
    • 4. Просьба вести себя максимально корректно как по отношению к авторам, так и по отношению к другим читателям и их комментариям.

    Надеемся на Ваше понимание и благоразумие. С уважением, администратор LoveRead.info.


    Установить VPN и читай слушай бесплатно

    Новые отзывы

    1. Анна Анна15 июнь 07:43 [spoiler][книга интересная,но не полная и к концу главы повторяются.... Кириленко Ирина – Бирюк
    2. Вера Вера15 июнь 01:46 Благодарю Автора!!!! Хорошо,что все хорошо кончается! Сюжет-захватывает!!!... Звезда+1 - Алайна Салах
    3. Борис Борис14 июнь 00:50 Колокола в России тем и отличались от западных что раскачиаали именно язык колокола,а не сам колокол! Авторы что-жертвы ЕГЭ? Не... Соединенные Штаты России 3 - Полина Ром
    Все комметарии
    Новинки бесплатной онлайн библиотеки