Page 1 of 1
e-mailadresses
Posted: Sun Feb 07, 2010 9:25 am
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?
Re: e-mailadresses
Posted: Mon Feb 08, 2010 9:47 am
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
Re: e-mailadresses
Posted: Tue Feb 09, 2010 7:50 pm
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.
Re: e-mailadresses
Posted: Tue Feb 09, 2010 8:31 pm
by Antonio Linares
jds,
This is an example:
Code: Select all
#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 CENTERED
return nil
Re: e-mailadresses
Posted: Tue Feb 09, 2010 8:34 pm
by Antonio Linares
In case that you want to use a GET:
Code: Select all
#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 CENTERED
return nil
Re: e-mailadresses
Posted: Mon Feb 15, 2010 4:23 pm
by jds
Thank you Antonio ! But it is necessary to put "outlook.exe" between "open" and "mailto:"
Hasta luego !
Re: e-mailadresses
Posted: Tue Feb 16, 2010 9:47 am
by Antonio Linares
Jds,
Thanks for your feedback
Re: e-mailadresses
Posted: Thu Mar 04, 2010 7:00 pm
by jds
Sorry Antonio, it also works without referencing to outlook
josé
Re: e-mailadresses
Posted: Fri Mar 05, 2010 5:44 pm
by Antonio Linares
Jds,
Thanks again