office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

代碼將Access數據庫mdb文件生成mde的通用函數

2017-08-22 10:06:00
tanhong
原創
6637

代碼將Access數據庫mdb文件生成mde的通用函數

正常將accdb生成accde, 將mdb生成mde, 需要手工另存,生成爲 accde或mde格式

但有否使用代碼的方式來自動實現這箇功能,我們的Access通用開髮平颱就實現瞭自動髮佈,其主要的核心功能就是用代碼自動編繹併生成mde文件。下麵是tanhong版主提供的函數:


***********************************************
'函數功能:MDB轉MDE自定義函數
'函數變量:DestinationFile字符串變量,目的文件
'         SourceFile字符串變量,源文件
'         AccApp應用程序對象變量
'應用實例:MakeMDE "C:\a.mdb", "C:\b.mde"

'***********************************************
Public Function MakeMDE(SourceFile As String, _
                        DestinationFile As String, _
                        Optional AccApp As Application) As Boolean

    Set AccApp = New Access.Application
        AccApp.SysCmd 603, SourceFile, DestinationFile
    Set AccApp = Nothing
End Function



Access示例源碼下載: mdb生成mde

分享