General |
6.44 Convertire da codice un file MDB in MDE. |
AntoGal |
Public Function CreaMDE(strMDBFile As String, strMDEFile As String) As Boolean 'Autore: AntoGal 'Converte da codice un file MDB in MDE 'Esempio: CreaMDE("C:\MyDatabase.mdb", "C:\MyDatabase.mde") 'Restituisce: True se non si verificano errori On Error GoTo mde_err SysCmd 603, strMDBFile, strMDEFile CreaMDE = True Exit Function mde_err: MsgBox Err.Description Exit Function End Function |