代碼將Access數(shù)據(jù)庫(kù)mdb文件生成mde的通用函數(shù)

代碼將Access數(shù)據(jù)庫(kù)mdb文件生成mde的通用函數(shù)

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

但有否使用代碼的方式來(lái)自動(dòng)實(shí)現(xiàn)這個(gè)功能，我們的Access通用開(kāi)發(fā)平臺(tái)就實(shí)現(xiàn)了自動(dòng)發(fā)布，其主要的核心功能就是用代碼自動(dòng)編繹并生成mde文件。下面是tanhong版主提供的函數(shù)：

***********************************************
'函數(shù)功能：MDB轉(zhuǎn)MDE自定義函數(shù)
'函數(shù)變量：DestinationFile字符串變量,目的文件
'         SourceFile字符串變量,源文件
'         AccApp應(yīng)用程序?qū)ο笞兞?'應(yīng)用實(shí)例：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