dbTalk Databases Forums  

embedding a link

comp.databases.ms-access comp.databases.ms-access


Discuss embedding a link in the comp.databases.ms-access forum.



Reply
 
Thread Tools Display Modes
  #1  
Old   
bobh
 
Posts: n/a

Default embedding a link - 10-05-2011 , 09:58 AM






Hi All,

In AccessXP I'm trying to add a link to the message body of an email
using cdo and it would appear to work except when the link has spaces
in it. The email client is Outlook

so this is a example if I used this sample cdo

Set msgOne = CreateObject("CDO.Message")
Set msgOne.Configuration = cdoConfig
msgOne.To = "You (AT) yourdomain (DOT) com"
msgOne.From = "Me (AT) mydomain (DOT) com"
msgOne.Subject = "Test"
msgOne.TextBody = "It work just fine"
msgOne.Send

would work fine but,
if the textbody contain a link as in
msgOne.TextBody = "\\ServerName\SharedFolders\MyTeam Common Folder\Ops
Resources.xls"

when the reciever opens the email in Outlook only up to \ServerName
\Shared\MyTeam is in blue and underlined as the link

how do I get the link to stay as the full link on the reciever side?
thanks
bobh.

Reply With Quote
  #2  
Old   
bobh
 
Posts: n/a

Default Re: embedding a link - 10-05-2011 , 12:12 PM






On Oct 5, 10:58*am, bobh <vulca... (AT) yahoo (DOT) com> wrote:
Quote:
Hi All,

In AccessXP I'm trying to add a link to the message body of an email
using cdo and it would appear to work except when the link has spaces
in it. The email client is Outlook

so this is a example if I used this sample cdo

Set msgOne = CreateObject("CDO.Message")
Set msgOne.Configuration = cdoConfig
msgOne.To = "Y... (AT) yourdomain (DOT) com"
msgOne.From = "M... (AT) mydomain (DOT) com"
msgOne.Subject = "Test"
msgOne.TextBody = "It work just fine"
msgOne.Send

would work fine but,
if the textbody contain a link as in
msgOne.TextBody = "\\ServerName\SharedFolders\MyTeam Common Folder\Ops
Resources.xls"

when the reciever opens the email in Outlook only up to \ServerName
\Shared\MyTeam is in blue and underlined as the link

how do I get the link to stay as the full link on the reciever side?
thanks
bobh.
is there a HTMLBody that I could replace TextBody with???

bobh.

Reply With Quote
  #3  
Old   
bobh
 
Posts: n/a

Default Re: embedding a link - 10-07-2011 , 01:44 PM



On Oct 5, 10:58*am, bobh <vulca... (AT) yahoo (DOT) com> wrote:
Quote:
Hi All,

In AccessXP I'm trying to add a link to the message body of an email
using cdo and it would appear to work except when the link has spaces
in it. The email client is Outlook

so this is a example if I used this sample cdo

Set msgOne = CreateObject("CDO.Message")
Set msgOne.Configuration = cdoConfig
msgOne.To = "Y... (AT) yourdomain (DOT) com"
msgOne.From = "M... (AT) mydomain (DOT) com"
msgOne.Subject = "Test"
msgOne.TextBody = "It work just fine"
msgOne.Send

would work fine but,
if the textbody contain a link as in
msgOne.TextBody = "\\ServerName\SharedFolders\MyTeam Common Folder\Ops
Resources.xls"

when the reciever opens the email in Outlook only up to \ServerName
\Shared\MyTeam is in blue and underlined as the link

how do I get the link to stay as the full link on the reciever side?
thanks
bobh.
anybody know of any vba code that will take plain text and put the
basic html tags around it???
bobh.

Reply With Quote
  #4  
Old   
Tony Toews
 
Posts: n/a

Default Re: embedding a link - 10-07-2011 , 03:07 PM



On Wed, 5 Oct 2011 07:58:11 -0700 (PDT), bobh <vulcaned (AT) yahoo (DOT) com>
wrote:

Quote:
In AccessXP I'm trying to add a link to the message body of an email
using cdo and it would appear to work except when the link has spaces
in it. The email client is Outlook
Try putting %20 instead of spaces in the URL.

Tony
--
Tony Toews, Microsoft Access MVP
Tony's Main MS Access pages - http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog - http://msmvps.com/blogs/access/
For a convenient utility to keep your users FEs and other files
updated see http://www.autofeupdater.com/

Reply With Quote
  #5  
Old   
Tony Toews
 
Posts: n/a

Default Re: embedding a link - 10-09-2011 , 12:30 AM



On Fri, 7 Oct 2011 11:44:58 -0700 (PDT), bobh <vulcaned (AT) yahoo (DOT) com>
wrote:

Quote:
anybody know of any vba code that will take plain text and put the
basic html tags around it???
Make up an email with the appropriate formatting and send it to
yourself. Then switch from HTML view to raw view or source view or
whatever Outlook calls it. Then cut and paste that HTML code into
your VBA code and manipulate as relevant.

Tony
--
Tony Toews, Microsoft Access MVP
Tony's Main MS Access pages - http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog - http://msmvps.com/blogs/access/
For a convenient utility to keep your users FEs and other files
updated see http://www.autofeupdater.com/

Reply With Quote
  #6  
Old   
bobh
 
Posts: n/a

Default Re: embedding a link - 10-11-2011 , 03:15 PM



On Oct 9, 1:30*am, Tony Toews <tto... (AT) telusplanet (DOT) net> wrote:
Quote:
On Fri, 7 Oct 2011 11:44:58 -0700 (PDT), bobh <vulca... (AT) yahoo (DOT) com
wrote:

anybody know of any vba code that will take plain text and put the
basic html tags around it???

Make up an email with the appropriate formatting and send it to
yourself. * Then switch from HTML view to raw view or source view or
whatever Outlook calls it. *Then cut and paste that HTML code into
your VBA code and manipulate as relevant.

Tony
--
Tony Toews, Microsoft Access MVP
Tony's Main MS Access pages -http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog -http://msmvps.com/blogs/access/
For a convenient utility to keep your users FEs and other files
* updated seehttp://www.autofeupdater.com/
Thanks for the suggestion, I was thinking of looking at that but I
could not find in Outlook a 'raw' or 'source' view of an email..... :
(
bobh.

Reply With Quote
Reply




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off



Powered by vBulletin Version 3.5.3
Copyright ©2000 - 2012, Jelsoft Enterprises Ltd.