FiveTech Software tech support forums

To all, Does someone know how to open a msg-file. I tried following but get compiling errors:     TRY    oOutlook := TOleAuto():New( "Outlook.Application" )    CATCH    Msginfo( "Outlook nicht installiert" )    quit    END        ...

Gracias por tu pronta respuesta, pero no hay alguna forma de hacerlo mas directo ? yo lo hago mas sencillo outlook 2007 local oOutlook := CreateObject( "Outlook.Application" ) local oMail local cMessage:="<b>Facturacion Electronica (c) </b>" cMessage += ...

... oFolder:Items(n):UnRead() oFolder:Items(n):UnRead(.f.) oFolder:Items(n):body TEST.PRG: #include "fivewin.ch" function Main() Local oOutLook := CreateObject("OutLook.Application") Local oNameSpace := oOutLook:GetNameSpace("MAPI") Local oFolder, n oNameSpace:Logon() ...

... item. I can't get the class property to work. Can someone please help me determine what kind if items they are? [code] function mytest() local oOutlook, oExp, oItem, nClass, tReceived oOutlook := TOleAuto():New( "Outlook.Application" ) oExp := oOutlook:ActiveExplorer oItem := myOlExp:Selection:Item(1) ...

Here is a sample with Outlook oOutLook := TOleAuto():New("Outlook.Application") * oMailItem := oOutLook:Invoke("CreateItem", 0) oMailitem:to:="slfpvsoa@skynet.be" && si plusieur separe ; oMailitem:CC:="ph.jacquet@skynet.be;test@test.be" ...

... bypassarlo. Questa la mia routine di invio: FUNCTION Interactivemessage() paramet cSubject, cBody, aTo, aFiles, lDirectSend,lUseCC,cOrigin LOCAL oOutLook,oMailItem,oRecip,oAttach,i,lOffice,lMailMancante,cVar local nSelected,oDlg1 if lUseCC=NIL lUseCC:=.f. endif if lDirectSend=NIL lDirectSend:=.f. ...

read a body of a message of outllok we can make : Local oOutlook := TOleAuto():New( "Outlook.Application" ) Local myOlExp := oOutlook:ActiveExplorer ... cBody := oMail:body But often we have the body with html text we can read it from cBody ...

Hi, anyone have a solution about this error? I have try: oOutLook := CreateObject("Outlook.Application") oNameSpace := oOutlook:GetNameSpace("MAPI") oMail := oOutLook:CreateItem(0) oMail:Subject := "test" oMail:Body := "test" ...

... to all, What other properties should I use to get the date and time? #DEFINE olFolderInBox 6 #include "fivewin.ch" FUNCTION MAIN() LOCAL oOutlook := TOleAuto():New( "Outlook.Application" ) LOCAL oNameSpace := oOutlook:getnamespace('MAPI') LOCAL oFolder := oNameSpace:GetDefaultFolder( ...

... into my application I saw the test of Maestro Otto and it run ok but I need some information and all variables of each messages I can save LOCAL oOutlook := TOleAuto():New( "Outlook.Application" ) for sample I cannot insert the variable oMail:From it make an error Error Outlook.Application:ACTIVEEXPLORER:SELECTION:ITEM/0 ...

Hi, I have to obtain Date and Time, but I have only the date...see below. Which property have I to use for time? Thanks LOCAL oOutlook := TOleAuto():New( "Outlook.Application" ) LOCAL oNameSpace := oOutlook:getnamespace('MAPI') LOCAL oFolder := oNameSpace:GetDefaultFolder( 5 ...

... DIALOG> <oWnd> ] ;   [ <help: HELP, HELPID> <nHelpId> ] ;   [ ON RIGHT CLICK <uRClicked> ] Try oOutLook:SetColor( nClrFore, nClrBack ) See Wiki http://wiki.fivetechsoft.com/doku.php?id=fivewin_class_toutlook http://wiki.fivetechsoft.com/doku.php?id=fivewin_commands_outlook ...

I try with : function dropread() local oDlg LOCAL oOutlook := TOleAuto():New( "Outlook.Application" ) local myOlExp := oOutlook:ActiveExplorer local oMail local oGet local cKategorie := space(50) local cStichwort := space(50) local oK := ...

... "FiveWin.ch" #include "Mail.ch" FUNCTION Interactivemessage() paramet cSubject, cBody, aTo, aFiles, lDirectSend,lUseCC LOCAL oOutLook,oMailItem,oRecip,oAttach,i,lOffice,lMailMancante,cVar local nSelected,oDlg1 if lUseCC=NIL lUseCC:=.f. endif if lDirectSend=NIL lDirectSend:=.f. ...

... that will receive the email can't see any other email when I send to multiple recipients. Is there a way to do this ? This is my current code: oOutLook := CreateObject( "Outlook.Application" ) oMailItem := oOutLook:CreateItem( 0 ) oRecip := oMailItem:Recipients oRecip:Add( "test@softwarexp.co.uk" ...