DOCUMENT:Q269170 13-JUN-2002 [foxpro] TITLE :PRB: Set of DEFAULT Changed After MAPI.SESSION Logon PRODUCT :Microsoft FoxPro PROD/VER::5.0,5.0a,6.0 OPER/SYS: KEYWORDS:kbCtrl kbMAPI kbvfp500 kbvfp500a kbvfp600 kbGrpDSFox kbDSupport kbCodeSnippet ====================================================================== ------------------------------------------------------------------------------- The information in this article applies to: - Microsoft Visual FoxPro for Windows, versions 5.0, 5.0a, 6.0 ------------------------------------------------------------------------------- SYMPTOMS ======== Programmers often maintain a default directory in Microsoft Visual FoxPro applications. They use this directory for the creation of temporary tables, work files, and so forth. However, if a Microsoft Visual FoxPro application also makes use of MAPI functions to send or receive mail, the default directory may change without warning. RESOLUTION ========== In order to maintain the default directory and still use MAPI functionality, store the current directory to a variable and switch back to it after you are finished with the MAPI process with the following code: LOCAL loMAPISession, lcCurDir lcCurDir = SYS(5) + SYS(2003) *!* Create a MAPI Session object, logon then logoff loMAPISession = CREATEOBJECT("MAPI.Session") loMAPISession.Logon() *!* Perform mail functions here. loMAPISession.LogOff() CD (lcCurDir) RELEASE loMAPISession, lcCurDir MORE INFORMATION ================ Steps to Reproduce Behavior --------------------------- To demonstrate this behavior, save the following code to a new program file on a computer with Microsoft Visual FoxPro version 5.0 or higher and Microsoft Outlook. When it is run, the program will first Change Directory (using the CD command) to the directory in which the program file is located. It then prints the current directory to the screen. The program creates a MAPI.SESSION object, logs in, and then logs out. Finally, the current directory is printed once more: notice that it has changed. NOTE: This problem also occurs when you choose SEND from the File menu on the main Microsoft Visual FoxPro menu. To demonstrate this, comment the first line in the following code and run it. Close the Compose Mail screen when it appears, and note that the current directory has changed. #DEFINE InCode CD JUSTPATH(SYS(16)) CLEA ? "Current Directory Before Message: " CD #IFDEF InCode LOCAL loMAPISession *!* Create a MAPI Session object, logon then logoff loMAPISession = CREATEOBJECT("MAPI.Session") loMAPISession.Logon() loMAPISession.LogOff() RELEASE loMAPISession ? "" ? "Current Directory After MAPI Logon: " CD #ELSE *!* Call the compose mail window via File>Send KEYBOARD '{ALT+F}' KEYBOARD '{D}' DOEVENTS ? "" ? "Current Directory After MAPI Logon: " CD #ENDIF REFERENCES ========== For additional information, click the article numbers below to view the articles in the Microsoft Knowledge Base: Q244343 PRB: Microsoft MAPI Control Changes the Current Working Director Q299843 Using The Send Menu Changes The Current Directory Additional query words: ====================================================================== Keywords : kbCtrl kbMAPI kbvfp500 kbvfp500a kbvfp600 kbGrpDSFox kbDSupport kbCodeSnippet Technology : kbVFPsearch kbAudDeveloper kbVFP500 kbVFP600 kbVFP500a Version : :5.0,5.0a,6.0 Issue type : kbprb Solution Type : kbnofix ============================================================================= THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY. Copyright Microsoft Corporation 2002.