[BCX] Blat Return Codes

[Doyle Whisenant]

Brother Gabriel-Marie wrote:
> Hello all!
> Here am I, working with the Blat.dll to send an email from my 
> application.  It works very well.  I am writing in to see if anyone has 
> a snippet or insight into getting a return code from the Blat.dll so I 
> may confirm whether it was successful.  I am not looking for a debug; I 
> am looking for a return code so I can use it to notify the user of any 
> errors. 
>
>   

See: http://www.geocities.com/toby_korn/blat/blat_return_codes.htm

> Below is a Perl code which does this (it came from the Blat Yahoo Groups 
> forum); perhaps someone could translate it to BCX for me? I still don't 
> understand how to use pointers...
> Thanks, y'all!
> - Brother Gabriel-Marie
>
>   

VB Declare Statement:

Declare Function SendBlat Lib "blat.dll" Alias "Send" (ByVal sCmd As String) As Integer


Note the " As Integer" at the end of the Declare statement above. This 
means the call returns an integer code. So...

Dim errCode AS INTEGER

errCode = Send(command$)....
IF errCode <> 0 THEN msgbox "Darn, we have an error!"
...

Sorry, I don't do Perl...yet.
Doyle