Not too shy to talk ![Not too shy to talk](https://www.amigans.net/uploads/rank3dbf8e94a6f72.gif)
Joined: 2006/12/2 1:41 Last Login
: Today 1:12
From VA, USA
Group:
Registered Users
|
Hi DaveyW,
While I know there are shorterhand ways of doing this, the longhand way always worked for me...
/* Ask User Choice & Print Out */ TitleBarTxt = 'Test Requester' BodyTxt = 'Pick something!' ButtonsTxt = '"Yes" "Umm" "No"' ReqType = 'INFO' cline = 'c:requestchoice "' || (TitleBarTxt) || '" "' || BodyTxt || '" ' || (ButtonsTxt) || ' TYPE ' || (ReqType) || ' TO T:response.txt' address command cline MyReturnCode = RC if exists('T:response.txt') then if open(ReqF,'T:response.txt','r') then do pick = strip(readln(ReqF),'B','"') bs = close(ReqF) address command 'c:delete T:response.txt' say 'response >' pick '<' end else say 'Couldn''t open Requester output file'
Fundamentally, you've have to read the output file from the Req... command.
Good luck,
PJS
|