powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / как изменить пароль
22 сообщений из 22, страница 1 из 1
как изменить пароль
    #37813041
Adulik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ребята пожалуйста помогите мне нужно написать !!!!!
...
Рейтинг: 0 / 0
как изменить пароль
    #37813043
Adulik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Private Sub Command1_Click()
If txtuser.Text = "я" And txtpassword.Text = "1122" Then
MDIform1.Show
Unload Me
Else
MsgBox "Sxl e", vbCritical, "error"
End If
End Sub

Private Sub Command2_Click()
End
End Sub



Private Sub Command3_Click()
frmChangePass.Show vbModal
End Sub

Private Sub Form_Load()
Me.Height = 2250
End Sub
Это моя программа для запрета входа и мне нужно чтобы я смогла изменить пароль!!
...
Рейтинг: 0 / 0
как изменить пароль
    #37813068
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Adulik,

храни пароли в зашифрованном виде. например, записываешь вместо символа "А" символ "Б", вместо "Ю" символ "Я" и т.д. сложность шифровки зависит от твоего воображения. и, надеюсь, ты понимаешь, что от серьёзно настроенного чела твой твой пароль не спасёт? только от рядовых пользователей
...
Рейтинг: 0 / 0
как изменить пароль
    #37813075
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
BelowZero,

вот что называется - "в цвет отвечает"
автор как раз и прищел с вопросом "где хранить", так что бы изменять,
а ты ей "про погоду"

автор - в реестре, - на лабу хватит ...
...
Рейтинг: 0 / 0
как изменить пароль
    #37813080
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
qwerty112автор как раз и прищел с вопросом "где хранить" выдели строку, в которой афффтар это спрашивает
...
Рейтинг: 0 / 0
как изменить пароль
    #37813085
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
BelowZero,
афтар тактже на спрашивала КАК хранить.

Adulik Это моя программа для запрета входа и мне нужно чтобы я смогла изменить пароль!!
...
Рейтинг: 0 / 0
как изменить пароль
    #37813086
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
BelowZeroqwerty112автор как раз и прищел с вопросом "где хранить" выдели строку, в которой афффтар это спрашивает
...тебе, сложновато будет, наверное, понять ..., но я попробую

когда автор говорит - "изменить",
это значит, что есть состояние пароля ДО, и состояние пароля ПОСЛЕ
вот эти 2-а слова которые я для тебя выделил - обозначают некоторый промежуток времени

..нуу, дальше понятно ?
...
Рейтинг: 0 / 0
как изменить пароль
    #37813088
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
BelowZeroqwerty112автор как раз и прищел с вопросом "где хранить" выдели строку, в которой афффтар это спрашивает я так и думал
афффтар не знал, как изменить пароль-константу. я предложил хранить его отдельно от проги. предупреждая следущий вопрос "ведь кто-нить может открыть текстовик и реестр и посмотреть его?" сказал, что можно зашифровать. что не так?
...
Рейтинг: 0 / 0
как изменить пароль
    #37813092
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
qwerty112..нуу, дальше понятно ? черезчур дерзкое выражение для того, кто не прав.
...
Рейтинг: 0 / 0
как изменить пароль
    #37813093
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
BelowZeroBelowZeroпропущено...
выдели строку, в которой афффтар это спрашивает я так и думал
афффтар не знал, как изменить пароль-константу. я предложил хранить его отдельно от проги. предупреждая следущий вопрос "ведь кто-нить может открыть текстовик и реестр и посмотреть его?" сказал, что можно зашифровать. что не так?
даа, всё так !

но шифрование у автора будет в 3-ем классе,
ей, щас, нужно как-то "вместить в мозг", что сравнивать можно не только с литералом "жестко" вбитым в код, а "доставать" это значение (пароль) откуда-то из-вне !

для неё и так это "уже Омерика" !
...
Рейтинг: 0 / 0
как изменить пароль
    #37813094
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
BelowZeroqwerty112..нуу, дальше понятно ? черезчур дерзкое выражение для того, кто не прав.
тебе семак отсыпать ?
...
Рейтинг: 0 / 0
как изменить пароль
    #37813099
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
qwerty112для неё и так это "уже Омерика" ! тогда при чём тут реестр? это вообще дремучий лес.я сам за полтора года программирования с реестром особо не возился - муторно
Adulik,
итак, правильный ответ:
храни пароли отдельно от программы
для этого лучше всего подходит txt файл в одной папке с твоей прогой. при проверке пароля проверяешь, совпадает ли введённый пароль с паролем в текстовом файле. при изменении пароля пишешь в текстовик товый пароль. с реестром мудиться не советую - себе дороже qwerty112тебе семак отсыпать ?
...
Рейтинг: 0 / 0
как изменить пароль
    #37813120
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
BelowZeroqwerty112для неё и так это "уже Омерика" ! тогда при чём тут реестр? это вообще дремучий лес.я сам за полтора года программирования с реестром особо не возился - муторно
нуу и зря
"полноценная" работа с реестром, может быть - и посложнее чем с тхт-файлом
но если ограничится спец.разделом "для буйных" - всё очень и очень просто ...
SaveSetting / GetSetting
а автору, имхо - больше и не нужно ...
...
Рейтинг: 0 / 0
как изменить пароль
    #37813125
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
qwerty112,

тогда грядущие многотомные топики афффтара по разбору реестра на кусочки на твоей совести)
...
Рейтинг: 0 / 0
как изменить пароль
    #37813164
Adulik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
спасибо вам ребята что не прошли мимо моего вопроса!!!!
...
Рейтинг: 0 / 0
как изменить пароль
    #37813170
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Adulikспасибо вам ребята что не прошли мимо моего вопроса!!!! конешь, обращайся. будешь нашим с ЦЭ преемником. а когда мы вырастим и будем большими и сильными, то организуем свою банду хакеров и будем зарабатывать много денег и будем все жить долго и счастливо)
...
Рейтинг: 0 / 0
как изменить пароль
    #37813172
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Adulikспасибо вам ребята что не прошли мимо моего вопроса!!!!
(на "почве" ответа в парал.тему)
это надо так понимать, что всё, что "ребята тут понаписывали", тебе не дошло, ты в серьёз не восприняла, так ??
...
Рейтинг: 0 / 0
как изменить пароль
    #37813183
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
qwerty112,

угу... вежливо поблагодарила, но ничего полезного не нашла.
Adulik, воть.
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
Option Explicit
Private Sub Command1_Click()
Dim F As Long
Dim MyText As String
F = FreeFile
If Dir(App.Path & "/parolb.txt") <> "" Then
Open App.Path & "\parolb.txt" For Input As #F
Line Input #F, MyText
Close #F
If txtpassword.Text = MyText Then
MDIform1.Show
Unload Me
Else
MsgBox "Sxl e", vbCritical, "error"
End If
Else
MsgBox "net faila     " & App.Path & "/parolb.txt"
End If
End Sub

Private Sub Command2_Click()
Dim F As Long
F = FreeFile
Open App.Path & "\parolb.txt" For Output As #F
Print #F, txtpassword.Text
Close #F
End Sub

1 кнопка проверяет пароль(который в файле parolb.txt в папке в прогой), а вторая кнопка сохраняет пароль из текстбокса(txtpassword.Text)
Shocker.Pro,
не стал закрывать код простынкой, мб афффтар топика не умеет за неё заглядывать
...
Рейтинг: 0 / 0
как изменить пароль
    #37813199
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
BelowZero
не стал закрывать код простынкой, мб афффтар топика не умеет за неё заглядывать

гыы !

эхх ! быстро жж ты сдался !! нужно было довести хотя бы до 3-ей пересдачи "фотки в профиле"

---
...мая версия
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
' -- Установить пароль
Private Sub btn1_Click()
    Dim Result As String
    Result = InputBox("Новый парол давай, да ?", "Парол")
    If Result <> "" Then
        SaveSetting "Haba-Haba", "Adulik", "Password_cho?", Result
    End If
End Sub

' -- Проверить пароль
Private Sub btn2_Click()
    Dim Result As String
    Result = InputBox("Парол давай, да ?", "Парол")
    If Result = GetSetting("Haba-Haba", "Adulik", "Password_cho?") Then
        MsgBox "Вай, маладэц !", vbInformation
    Else
        MsgBox "Вай, нихороший человек !", vbExclamation
    End If
End Sub
...
Рейтинг: 0 / 0
как изменить пароль
    #37813201
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
qwerty112нужно было довести хотя бы до 3-ей пересдачи "фотки в профиле" врят ли это для универа. слишком расплывчатое задание. тут можно до кодирования файла на хостинге тему расписать. хотя... судя по срочности и количеству восклицательных знаков... и по отношению афффтара к своему же топику... всё может быть qwerty112...мая версия горизонт завален)
...
Рейтинг: 0 / 0
как изменить пароль
    #37813214
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
BelowZero,
Модератор: Что за флуд? На полдня оставить нельзя!
...
Рейтинг: 0 / 0
как изменить пароль
    #37816448
Adulik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
да что вы я очень вежлива (пока мне не злит),,,и я поблагодарил потому что вы мне помогли!!!это задание мне учитель задал и еще много задании, и еще раз СПАСИБО!!!!!!!!!!!!!!!!!!!!
...
Рейтинг: 0 / 0
22 сообщений из 22, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / как изменить пароль
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]