<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2800.1226" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial size=2>Lonnie:</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>Very similar to what I use but I'm trying to get 
away from using Outlook.  That's why I though of SendObject because it 
should trigger whatever the user's default mail client is.  I 
think.</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>Rocky</FONT></DIV>
<DIV> </DIV>
<BLOCKQUOTE 
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
  <DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
  <DIV 
  style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B> 
  <A title=prodevmg@yahoo.com href="mailto:prodevmg@yahoo.com">Lonnie 
  Johnson</A> </DIV>
  <DIV style="FONT: 10pt arial"><B>To:</B> <A title=accessd@databaseadvisors.com 
  href="mailto:accessd@databaseadvisors.com">Access Developers discussion and 
  problem solving</A> </DIV>
  <DIV style="FONT: 10pt arial"><B>Sent:</B> Wednesday, September 17, 2003 9:21 
  AM</DIV>
  <DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [AccessD] Attach Database 
  Using SendObject</DIV>
  <DIV><BR></DIV>
  <DIV>Here is some VBA that I use to send files from a network drive. Hope this 
  helps...</DIV>
  <DIV> </DIV>
  <DIV>    Dim appOutLook As 
  Outlook.Application<BR>        Dim 
  MailOutLook As Outlook.MailItem</DIV>
  <DIV>    Call SET_INACT_DATE_KS<BR>    
  <BR>        Set appOutLook = 
  CreateObject("Outlook.Application")<BR>        
  Set MailOutLook = appOutLook.CreateItem(olMailItem)</DIV>
  <DIV>        With 
  MailOutLook<BR>            
  .To = "email address here"</DIV>
  <DIV>            .BCC = 
  "email address here" </DIV>
  <DIV>            
  .Subject = "Email Subject in 
  Here"<BR>            
  .Body = "***** This is a system generated email. Do not reply to sender. 
  *****" _<BR>            
  & vbNewLine & vbNewLine 
  _<BR>            & 
  "Blah Blah 
  Blah"<BR>            
  .Attachments.Add "C:\MyFolderName\MyFile.mdb", olByValue, 1, "Attchment 
  Name"<BR>            
  .Send<BR>        End With</DIV>
  <DIV> </DIV>
  <DIV><BR>        <BR><BR><B><I>Rocky Smolin 
  - Beach Access Software <bchacc@san.rr.com></I></B> wrote:</DIV>
  <BLOCKQUOTE class=replbq 
  style="PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #1010ff 2px solid">
    <META content="MSHTML 6.00.2800.1226" name=GENERATOR>
    <STYLE></STYLE>

    <DIV><FONT face=Arial size=2>Dear List:</FONT></DIV>
    <DIV><FONT face=Arial size=2></FONT> </DIV>
    <DIV><FONT face=Arial size=2>Does anyone know if it is possible to attach a 
    database to an email using SendObject?  Right now I send it using the 
    Outlook object model but I don't want the user to be limited to using 
    Outlook for their mail client.</FONT></DIV>
    <DIV><FONT face=Arial size=2></FONT> </DIV>
    <DIV><FONT face=Arial size=2>MTIA,</FONT></DIV>
    <DIV><FONT face=Arial size=2></FONT> </DIV>
    <DIV><FONT face=Arial size=2>Rocky Smolin<BR>Beach Access 
    Software</FONT></DIV>
    <DIV> </DIV>_______________________________________________<BR>AccessD 
    mailing 
    list<BR>AccessD@databaseadvisors.com<BR>http://databaseadvisors.com/mailman/listinfo/accessd<BR>Website: 
    http://www.databaseadvisors.com<BR></BLOCKQUOTE><BR><BR>
  <DIV>
  <DIV>
  <P align=center><STRONG>Lonnie Johnson<BR></STRONG><STRONG>ProDev</STRONG>, 
  Professional Development of MS Access Databases<BR>Visit me at ==> <A 
  href="http://www.prodev.us/">http://www.prodev.us</A></P>
  <P><BR><A 
  href="http://www.galaxymall.com/software/PRODEV"><BR></A><BR> </P></DIV></DIV>
  <P>
  <HR SIZE=1>
  Do you Yahoo!?<BR><A 
  href="http://us.rd.yahoo.com/evt=10469/*http://sitebuilder.yahoo.com">Yahoo! 
  SiteBuilder</A> - Free, easy-to-use web site design software
  <P>
  <HR>

  <P></P>_______________________________________________<BR>AccessD mailing 
  list<BR>AccessD@databaseadvisors.com<BR>http://databaseadvisors.com/mailman/listinfo/accessd<BR>Website: 
  http://www.databaseadvisors.com<BR></BLOCKQUOTE></BODY></HTML>