您应明确放弃网络驱动绘图的可能性:
- using this technique forces you to manipulate physically each computer using your db, where you have to assign a letter to the network drive.
- every computer user can easily change it
- any disconnection from the network might force the user to manually reconnect to the disk drive
尽管你处于一个领域,但我不建议你使用一个名字,因为出于多种原因,计算机不一定总是很容易在网络上找到,特别是在其IP经常发生变化的时候。
您无疑应当找到一种办法,把固定的知识产权安排到您的磁盘上:这是你可以想象的最稳定和最长久的解决办法。 • 贵域管理人为您作出安排。
然后可以非常容易地测试你的网络磁盘。 有许多解决办法,包括试图直接打开 m子。 你还可以测试档案的存在(通过文件反对我的想法),或甚至使用你可以从你的代码上推出的任何外部方案或窗口。 请奥古格尔·博克测试IP,或类似于在方便时找到解决办法。
EDIT:窗户甚至建议仿照某些VB代码。 查询here
EDIT2:我发现,我用我的一份手法,允许在你网络的某个地方(并且可以接触巴)立案时进行快速检查。 如果能够提供新的用户界面版本,则基本上将进行测试。
Function fileIsAvailable(x_nom As Variant) As Boolean
On Error GoTo ERREUR
Application.Screen.MousePointer = 11
Dim fso as object
Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FileExists(x_nom) Then
fileIsAvailable = False
Else
fileIsAvailable = True
End If
Set fso = Nothing
Application.Screen.MousePointer = 0
On Error GoTo 0
Exit Function
ERREUR:
Application.Screen.MousePointer = 0
debug.print Err.Number, Err.description
End Function
你们可以通过提供你的网络名称,如:
if fileIsAvailable("\192.168.1.110myFileName.mdb") then ...