Hi,
It seems that the LISTAR mucked up the one I sent.
Here it is again as part of the message.
I hope it works this time.
Sorry folks.
(and sorry for the lack of comments - it is a real "hack" job)
/* */
lib="rexxdossupport.library"
if ~show('L',lib) then do
if addlib(lib,0,-30,0) then do
say lib 'not available'
exit 10
end
end
lib="rexxreqtools.library"
if ~show('L',lib) then do
if addlib(lib,0,-30,0) then do
say lib 'not available'
exit 10
end
end
nl = '0a'x
options results
filename = rtfilerequest(, , "Pick a file" , ,"rtfi_buffer = true")
if rtresult == 0 then
call rtezrequest("You didn't pick a file.", "No", ,)
else
/* filename = what I selected */
call open('the_file',filename,'R')
k = rx_getwinnum
say k
do while ~EOF('the_file')
j = readln('the_file')
'say '||j
end
call close('the_file')
Cya!
--
C:\BELFRY is where I keep my .BAT files ^^^oo^^^
Andrew Bruno
[EMAIL PROTECTED]
__________________________________________________________
AmIRC Mailing List - Info & Archive: http://www.vapor.com/
For Listserver Help: <[EMAIL PROTECTED]>, "HELP"
To Unsubscribe: <[EMAIL PROTECTED]>, "UNSUBSCRIBE"
