home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AmigActive 6
/
AACD06.ISO
/
AACD
/
Online
/
GuardAmy
/
rexx
/
GASend.rexx
Wrap
OS/2 REXX Batch file
|
1999-12-13
|
843b
|
30 lines
/* GASend.rexx support script for GuardAmy */
/* by Diego de Felice (dx0) */
parse arg urla descro browsero
options results
if browsero="IB" then do
address IBROWSE 'Query URL'
urla = result
address IBROWSE 'Query TITLE'
descro = result
end
if browsero="AW" then do
say "aoooooo"
ADDRESS AWEB.1;
GET ACTIVEPORT VAR actp;
ADDRESS VALUE actp;
GET URL VAR urlaz;
urla = urlaz
ADDRESS VALUE actp;
GET TITLE VAR descroz;
descro = descroz
end
address GUARDAMY
'add url 'urla' descr 'space(descro,1,'§')' sendchl'