Kev-

You can certainly send any message you like to any recipient from VB code in
Access.  It should be simple to examine your training retest records (maybe
each time your application starts?) and send email notices.  Below is a
sample function (from Building Access Applications) that you can call to
send in HTML format.  If you want to send plain text, replace
objMail.HTMLBody = strHTML with objMail.Body = ...

John Viescas, author
"Building Microsoft Access Applications"
"Microsoft Office Access 2003 Inside Out"
"Running Microsoft Access 2000"
"SQL Queries for Mere Mortals"
http://www.viescas.com/

Public Function SendOutlookMsg(strSubject As String, strTo As String, _
    strHTML As String, Optional intUseBCC As Integer = 0) As Integer
' Function to send an email message using Outlook
' Inputs: Subject of the message
'         List of valid "To" email addresses
'         HTML for the body of the message
'         Send using BCC flag (optional)
' Output: True if successful
' Note: This demo version only formats and displays a new
'       message.  Use ObjMail.Send instead of .Display
'       to actually send the message

Dim objOL As Object, objMail As Object

    ' Set an error trap
    On Error GoTo SendOutlookMsg_Err
    
    ' Get a pointer to Outlook - late binding
    Set objOL = CreateObject("Outlook.Application")
    ' Create a new email
    Set objMail = objOL.CreateItem(olMailItem)
    ' Set the subject
    objMail.Subject = strSubject
    ' Set To or BCC
    If intUseBCC = True Then
        objMail.BCC = strTo
    Else
        objMail.To = strTo
    End If
    ' Insert the HTML of the message
    objMail.HTMLBody = strHTML
    ' Display it
    objMail.Display
    ' Done - clear objects
    Set objMail = Nothing
    Set objOL = Nothing
    ' Return true
    SendOutlookMsg = True

SendOutlookMsg_Exit:
    Exit Function
    
SendOutlookMsg_Err:
    ' Log the error
    MsgBox "Mail send error: " & Error & ", " & Err
    ' Bail
    Resume SendOutlookMsg_Exit
    
End Function
> -----Original Message-----
> From: [email protected] 
> [mailto:[EMAIL PROTECTED] On Behalf Of Kevin M
> Sent: Friday, July 29, 2005 9:58 AM
> To: [email protected]
> Subject: [ms_access] Notification Through Outlook
> 
> 
> I track traning retest dates in Access.
> 
> Is there a way to link retest by dates to Outlook so I can get an e-
> mail notification of when an employee's retest is due?
> 
> Thanks
> kevlar
> 
> 
> 
> 
> ------------------------ Yahoo! Groups Sponsor 
> --------------------~--> 
> <font face=arial size=-1><a 
> href="http://us.ard.yahoo.com/SIG=12h9q6qc1/M=362131.6882499.7
> 825260.1510227/D=groups/S=1705115370:TM/Y=YAHOO/EXP=1122656318
> /A=2889191/R=0/SIG=10r90krvo/*http://www.thebeehive.org
> ">Get Bzzzy! (real tools to help you find a job) Welcome to 
> the Sweet Life - brought to you by One Economy</a>.</font>
> --------------------------------------------------------------
> ------~-> 
> 
>  
> Yahoo! Groups Links
> 
> 
> 
>  
> 



------------------------ Yahoo! Groups Sponsor --------------------~--> 
<font face=arial size=-1><a 
href="http://us.ard.yahoo.com/SIG=12h4asmvb/M=362131.6882499.7825260.1510227/D=groups/S=1705115370:TM/Y=YAHOO/EXP=1122656827/A=2889191/R=0/SIG=10r90krvo/*http://www.thebeehive.org
">Get Bzzzy! (real tools to help you find a job) Welcome to the Sweet Life 
- brought to you by One Economy</a>.</font>
--------------------------------------------------------------------~-> 

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/ms_access/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 


Reply via email to