John Ruff
papparuff at attbi.com
Fri Apr 25 16:59:16 CDT 2003
There is one way around the situation, but it's not good. You must open your default email account and change the User Name to that which you want your email recipients to see. I said it's really clunky and not a good solution, but it is a solution nevertheless. John V. Ruff - The Eternal Optimist :-) Always Looking For Contract Opportunities Home: 253.588.2139 Cell: 253.307/2947 9306 Farwest Dr SW Lakewood, WA 98498 "Commit to the Lord whatever you do, and your plans will succeed." Proverbs 16:3 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tortise at Paradise Sent: Friday, April 25, 2003 1:26 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Outlook Express and generating e-mails to sendspecifying the sender Thank you John and Mark I am using Access 97 and OE6. It is for legitimate (!) "from" email addresses that are used. It seems from your comments and following the leads I probably cannot do it. However here is my code if anyone can make any further suggestions, they'd be welcomed! Private Sub cmdCreateEmail_Click() Dim strAddress As String, strSubject As String, strBody As String, strProduct As String 'Dim strProduct As Long Dim strName As String, strLicense As String cmdMessages.SetFocus [E-Mail].SetFocus strAddress = [E-Mail].Text 'strSubject = "Break Reminder License" strSubject = " License" 'strProduct = "Break%20Reminder" [Combo38].SetFocus strProduct = [Combo38].Text [Customer].SetFocus strName = [Customer].Text [License].SetFocus strLicense = [License].Text If strAddress = "" Then MsgBox "Email address" Exit Sub End If If strName = "" Then MsgBox "Customer Name" Exit Sub End If If strLicense = "" Then MsgBox "License number" Exit Sub End If Dim oshell As Object Set oshell = CreateObject("Wscript.Shell") oshell.Run """mailto:" & strAddress & _ "?subject=" & strProduct & strSubject & _ "&Body=" & "Congratulations%20for%20purchasing%20your%20license%20for%20" & strProduct & ".%20%20Thank%20you%20indeed%20for%20your%20support.%0D%0A%0D%0A" & _ "Please%20consider%20telling%20your%20friends%20and%20colleagues%20about%20" & strProduct & ".%20%20The%20more%20support%20we%20receive%20the%20more%20we%20will%20devel op%20software%20for%20your%20benefit.%0D%0A%0D%0A" & _ "We%20would%20welcome%20any%20Feedback%20where%20you%20heard%20about%20" & strProduct & "%20and%20whether%20it%20could%20better%20meet%20your%20needs.%20%20Please%2 0mailto:support at cheqsoft.com?Subject=Feedback%0D%0A%0D%0 A" & _ "Please%20open%20" & strProduct & ",%20go%20into%20the%20Help%20menu,%20Enter%20License%20Key.%20%20Enter%20th e%20following%20data%20exactly:%0D%0A%0D%0A" & _ strName & "%0D%0A" & _ strLicense & "%0D%0A%0D%0A" & _ "This%20will%20unlock%20" & strProduct & "%20for%20your%20unlimited%20use.%0D%0A%0D%0A" & _ "This%20data%20is%20unique%20to%20you.%20%20%20Please%20do%20not%20pass%20it %20on.%0D%0A%0D%0A" & _ "If%20you%20have%20any%20problems%20-%20please%20contact%20us.%0D%0A%0D%0A" & _ "If%20you%20ever%20need%20to%20reinstall%20the%20program%20and%20your%20curr ent%20license%20no%20longer%20works%20please%20contact%2 0us%20for%20a%20renewal.%0D%0A%0D%0A" & _ "Please%20consider%20staying%20up%20to%20date%20by%20periodically%20download ing%20the%20latest%20version%20(free%20to%20you).%0D%0A% 0D%0A" & _ "Thank%20you%20again,%20we%20hope%20you%20find%20our%20software%20useful.%0D %0A%0D%0A%0D%0A%0D%0A" & _ "Kind%20Regards%0D%0ADavid%20Hingston%0D%0Amailto:support at cheqsoft.com?Subje ct=Feedback%0D%0AChequers%20Software%20Ltd%0D%0Ahttp://c heqsoft.com/%0D%0AHome%20of%20Break%20Reminder,%20Clipboard%20Express,%20MP3 %20Detective%20and%20TimesOwn%0D%0A%0D%0A""""" Exit Sub EH: End Sub Thank you again and Kind regards, David Hingston _________________________________________________________________________ mailto:tortoise at paradise.net.nz Personal Webpages: http://203.79.82.163/ Automated search engine manager: http://www.engines2go.com/ Home of Break Reminder, Clipboard Express, MP3 Detective and TimesOwn: http://www.cheqsoft.com/ ----- Original Message ----- From: "Mitsules, Mark" <mitsules_ms at nns.com> To: <accessd at databaseadvisors.com> Sent: Saturday, April 26, 2003 12:43 AM Subject: RE: [AccessD] Outlook Express and generating e-mails to send specifying the sender David, This is the summary from http://support.microsoft.com/?kbid=232309. SUMMARY You cannot directly change an item's From field using any programming methods in Microsoft Exchange or Outlook. If you could, mail could be sent on someone else's behalf without their permission, therefore the From field is read-only. You can use the SentOnBehalfOfName property to set the From field, provided that you were given delegate permissions to send mail on someone else's behalf. HTH, Mark -----Original Message----- From: Tortise at Paradise [mailto:tortise at paradise.net.nz] Sent: Friday, April 25, 2003 3:54 AM To: accessd at databaseadvisors.com Subject: [AccessD] Outlook Express and generating e-mails to send specifying the sender Hi All Can anyone tell me if I can specify the sender (when OE has many sending e-mail addresses set up) when I generate an e-mail in an access database? (Specifying who to, subject and body is relatively well documented etc but this?) With many thanks and.... Kind regards, David Hingston _________________________________________________________________________ mailto:tortoise at paradise.net.nz Personal Webpages: http://203.79.82.163/ Automated search engine manager: http://www.engines2go.com/ Home of Break Reminder, Clipboard Express, MP3 Detective and TimesOwn: http://www.cheqsoft.com/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com