ðHgeocities.com/Heartland/Pond/4805/Module2.htmgeocities.com/Heartland/Pond/4805/Module2.htm.delayedxÏPÔJÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÈà–ðJ+OKtext/htmlp0iJ+ÿÿÿÿb‰.HSun, 20 Jan 2002 13:02:46 GMTWMozilla/4.5 (compatible; HTTrack 3.0x; Windows 98)en, *ÍPÔJJ+ ACC2000: How to Programmatically Save a Database as an MDE File

ACC2000: How to Programmatically Save a Database as an MDE File


The information in this article applies to:


Moderate: Requires basic macro, coding, and interoperability skills.

SUMMARY

This article shows you how to programmatically create an MDE file from an existing database.

 

You can use Microsoft Visual Basic for Applications to create an MDE file from your existing Microsoft Access database. You can run the following sample function from any database other than the database that you want to convert to an MDE file. This function has one argument, MyPath, the full path to the database from which to create the MDE file.

NOTE: You can use the SendKeys method to bypass the dialog box. Although this method allows you to programmatically save a database as an MDE file, it may cause an errant "ENTER" to be processed somewhere in one of your programs or open files, so use this method with caution.

Create a new module, and then type the following function:

Function GenerateMDEFile(MyPath As String)
 
   Dim NAcc As Access.Application
 
   Set NAcc = CreateObject("Access.Application")
 
   'The following lines simulate accepting the default
   'name, clicking Make MDE, and clicking Save
   SendKeys MyPath & "{Enter}{Enter}"
   SendKeys "{Enter}"
 
   NAcc.DoCmd.RunCommand acCmdMakeMDEFile
 
   Set NAcc = Nothing
 
End Function 

To run this function, do the following:

  1. Click Immediate Window on the View menu to open the Immediate window.

 

  1. Type ?GenerateMDEFile(<Path&DBName>), where <Path&DBName> is the full path and database name from which you want to create an MDE file. Press ENTER.

 

NOTE: The resulting MDE file will have the same name as the original database.