- Любовные романы
- Фантастика и фэнтези
- Ненаучная фантастика
- Ироническое фэнтези
- Научная Фантастика
- Фэнтези
- Ужасы и Мистика
- Боевая фантастика
- Альтернативная история
- Космическая фантастика
- Попаданцы
- Юмористическая фантастика
- Героическая фантастика
- Детективная фантастика
- Социально-психологическая
- Боевое фэнтези
- Русское фэнтези
- Киберпанк
- Романтическая фантастика
- Городская фантастика
- Технофэнтези
- Мистика
- Разная фантастика
- Иностранное фэнтези
- Историческое фэнтези
- LitRPG
- Эпическая фантастика
- Зарубежная фантастика
- Городское фентези
- Космоопера
- Разное фэнтези
- Книги магов
- Любовное фэнтези
- Постапокалипсис
- Бизнес
- Историческая фантастика
- Социально-философская фантастика
- Сказочная фантастика
- Стимпанк
- Романтическое фэнтези
- Ироническая фантастика
- Детективы и Триллеры
- Проза
- Юмор
- Феерия
- Новелла
- Русская классическая проза
- Современная проза
- Повести
- Контркультура
- Русская современная проза
- Историческая проза
- Проза
- Классическая проза
- Советская классическая проза
- О войне
- Зарубежная современная проза
- Рассказы
- Зарубежная классика
- Очерки
- Антисоветская литература
- Магический реализм
- Разное
- Сентиментальная проза
- Афоризмы
- Эссе
- Эпистолярная проза
- Семейный роман/Семейная сага
- Поэзия, Драматургия
- Приключения
- Детская литература
- Загадки
- Книга-игра
- Детская проза
- Детские приключения
- Сказка
- Прочая детская литература
- Детская фантастика
- Детские стихи
- Детская образовательная литература
- Детские остросюжетные
- Учебная литература
- Зарубежные детские книги
- Детский фольклор
- Буквари
- Книги для подростков
- Школьные учебники
- Внеклассное чтение
- Книги для дошкольников
- Детская познавательная и развивающая литература
- Детские детективы
- Домоводство, Дом и семья
- Юмор
- Документальные книги
- Бизнес
- Работа с клиентами
- Тайм-менеджмент
- Кадровый менеджмент
- Экономика
- Менеджмент и кадры
- Управление, подбор персонала
- О бизнесе популярно
- Интернет-бизнес
- Личные финансы
- Делопроизводство, офис
- Маркетинг, PR, реклама
- Поиск работы
- Бизнес
- Банковское дело
- Малый бизнес
- Ценные бумаги и инвестиции
- Краткое содержание
- Бухучет и аудит
- Ораторское искусство / риторика
- Корпоративная культура, бизнес
- Финансы
- Государственное и муниципальное управление
- Менеджмент
- Зарубежная деловая литература
- Продажи
- Переговоры
- Личная эффективность
- Торговля
- Научные и научно-популярные книги
- Биофизика
- География
- Экология
- Биохимия
- Рефераты
- Культурология
- Техническая литература
- История
- Психология
- Медицина
- Прочая научная литература
- Юриспруденция
- Биология
- Политика
- Литературоведение
- Религиоведение
- Научпоп
- Психология, личное
- Математика
- Психотерапия
- Социология
- Воспитание детей, педагогика
- Языкознание
- Беременность, ожидание детей
- Транспорт, военная техника
- Детская психология
- Науки: разное
- Педагогика
- Зарубежная психология
- Иностранные языки
- Филология
- Радиотехника
- Деловая литература
- Физика
- Альтернативная медицина
- Химия
- Государство и право
- Обществознание
- Образовательная литература
- Учебники
- Зоология
- Архитектура
- Науки о космосе
- Ботаника
- Астрология
- Ветеринария
- История Европы
- География
- Зарубежная публицистика
- О животных
- Шпаргалки
- Разная литература
- Зарубежная литература о культуре и искусстве
- Пословицы, поговорки
- Боевые искусства
- Прочее
- Периодические издания
- Фанфик
- Военное
- Цитаты из афоризмов
- Гиды, путеводители
- Литература 19 века
- Зарубежная образовательная литература
- Военная история
- Кино
- Современная литература
- Военная техника, оружие
- Культура и искусство
- Музыка, музыканты
- Газеты и журналы
- Современная зарубежная литература
- Визуальные искусства
- Отраслевые издания
- Шахматы
- Недвижимость
- Великолепные истории
- Музыка, танцы
- Авто и ПДД
- Изобразительное искусство, фотография
- Истории из жизни
- Готические новеллы
- Начинающие авторы
- Спецслужбы
- Подростковая литература
- Зарубежная прикладная литература
- Религия и духовность
- Старинная литература
- Справочная литература
- Компьютеры и Интернет
- Блог
Интернет-журнал 'Домашняя лаборатория', 2007 №3 - Вудворт
Шрифт:
Интервал:
Закладка:
Sub decrypt()
Dim a, b, c, d As String
������ ��� �����������:
� = "003004016001018027082016021025007083017029029009"
������:
b = "password"
���� ���������������:
� = ""
������ ����� ������ �� �����:
lentext = Len(�)
lenpass = Len(b)
���������� ��������������� (���������� ����������� �������������� � ��������� ������� � ��� �� ��� ������):
For cn = 1 �� lentext Step 3
� = � + Chr(Val(Mid(c, cn, 3)) Xor Asc(Mid(b, (Int(cn / 3) Mod lenpass) + 1, 1)))
Next cn
� ����� � ���������� � � �������������� ������, �� ����� �������� � ����� ����� � � ��������, � �������:
Selection.TypeText Text:=a
End Sub
�����, �������, ��� ��������� � ���� ������� ��� ������������ ����������, ��������, ������� �������� ������ ���� � ������ ��������, ����� ������������� ����� �������� ��� ������������� ����� ����. �� ��� � ��� �� �������.
�������� � �������� ������������� ��� ������� ����� �����: "���������� � �������� ������", "���������� � �������� ������", "��������� ����". � ���, ��� ��� ��������, ����� ������ ������� �����, ������ ����� ������� ������� �������� ��� ������� ���������.
��� ���������� � �������� ������ ��� ����������� � ����������� ������������ ���� � �� �� ������������������ �������� � �������� ������ � �����. ������ � ���, ��� ������ ����. ��� ���������� �� � �������� ������ ������������ ��� ������������������ ��������, ������ ������������� � ������� ������ ������������������ ����� ������������ ������ � ������� ������, � ��������. ��� ������������������ ������� ����� ����� �� ������������� ������, ��� ���� �� ������ ������������������ ����� �������� ������, �� �� ������ ������ �� �������,�� �������� �������������� ����������.
������������ ����������� ���������� ���� ����� ������������������� (���������� �������), ����� ������ �� ��� �������� ����, �� ���� ����� ��������� �������� ("�������� ��� ��������� ����"), � ������ �������� ���� � ������� ��� ������ ��� ("�������� ���� ��������� ����"). ��, ��� ����� ����������� ������������ ���� ��������� ������, ���� ��� ����������� ������������ �� ������. ��� ������ ������� ������ ���������� ���������� �����.
������ ���������� ���������� � �������� ������ � ��� ����������� �������, ���������� ������� � ������������ ������������ ������������ ������ ��� ��������� ��� ��������. ��� �� ������������� �������������� ����������� ����� (������, ����� ���� ����� ����) ���������, � ����� ��� ��������� ��������� ������. �����, � ���� ���� ������ (���������) ���� �� ���� ����, ����� ������������ �� �, ��������� �������������� ����������� ����� ���������� ���������, �������� ���������� �������� � ��������������. ��� ������������ ���� ���� ������� ����� ������ � ������������������� ��������� ������ ��������� � �������� ���������.
������ �� ����� �������� �������� �������� ���������� PGP.
������� ����� ������ Office������� VBA � ����� ������� Office � �������� ����������� � ���������� ����� �������, �������� � ��������. ������ ���� ��������� ��������.
� �ffice2000 ���������� ������� ������ �� ������� � ��������. ���, � Word2000 ��� ����, ����� ����� ����������� ��������� �������, ����������, ����� � ���������� ���� "������ � ������� � ������������" ��� ���������� "�������" ��� "������" ������� ������ �� �������� (����� "�������" � ����� ��� �������� ���������� � ��������� ������������ ����� ����� ������ � ������������� ���������� ���������� ��������). ����� � Word2000 ��� ����, ����� ������������ ���� ����������� ��������� ������� �� ��������, ������������� � ����� ��������������� ������ Word, ���������� �� ������� "�������� ���������" ����������� ���� "������ � ������� � ������������" ���������� ������� � ������ "�������� ���� ������������� ����������� � ��������". ��� ���� ���� ������� ��������� � ������������ � ��������������� ���� ���������.
�� �� ����� ����� � ��� Office ��, ������ ������� ���� � �����. ��-������, �� ��������� ���������� Office ��, ���������� �� ������ ��������, �� ������� ���� �� �������� � ����� �������, ������, Microsoft �������� �������� �������� ���������� ������������� �� ������������. �� �������� �����, �������� �� �������� ������ �������� ������ �����, ��� ������, ��� ������� �� �������� �� VBA �� ����� �������, ��� � ���������� ������ � ����� ���������� �� ������� ��������� � ������������� ����������� ����������� Office ����� ������� ������������� ��������. ��-������, ��� ����, ����� ����� ����������� ���������� ���������� ������ � ����� ������� ����� ����������� � ���������, ����������, ����� � ���������� ���� "������ � ������� � ������������", �� ������� "�������� ���������" ������� ������� � ������ "�������� ������ � Visual Basic Project". �� ���� ���� ������� ��������� � ������� � ���������.
� OfficeXP ����������� ���� �� ����� ����� � ������ ��� ������� ��� ����������� ������������ ���� ����� ������ ��� ����������� ������ �������������� (������ "��������� ������" �� ������ "������� �����", ���.�5.5).
���.�5.5. ���� � Office XP �� ������ ���������� � ������� ����� � ������� VBA-��������� ����� ������� ���������������.

