Как сделать защиту от вскрытия пароля с TextBox -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [3.138.204.208]

Модераторы: SCINER, B.V.

Как сделать защиту от вскрытия пароля с TextBox

D[u]fa

Сообщ. #1 , 30.03.04, 17:17

Master

Профиль · PM

Поощрения: 11 Dgm

Рейтинг (т): 112

Можно скрыть пароль в поле ввода от посторонних глаз, установив параметр текстового поля PasswordChar присвоив ему одиночный символ (например звездочку), в результате в поле будут отображаться звездочки, но программно текст считывается тот, который прячется за звездочками:

Text1.PasswordChar = "*"

, к сожалению это не защитит пароль от различных программ-взломщиков, они способны считывать с текстового поля оригинальные данные замаскированные под звездочками. Одно из возможных решений является отлов ввода пароля пользователем и замена его на настоящие звездочки без использования свойства PasswordChar, например так:

Dim pswd As String

Private Sub Text1_KeyPress(KeyAscii As Integer)

pswd = pswd & Chr(KeyAscii)

KeyAscii = Asc("*")

End Sub

Теперь нажатия будут отлавливаться в переменную pswd, а в TextBox будут передоваться звёздочки

Сообщение отредактировано: B.V. - 14.08.07, 10:02

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0140 ] [ 16 queries used ] [ Generated: 27.04.24, 05:47 GMT ]