FiveTech Software tech support forums

it has as to below insert image in the sending of email in the example? #include "fivewin.ch" **************** FUNCTION SendMail ***************** LOCAL oOutLook,oMailItem,oRecip,oAttach oOutLook := TOleAuto():New("Outlook.Application") oMailItem := oOutLook:Invoke("CreateItem", 0) ...

Dear Kleyton, This is my sendmail procedure is working perfectly for me and it may help. *-----------------------------* Static Function SendMails(aRecNo) local mDlg, oGet[4], oBtn[2] local lSave := .F. local cAtt, cSub, cText local cHost, ...

... a utility installed to overide the security warning when necessary but to install this utility on all my users machines is not practical. FUNCTION SendMail() LOCAL oOutLook,; oMailItem,; oRecip,; oAttach /* creating the OLE object */ TRY oOutLook := CreateObject( "Outlook.Application" ) CATCH Alert( ...

Ruben,
If I purchase easypreview,could I intergrade zip,sendmail(hbzlib.dll,mail.dll,nconvert.exe ,epreview.exe,epreview.dbf ) into my app ( link a lib or dll file)? now there are too many files.

Regards!
Shuming Wang

... METHOD VistaCompleta() METHOD Visualizar INLINE ::oWord:Visible := .T. METHOD Write( cTexto, cFuente, cSize, lBold, lShadow, nColor ) METHOD Sendmail( lAttach ) // [ Vikthor ] METHOD HeaderFooter( nOption ) // [ Vikthor ] METHOD OpenDataSource( cFile ) // [ Vikthor ] METHOD AddField( cField ...

... to do with fwh version (i have 2.7 february 2006 and xharbour 0.99.60) but the bellow example is working perfectly #include "fivewin.ch" FUNCTION SendMail() LOCAL oOutLook,oMailItem,oRecip,oAttach oOutLook := CreateObject( "Outlook.Application" ) oMailItem := oOutLook:CreateItem( 0 ) oRecip := ...

... email start immediatly without the feature for the user to modify/integrate the email contents. Thanks in advance. Best Regards, Marco FUNCTION SendMail() LOCAL oOutLook,oMailItem,oRecip,oAttach oOutLook := CreateObject( "Outlook.Application" ) oMailItem := oOutLook:CreateItem( 0 ) oRecip := ...

... email start immediatly without the feature for the user to modify/integrate the email contents. Thanks in advance. Best Regards, Marco FUNCTION SendMail() LOCAL oOutLook,oMailItem,oRecip,oAttach oOutLook := CreateObject( "Outlook.Application" ) oMailItem := oOutLook:CreateItem( 0 ) oRecip := ...

... inviare la mail utilizzando MAPI in quanto Outlook Express per esempio non supporta i comandi OLE. Grazie in anticipo. Saluti Marco Turco FUNCTION SendMail() LOCAL oOutLook,oMailItem,oRecip,oAttach oOutLook := CreateObject( "Outlook.Application" ) oMailItem := oOutLook:CreateItem( 0 ) oRecip := ...

... function is inside win32ole.prg that is in rtl.lib .I work with xharbour and all is fine (if you use harbour try to change it to xharbour) . I use sendmail a long time now and works perfectly. Bellow is win32ole.prg that can be found at http://www.xharbour.org : /* * $Id: win32ole.prg,v 1.84 2005/06/01 ...

... ) and works great .Use Clickyes (Read this article http://www.contextmagic.com/express-clickyes/) software too if you like the below code function SendMail(cText,ato,cSubject,afiles,bodyformat,mailfrom) local oMail,i:=0,oItem default bodyformat:=1 oMail:= CREATEOBJECT( "outlook.application" ) oItem:=oMail:createitem(0) ...

... winexec("rundll32.exe url.dll,FileProtocolHandler mailto:"+cString) This one doesn't work winexec("Sendmail INVISIBLE SILENT SEND_TO "+; alltrim(customer->email)+" MESSAGE_FILE cMessage.txt "+; "SUBJECT "+cSubject) Any help would be appreciated! ...

... winexec("rundll32.exe url.dll,FileProtocolHandler mailto:"+cString) This one doesn't work winexec("Sendmail INVISIBLE SILENT SEND_TO "+; alltrim(customer->email)+" MESSAGE_FILE cMessage.txt "+; "SUBJECT "+cSubject) Any help would be appreciated! ...

... TSmtp():New( cIP := GetHostByName( "smtp.ulg.ac.be" ) ) MsgWait("Mailing ", cIP,1 ) oOutMail:bDone = { || MsgWait("Done","Mailing ",1 ) } oOutMail:SendMail( "jacquet@tiscali.be",; // From { "jacquetlg@tiscali.be" },; // To "Test mail " ,; // Msg Text "Essai Mail depuis BMT " , ; // Subject {"c:\dmedi\test.doc"} ...

Toni, Envias algún documento adjunto ? He probado de las dos formas. Te adjunto el código: function SendMail() local oOutMail, cIP oWnd:SetMsg( "Sending Internet email..." ) WSAStartup() oOutMail := TSmtp():New( "smtp.midominio.com" ) oOutMail:bConnecting = {||oWnd:SetMsg( ...