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


SendEvents.thor $VER: 1.0 (01.01.96)

Sends Thor Events and/or gets News without the use of ConnectThor. Checks for
the file Event.data. If the file is present, a requester pops up with 4 options:

    1. Do Both
    2. Send Events (Only)
    3. Get News    (Only)
    4. 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. If your News Server is busy, the script will keep trying for the number of
times set in the 'MaxTries' variable.

NOTES:

1. The script only checks for the existance of the file 'Event.data'. It makes
   no check as to the status of any event(s). This means that even if all your
   events have been DELETED or FROZEN, SendTCP will still be called. 

2. GetTCP uses the GETONLY parameter. Mail and News are 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.

3. If the file 'Event.data' does not exist, News is fetched automatically. No
   requester appears.

4. 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))

Any comments or bugs, please E-Mail me.


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

Original  Packed Ratio    Date     Time    Name
-------- ------- ----- --------- --------  -------------
    1920     999 47.9% 01-Jan-96 14:55:32  SendEvents.readme
    2120     925 56.3% 01-Jan-96 14:53:38  SendEvents.thor
-------- ------- ----- --------- --------
    4040    1924 52.3% 02-Jan-96 00:01:44   2 files