Search results for query: *

So, my new solution works :) Shortened code for selected attachments loOutlook = CREATEOBJECT( "Outlook.Application" ) loSelected = loOutlook.ActiveInspector.AttachmentSelection FOR i = 1 TO loSelected.Count MESSAGEBOX( loSelected.Item(i).FileName ) * or...

Chris, interesting idea, I want to try it. But I would think that marked attachments for AttchmentSelection are also selected for drag & drop. Thomas

Tamar, with this example all attachments are read out and saved/displayed. (TextBox.OLEDragDrop) I don't know where I would have to use AttachmentSelection. Thomas * Create Outlook Application object oOutlook = CREATEOBJECT("Outlook.Application") oNamespace = oOutlook.GetNamespace("MAPI") *...

Tamar, I rejoiced a little too soon. With your code I get information on all the attachments contained in the mail, but not the currently selected. I have experimented a bit with AttachmentSelection but I can't get any further. Do you have another idea for me? Thomas

Vince, have you run a virus scanner and checked whether the dbf files have been quarantined? Thomas

Tamar, in found a little bug in your code: oObjColl = ThisForm.oOutlook.oExplorer.Selection must be oObjColl = ThisForm..oExplorer.Selection after that modification I got the attachement object and it´s SaveAsFile method. Many thanks you for help und greetings from Germany. Thomas

Tamar I know your example, but I don't see any code to create the file.

Yes, the file (pdf) should then be copied/created in VFP app to a specific directory.

Hi Foxis, I am familiar with drag & drop of files from explorer, but i need help with drag & drop of outlook attachments (pdf) Does anyone have an example code for this? Thomas

Hi Rune, I can reproduce the behavior, is that an alternative for you: GETDIR("","","") Thomas

Hello Tamar Hello Chris, thank you for your comments and again something learned. Thomas

Hello Chris, you are absolutely right, this only works with SET ENGINEBEHAVIOR 70. Regards Thomas

Hallo Klaus, das würde auch gehen: SELECT NAME, PRICE, MAX( PDATE ) AS MAX_PDATE FROM myTable GROUP BY NAME INTO CURSOR myCursor Grüße Thomas

That´s a good workaround to setup the report in development environment but not really for customers. Thomas

Mike, I´m using different fonts in same report like FontA11, FontA12, FontA22 which are using there own fontsizes. Thomas

Hi Mike, thank you for spending time to test my problem. I allow my customers to create a copy of the eport and design it indivdidual, so I can´t use escape sequences. One way is to hack the frx in background after editing the Report or the user must copy and paste given controls. Both are not...

Yes to all and it works fine for more than 10 years. There wasn´t any reason to change and I notice this only now. The internal Epson Printer Fonts are faster than all other. Thomas

Hi, how can I select internal Printer (EPSON TM-Txx) Fonts (FontA11) in Report Designer? It works fine in Windows XP while the Printer is selected as Default, but not in Windows 7. In MS-Word all the Fonts are visible and selectable. Thomas

Hi, try to user my function who use an API-call. FUNCTION GetUNCPath LPARAMETERS tcPath LOCAL lcBuffer, lnBufsize, lnError, lcReturn lcReturn = "" lnBufsize = 260 tcPath = LEFT( tcPath, 1 ) + ":" lcBuffer = REPLICATE( CHR(0), lnBufsize ) DECLARE INTEGER WNetGetConnection IN WIN32API STRING...

Hi, this is interesting but I don´t quit my Word-instance myself, the user do this after printing, previewing or something else. It looks like Word must do something before the flag ..NormalTemplate.. works correctly. BTW I try to do something ,set the flag and look what happened. thomas