Aprire database access solo con Runtime

Question

Buonasera

Vorrei che il Db che dovrò installare su altri 2/3 pc si apra soltanto in modalità Runtime (.accdr)

Per farlo volevo fare una mcrAutoExec con questo codice:

Public Sub SempreRunTime()

If Application.SysCmd(acSysCmdRuntime, 6) = True Then

RunCommand acCmdOpenDatabase

Else

DoCmd.Quit acQuitSaveNone

End If

End Sub

Il problema che ho sempre come risposta "Errore 2439" e dopo la macro mi da un Errore N° 2950

Sicuramente ho degli orrori nel codice, ma ho provato di tutto e niente

Ringrazio in anticipo il vs. gentile e sempre utilissimo aiuto

Saluti

Answer 1

Ciao LuisTorres69,

puoi fare così:

'Se non è versione Runtime chiudo Access.

If Application.SysCmd(acSysCmdRuntime) = False Then

Application.Quit

End If

Ciao

Giorgio Rancati

Answer 2

Funziona perfetto! Grazie