Kiểm tra sự tồn tại của một file trên mạng nội bộ!

[luckylucke_2009]

[FONT=&quot]Các Bác cho tôi hỏi: Để kiểm tra 1 file chẳng hạn "ABC.doc" nằm trong ổ C như sau:
[/FONT]
'-------------------------------------------------
Sub timfile()
If (Dir("C:\ABC.doc") <> "") Then
MsgBox "Da tim thay file ABC.doc"
Else
MsgBox "Khong tim thay file ABC.doc"
End If
End Sub
'-------------------------------------------------

Nhưng khi kiểm tra sự tồn tại 1 file nằm ở 1 vị trí nào đó trong mạng nội bộ thì sử dụng hàm Dir... thì không được. Có cách nào để kiểm tra sự tồn tại của 1 file trên mạng nội bộ không?
Xin cám ơn!

 

[locphat6899]

cái này phải biết được IP của máy tính kia rồi điền theo VD:dir("\\10.10.88.119\D$\tên file") thì chắc là được.