home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The AGA Experience 2
/
agavol2.iso
/
software
/
utilities
/
comms
/
yam1.0
/
rexx
/
register.rexx
next >
Wrap
OS/2 REXX Batch file
|
1996-02-04
|
650b
|
14 lines
/* register.rexx */
OPTIONS RESULTS
ADDRESS YAM
SetFolder 3 /* Archiv-Postfach wählen */
GetFolderInfo MAX; eintraege = RESULT /* Anzahl Mails abfragen */
DO i=0 TO eintraege-1 /* Gehe alle Mails durch */
SetMail i /* Aktuelle Mail setzen */
GetMailInfo SUBJECT /* Betreff abfragen */
IF RESULT = 'YAM Registrierung' THEN DO /* Kriterium erfüllt? */
GetMailInfo FROM /* Absender Abfragen und */
SAY RESULT /* ausgeben */
END
END