Опять про шифрование
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 9
• Страница 1 из 1
- XairOn
- Постоялец
-
- Сообщения: 324
- Зарегистрирован: 19.07.2004 (Пн) 20:20
- Откуда: Irkutsk region
Опять про шифрование
XairOn » 13.06.2005 (Пн) 12:36
Добрый день господа, я конечно прекрасно понимаю, что вопрос мой до такой степени избитый и старый, что вроде бы не следовало его задавать, о тем не менее... Мне нужно зашифровать текст средствами VB, в принципе шифр не требует мощной криптостойкости, но и совсем элементарным он тоже быть не должен. Если у кого-нибудь есть исходники, выложите сюда. Спасибо!
- Опришник
- Обычный пользователь
- Сообщения: 78
- Зарегистрирован: 09.01.2005 (Вс) 0:48
- Откуда: localhost
Re: Опять про шифрование
Опришник » 13.06.2005 (Пн) 22:45
XairOn писал(а):...шифр не требует мощной криптостойкости, но и совсем элементарным он тоже быть не должен. ...!
- Код: Выделить всё
Function ShifruemText(szText$, szKey$)
Dim I&, _
nLenKey&
nLenKey = Len(szKey)
For I = 1 To Len(szText)
Mid(szText, I, 1) = Chr(Asc(Mid(szText, I, 1)) Xor _
Asc(Mid(szKey, (I - 1) Mod nLenKey + 1, 1)))
Next
End Function
Функция как шифрует так и дешифрует...
Последний раз редактировалось Опришник 13.06.2005 (Пн) 22:47, всего редактировалось 1 раз.
А здесь могла бы быть ваша реклама...)
- Sasha_karasov
- Постоялец
-
- Сообщения: 436
- Зарегистрирован: 03.03.2005 (Чт) 19:38
- Откуда: ua.dp
Sasha_karasov » 14.06.2005 (Вт) 2:18
Мне кажется что тебе нужно найти алгоритм шифрования. Зайди на сайт Algolist (дальше не помню в google найдешь)
Удачи!
С уважением, Алексадр.
С уважением, Алексадр.
- Sasha_karasov
- Постоялец
-
- Сообщения: 436
- Зарегистрирован: 03.03.2005 (Чт) 19:38
- Откуда: ua.dp
Sasha_karasov » 14.06.2005 (Вт) 2:20
Блин забыл на моем сайте тоже есть шифрование!
Вот на этот сайт зайди: http://www.vbprosto.narod.ru/
Вот на этот сайт зайди: http://www.vbprosto.narod.ru/
Удачи!
С уважением, Алексадр.
С уважением, Алексадр.
- Sebas
- Неуловимый Джо
-
- Сообщения: 3626
- Зарегистрирован: 12.02.2002 (Вт) 17:25
- Откуда: столько наглости такие вопросы задавать
Sebas » 15.06.2005 (Ср) 8:22
Ну, а если нужно шифровать "по-серьёзному", то используй библиотеку CAPICOM, она идёт вместе с виндой. За подробностями в поиск.
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?
sebas<-@->mail.ru
sebas<-@->mail.ru
- Sasha_karasov
- Постоялец
-
- Сообщения: 436
- Зарегистрирован: 03.03.2005 (Чт) 19:38
- Откуда: ua.dp
Sasha_karasov » 15.06.2005 (Ср) 19:26
Sebas писал(а):Ну, а если нужно шифровать "по-серьёзному", то используй библиотеку CAPICOM, она идёт вместе с виндой. За подробностями в поиск.
А мне кажется нет, чтоб хорошо зашифровать нужно, искать хороший и мало известный алгоритм, так как, как дешифровать эти алгоритмы доступны на хак сайтов !
Ну может я и не прав !
Удачи!
С уважением, Алексадр.
С уважением, Алексадр.
- Sebas
- Неуловимый Джо
-
- Сообщения: 3626
- Зарегистрирован: 12.02.2002 (Вт) 17:25
- Откуда: столько наглости такие вопросы задавать
Sebas » 15.06.2005 (Ср) 22:12
Sasha_karasov писал(а):А мне кажется нет, чтоб хорошо зашифровать нужно, искать хороший и мало известный алгоритм, так как, как дешифровать эти алгоритмы доступны на хак сайтов !
Ну может я и не прав !
Типичное заблуждение... Что бы расшифровать ключ, пускай даже известного алгоритма, ой-ё-ё... купи карту!
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?
sebas<-@->mail.ru
sebas<-@->mail.ru
Сообщений: 9
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: Yandex-бот и гости: 164