Vba 防止远程用户通过VPN打开数据库

我有一个带有ms access 2016数据库的客户端，分为前端（每个用户在其机器上都有自己的副本）和后端（在服务器上）。远程工作人员可以通过RDS成功使用数据库。然而，一些用户试图通过VPN工作，这导致了他们前端数据库的损坏

使用VBA当前端打开时，我是否可以确定用户是否通过VPN来过，然后给他们一条消息并自动关闭前端数据库

---

以前从未解决过这个问题，到目前为止，在线搜索还没有给我任何有用的东西。因此，如果有人对此有解决方案，我们将不胜感激。

我认为您在这里采取了错误的方法。这应该在网络级别上完成。后端访问数据库不应在网络上访问，前端只应检查映射的网络驱动器是否可访问

例如：

Sub Testing_Mapped_Drive()
  If (Len(Dir("M:\"))) Then
     MsgBox "Mapped drive connected."
  Else
     MsgBox "Mapped drive not available!"
  End If
End Sub