Страница: 1 |
Страница: 1 |
Вопрос: Запись служебной строки в файл
Добавлено: 23.11.06 19:27
Автор вопроса: RDman
Привет всем.
Ситуация след.: создается прога на VB6 для работы с текстовыми файлами в зашифрованном виде. (шифрация - дешифрация и хранение зашифрованного текста в своих файлах). Кроме хранения собственно текста в файл нужно загнать строку - указатель с параметром, указывающим проге есть ли в файле пароль, например: Password=True ' есть пароль и ...=False ' нет. Строка не должна быть видима юзеру в текстовом поле проги, а должна распозноваться только специальной процедурой в коде проги.
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #1
Добавлено: 23.11.06 22:05
Ну оставь первый байт твоего файла как резервный для этой метки...
Читать типа
Dim metka$
metka = " "
Get #1, , metka
а весь файл, кроме метки будет соответсвенно
Dim buffer$
buffer$ = space$(lof(1))
Get #1, 1, buffer