Thank you so much Virginia - this worked perfectly!! :)
--- In vantage@yahoogroups.com, "Virginia Joseph" <vjoseph@...> wrote:
>
> I will preface this with the statement that I am not a programmer so I don't know if this will help you but one of our previous programmers added a button to the contacts sheet and when you click the button it launches a new message in outlook at puts the customer contact's email address in the To: box. Here is the code from the script editor. I do not know whether or not he had to set-up anything else besides the customization for this to work. We are on 8.03.408 so even if this does not work for you, you are not out of luck. It can be done in 8.03.xxx.
>
> Private Sub btnEpiCustom1_Click(ByVal Sender As Object, ByVal Args As System.EventArgs) Handles btnEpiCustom1.Click
> Dim edv As EpiDataView = CType(oTrans.EpiDataViews("Contact"), EpiDataView)
> Dim edvEmail As String = edv.dataview(edv.row)("EmailAddress")
> If Process.GetProcessesByName("OutLook").Length < 1 Then
> Process.Start("Outlook.exe", "mailto:" & CType(edvEmail,String))
> Else : Process.Start("mailto:" & CType(edvEmail,String))
> End If
> End Sub
>
> HTH,
> Virginia Joseph
> Deep Hole Specialists, LLC
> vjoseph@...
>
> --- In vantage@yahoogroups.com, "bw2868bond" <bwalker@> wrote:
> >
> > Only if you don't want to implement the linklabel idea that Jose gave us back on May 21st
> >
>