I use an Active X component from quicksoft Ez-Mail (www,quicksoft.com)
The mail is sent to the standard GroupWise email address (henningf in my case) to the 
IP address of out GroupWise SMTP Server.
It looks to GroupWise as an external mail from the internet.
The mail is then handled thru GroupWise. I.E. it goes to the correct server at any of 
our sites.

the mail looks like this
                SendMail "157.196.123.12", "[EMAIL PROTECTED]", Text3.Text, 
Text2.Text, Text4.Text


Ez-Mail looks like this
Private Sub SendMail(strServer$, strFrom$, strTo$, strSubject$, strBodyText$)    ', 
strAttachmentPath$)
    
    Dim x%
    Dim Status%
    Dim SMTP As Object
    
    Set SMTP = CreateObject("EasyMail.SMTP.6")
    SMTP.LicenseKey = "Alexian Brothers Medical Center (Single 
Developer)/00123456789..."
    SMTP.mailserver = strServer$
    SMTP.fromaddr = strFrom$
    SMTP.addrecipient "", strTo$, 1
    SMTP.subject = strSubject$
    SMTP.bodytext = strBodyText$

  etc.


Fred Henning
Sr. Technology Analyst
Alexian Brothers Medical Center
800 Biesterfield Rd.
Elk Grove, IL 60007
[EMAIL PROTECTED]
Desk: 847.981.3667
Fax:  847.956.5435

Confidentiality Notice: This e-mail message, including any attachments, is for the 
sole use of the intended recipient (s) and may contain confidential and privileged 
information. Any unauthorized review, use, disclosure or distribution is prohibited. 
If you are not the intended recipient, please contact the sender by reply e-mail and 
destroy all copies of the original message.

>>> [EMAIL PROTECTED] 04/23/04 07:09AM >>>
Greetings all!
Curious if anyone out there has written any VB to send an email via
Groupwise. This would be a great addition to our script library. Please
post to the list!
 
Regards and happy scripting,
Thom
 
Thom C. Blackwell
Product Manager 
Boston Software Systems
www.bostonworkstation.com 
Booth 415, MUSE International
Miami Beach - May 18 - 21
 

Reply via email to