e-mailadresses

Post Reply
jds
Posts: 122
Joined: Sat Dec 05, 2009 12:44 pm

e-mailadresses

Post by jds »

e-mail adresses
Can anyone tell me if it is possible to incorporate and use e-mailadresses from Xbase++ fields (with FWH) iand if yes how to do it?
User avatar
Detlef Hoefner
Posts: 312
Joined: Sat Oct 08, 2005 9:12 am
Location: Germany
Contact:

Re: e-mailadresses

Post by Detlef Hoefner »

Sorry, i can't help because i don't understand your question.

Please provide some more details about your problem.
What data do you have and what you want to do with them?

Regards,
Detlef
jds
Posts: 122
Joined: Sat Dec 05, 2009 12:44 pm

Re: e-mailadresses

Post by jds »

I want to put f.e. an emailadres in a field of an adres file and by clicking on the emailadres open the outlook program f.e.
User avatar
Antonio Linares
Site Admin
Posts: 42778
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Has thanked: 116 times
Been thanked: 110 times
Contact:

Re: e-mailadresses

Post by Antonio Linares »

jds,

This is an example:

Code: Select all | Expand

#include "FiveWin.ch"function Main()   local oDlg, oSay, oCursor   DEFINE CURSOR oCursor HAND   DEFINE DIALOG oDlg   @ 2, 2 SAY oSay PROMPT "test@gmail.com"   oSay:lWantClick = .T.   oSay:bLClicked  = { || ShellExecute( oDlg, "Open", "mailto:" + oSay:GetText(),,, 0 )   oSay:oCursor    = oCursor   ACTIVATE DIALOG oDlg CENTEREDreturn nil 
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
Posts: 42778
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Has thanked: 116 times
Been thanked: 110 times
Contact:

Re: e-mailadresses

Post by Antonio Linares »

In case that you want to use a GET:

Code: Select all | Expand

#include "FiveWin.ch"function Main()   local oDlg, oGet, oCursor, cEmail := "test@gmail.com      "   DEFINE CURSOR oCursor HAND   DEFINE DIALOG oDlg   @ 2, 2 GET oGet VAR cEmail   oGet:bLClicked  = { || ShellExecute( oDlg, "Open", "mailto:" + oGet:GetText(),,, 0 ) }   oGet:oCursor    = oCursor   ACTIVATE DIALOG oDlg CENTEREDreturn nil 
regards, saludos

Antonio Linares
www.fivetechsoft.com
jds
Posts: 122
Joined: Sat Dec 05, 2009 12:44 pm

Re: e-mailadresses

Post by jds »

Thank you Antonio ! But it is necessary to put "outlook.exe" between "open" and "mailto:"
Hasta luego !
User avatar
Antonio Linares
Site Admin
Posts: 42778
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Has thanked: 116 times
Been thanked: 110 times
Contact:

Re: e-mailadresses

Post by Antonio Linares »

Jds,

Thanks for your feedback :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
jds
Posts: 122
Joined: Sat Dec 05, 2009 12:44 pm

Re: e-mailadresses

Post by jds »

Sorry Antonio, it also works without referencing to outlook
josé
User avatar
Antonio Linares
Site Admin
Posts: 42778
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Has thanked: 116 times
Been thanked: 110 times
Contact:

Re: e-mailadresses

Post by Antonio Linares »

Jds,

Thanks again :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Post Reply