| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > VB6 > Put или Write |
| Автор: Vano-K 26.4.2004, 06:57 | ||
Люди фишка вот в чём. Я сделал Key_Loger, но сделел так, что он записует по строчкам. Тоесть - он записует все нажатые кнопки до того момента, пока не начнется вторая строка(Нажатие Enter или Tab - новая строка) У меня было
Получается как токо новая строка - старая записуется и так далее. Но возникла идея шифровать сохраненные данные. Вот тут и началась проблема. Получается Write # дописует к текущему файлу техт из TextBox_a но при этом берёт его в ковычки "сдесь сохраненный текст 1 строки" "сдесь сохраненный текст 2 строки" "сдесь сохраненный текст 3 строки" ......................... Я думал, ну защифрую - при сохранении строки Text1.Text будет проходить шифровку либо создать переменную (это не важно). Зашифровалась, записалась в мой файл, казалось бы всё cool, а не тут то было. Расшифровка то не рабоает!!! А почему? Да потому что ети кавычки всё портят!!! Так вот сама суть. Как мне дописовать файл, но текст должен сохраняться не в ковычках, иначе разщивровка безсмысленна. Я пробовал Open "TESTFILE.txt" For Append As #1 Put #1, i , Text1.Text (не работает) Open "TESTFILE1.txt" For Random As #1 Put #1, i , Text1.Text (работает, но не дописует а удаляет весь текст и записует 1 строчку) Open FileCopyDir & "setup.exe" For Append As #1 ... Write #1, Text1.Text (записует - дописует, но в ковычках что не дает возможности разшифровать) короче перепробовал кучу вего, но выхода пока не нашол. Пожалуйста помогите мне в этой ситуации |
| Автор: Akina 26.4.2004, 09:10 |
| Open "TESTFILE.txt" For Append As #1 print #1, Encrypt(Text1.Text) .... Open "TESTFILE.txt" For Input As #1 Line Input #1, Temp Text1.Text=decrypt(Temp) |