防止远程用户经由VPN打开数据库

Question

我有一个客户与MS-访问2016数据库拆分为前端（用自己的机器上自己的拷贝每个用户）和后端（服务器）。远程工作人员可以成功地使用数据库RDS。然而，一些用户正试图通过VPN的工作，这已经引起了他们的前端数据库损坏。

使用VBA有什么办法前端打开时，我能确定用户是否通过VPN来，然后给他们一个信息，并自动关闭前端数据库？

从来没有过解决这一之一，网上搜索也没有给我任何有用的东西为止。因此，如果任何人有这一点，将是非常赞赏的解决方案。

Answer 1

我觉得你在这里采取错误的做法。这应该在网络层面进行。后端Access数据库不应该在网络上访问和前端应该只是检查是否如映射的网络驱动器可以访问。

一个例子：

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