Short:    Send Thor Events/Get News (with retry)
Author:   roy@ebrown.demon.co.uk (Roy Brown)
Uploader: roy@ebrown.demon.co.uk (Roy Brown)
Type:     comm/mail
Replaces: SendEvents.lha


Sends Thor Events and/or gets News and Mail without the use of ConnectThor. The
script now supports POP3 and SMTP mail systems (user definable).It checks for
any active Thor events and if any are found then a requester pops offering
several choices;

     POP3                   SMTP

  1. Do All             1. Send Events
  2. Send Events        2. Get News
  3. Get Mail           3. Do Both
  4. Get News           4. Cancel
  5. Get Both
  6  Cancel

It's fairly self-explainatory as to what each option does.

The script calls SendTCP to send events (naturally) and GetTCP to fetch the
News (both systems) and Mail (POP3 only). If your Mail/News Server is busy, the
script will keep trying for the number of times set in the 'MaxTries' variable.

If there are no events waiting then a requester will pop up allowing you to
collect news (both systems) and/or mail (POP3 only).

NOTES:

1. GetTCP uses the GETONLY parameter. News is not parsed into the database once
   fetched. This allows you to go off-line before parsing into the database.
   (Use GetTCP PARSEONLY to parse News and PARSEUUCP to parse your mail - see
   Thor docs). This works for me using a SMTP system. POP3 mail is parsed by
   GetTCP (I think).

2. Thor does not need to be running to use this script. I use it from a button
   (in DOpus 5) from the Workbench. It would not be too difficult to incorporate
   it into the Link script.

5. This script requires the following (not included in archive):

   Kickstart 2.04 or higher
   rexxreqtools.library
   reqtools.library    }    These two are used by rexxreqtools.library
   rexxsyslib.library  }     
   SendTCP and GetTCP       These are part of the Thor package
                            (Aminet/comm/mail/thor222_#?.lha (3 files))

History

V1.1   More or less a complete re-write. Following a suggestion from the Thor
       Team (thanks Petter), the script handles the search for events much
       better. It will now tell you if there are any active events waiting.

       It now supports both SMTP and POP3 mail systems. Set the correct system
       in the variable (Mailtype) near the top of the script.

V1.01  Added new variable (CmdPath) to set the path to SendTCP and GetTCP

       Added a new requester that pops up if no events are waiting.
        .
       Neglected to point out in note 5 (above) that you also need the
       the following libraries which are part of the Thor package (sorry)

           bbsread.library                       Thor is
           utgui.library       Copyright (C) 1993-1995 Ultima Thule Software,
           utnet.library                   All Rights Reserved.
                                      (And is an excellent program)

       But then if you have Thor Events waiting, these should be no trouble. :))
       If you haven't got Thor installed - why not!!

       You also need to have AREXX operational.

V1.0    First public release (a bit premature)

This script is Freeware - do with it as you see fit.

Any comments or bugs, please E-Mail me.


============================= Archive contents =============================

Original  Packed Ratio    Date     Time    Name
-------- ------- ----- --------- --------  -------------
    3231    1519 52.9% 06-Jan-96 23:04:26  SendEvents.readme
    5017    1494 70.2% 06-Jan-96 23:06:34  SendEvents.thor
-------- ------- ----- --------- --------
    8248    3013 63.4% 08-Jan-96 12:47:22   2 files