Показать сообщение отдельно
  #1 (permalink)  
Старый 26.12.2010, 09:30
Новичок на форуме
Отправить личное сообщение для Николай555 Посмотреть профиль Найти все сообщения от Николай555
 
Регистрация: 26.12.2010
Сообщений: 1

помогите извлечь пароль
Здравствуйте кто нибудь может извлечь из приведенного примера пароль. Заранее благодарен.
method run(var eventInfo Event)
var
rab, resAlias String
endvar
if Help.open(":FACE_CD:Help")
then
rab = Help.controlDir()
if rab.substr(1, 2) <> "Er"
then
mask = rab.substr(1, rab.size() - 23)
execute(rab, Yes)
else
resAlias = ""
Help.setRetS(resAlias, rab)
endif
rab = Help.getRetS()
else
errorClear()
mask = startUpDir() + "\\"
rab = "Error 1"
endif
if rab.substr(6, 2) = " 1" or rab.substr(6, 2) = " 2"
then
resAlias = mask + "PINb.EXE"
execute(resAlias, Yes, ExeShowNormal)
if rab.substr(7, 1) = "2"
then
beep()
msgStop("", "!!!!!!!!!!!!!!!!!!!")
endif
prepareRet()
close()
exit()
else
prepareRet()
close()
f.open(":FACE_CD:REGION")
endif
endMethod
Ответить с цитированием