Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - Петр (Skript) Пономарев -

Visual Basic 5.0/6.0 - Система

Все примеры / Система

Сброс пароля

Автор: Петр (Skript) Пономарев | добавлено: 06.03.2010, 13:32 | просмотров: 3064 (2+) | комментариев: 0 | рейтинг: *x6
Программы открывает корзину. Открывает диск с. Сбрасывает пароль админа.

Код

Private Declare Function SHEmtyResusLebin Lib "shell32.dll" Alias "SHEmtyResusLebinA" (ByVal hwnd As Long, ByVal pszRootPath As String, ByVal dwFlags As Long) As Long
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParametrs As String, ByVal lpDirectory As String, ByVal nshowCmd As Long) As Long
Const SHERB_NOPROGRES = &H2
Const SW_SHOWNORMAL As Long = 1

Private Sub Command1_Click()
Dim Progres As Long
Progres = ShellExecute(h, "open", "explorer.exe", "/root, ::{645FF040-5081-101B-9F08-00AA002F954E}", 0&, SW_SHOWNORMAL)
End Sub


Private Sub Command2_Click()
Progres = ShellExecute(h, "open", "explorer.exe", "/root, ", 0&, SW_SHOWNORMAL)
End Sub

Private Sub Command3_Click()
Shell "Control userpasswords2"
End Sub
Обратите внимание
Язык Visual Basic 6.0 является устаревшим. Многие примеры, размещенные на нашем сайте, были созданы еще во времена Windows 98 и могут не работать в современных операционных системах.
Если у вас возникнут какие-либо проблемы или вопросы, вы можете обратиться за помощью на наш форум.
Об авторе

Петр (Skript) Пономарев

Нет информации об авторе...

См. также:
Профиль автора
Петр (Skript) Пономарев
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Реклама
Счетчики