老师好。有共享文件,希望模糊查找并打开文件。下面代码有误,但不知道错在哪里,请您帮忙。谢谢!!
For Each dir As String In FileSys.GetDirectories("\\192.168.1.31\")
For Each dir1 As String In FileSys.GetDirectories(dir)
For Each dir2 As String In FileSys.GetDirectories(dir1)
If FileSys.FileExists("\\192.168.1.31\" & dir1 & dir2 & "\*" & fil & "*.doc") Then
Dim Proc As New Process '定义一个新的Process
Proc.File = ("\\192.168.1.31\" & dir1 & dir2 & "\*" & fil & "*.doc")
Proc.Start()
Exit For
End If
Next
Next
Next