Code: Select all
a.s = ProgramParameter(0)
;display ProgramParameter(0) so I can see what instance this is.
MessageRequester("?", ProgramParameter(0))
If FindString(a.s, "suMode", 0) = 0
MessageRequester("?", "Should be prompting for a password:")
;run myself in su mode
RunProgram("gksu", ProgramFilename() + " suMode", "")
End
EndIf
;try something I can't do normally:
su = ExamineDirectory(#PB_Any, "/lost+found", "*.*")
If Not su
MessageRequester("!", "NO")
;RunProgram("gksu", ProgramFilename(), "")
End
EndIf
;If we are beyond this point, we are in super user mode.
MessageRequester("!", "YES")

