ArgoExtn by Norfield Data Products, Inc.

• Description
• Purchase
• Requirements
• Screenshot
• Code Example

Description

What is ArgoExtn?  It is a Server Extension "gateway" that will allow you to write your own extensions for the Argosoft Mail Server.

Are you a programmer that can write an .EXE program and want to develop your own custom extension(s)?  Now with ArgoExtn any .EXE program you create can work with the Argosoft Mail Server.  ArgoExtn is a .DLL that is called by Argosoft (through Server Extensions) to pass information to your .EXE program.

Simple to set up and use!

• Just copy the ArgoExtn.Dll to a location of your choice.
• Set up Argosoft Mail Server to use the ArgoExtn Server Extension.
• Set up the ArgoExtn Server Extension (just two parameters: The path to the .EXE file and the TIMEOUT in seconds to wait for the .EXE program to finish processing).

ArgoExtn is a "gateway" that takes the From, To and Filename (separated with Tabs) of a received email and shells out to your .EXE program passing the data in the command line.  Your .EXE program simply sets the Exit Code to 0 (allow this email), 1 (delete the email and give no response to the sender) or 2 (delete and give a response to the sender).  If your .EXE program does not respond within the timeout period then ArgoExtn will automatically send back 0 (allow this email).  That's it! 

Now you can write your own software to create log files, filter, archive, and much more!

Purchase

ArgoExtn is only $39.99!  (Connecticut residents please add 6% sales tax) Email delivery only!

To get your copy of ArgoExtn click the buy button below.  Once payment is received you will be sent the software via email.

System Requirments

A currently installed ArgoSoft Mail Server, version v1.8.3.5 or later.

Sub Main()
'Set default exit code to allow this message (0=allow, 1=delete, 2=delete and give response)
System.Environment.ExitCode = 0

'Get path to use
Dim path As String = Environment.CurrentDirectory & "\"

'Parse command string
Dim cmd As String = system.Environment.CommandLine 

'Strip leading and ending quotes
If cmd.StartsWith(Chr(34)) Then
    cmd = cmd.Substring(1)
End If
If cmd.EndsWith(Chr(34)) Then
    cmd = cmd.Substring(0, Len(cmd) - 1)
End If

'Break into parts (From <tab> ToAddr <tab> Filename
Dim words() As String
words = cmd.Split(vbTab)

'Make sure we have three parameters
If words.Length <> 3 Then Exit Sub

'Save command parameters as program friendly names
Dim FromAddr As String = words(0).Trim.ToLower
Dim ToAddr As String = words(1).Trim.ToLower.Replace(" ,", ",")
Dim FileName As String = words(2).Trim

'Do your processing here
.
.(Set ExitCode to 0, 1, or 2 based on what you want to tell ArgoSoft to do)
.Optionally delete the input file after processing or move to new location)
.

'Exit the sub
Exit Sub