vb定时判断另一台计算机指定文件夹下有无文件，若有则报警。
指定时间为每小时5、10.、15.。。。报警要一直持续，直到有人暂停报警。那位大侠写一下代码，最好把窗体也设计好，谢谢了！！...
指定时间为每小时 5、10.、15.。。。 报警要一直持续，直到有人暂停报警。那位大侠写一下代码，最好把窗体也设计好，谢谢了！！
展开
3个回答
展开全部
使用FileSystemObject对象
Dim fs As New FileSystemObject
Dim f As Folder
Set f = fs.GetFolder(Path) ‘path为要检查的目录，如果是另一台计算机的目录的话，要先共享该目录，使用该目录的共享路径。
If f.Files.Count > 0 Then
msgbox"有文件"
End If
以上代码生成一个Exe
在Window的排定工作加入该Exe的定时任务就OK。
Dim fs As New FileSystemObject
Dim f As Folder
Set f = fs.GetFolder(Path) ‘path为要检查的目录，如果是另一台计算机的目录的话，要先共享该目录，使用该目录的共享路径。
If f.Files.Count > 0 Then
msgbox"有文件"
End If
以上代码生成一个Exe
在Window的排定工作加入该Exe的定时任务就OK。
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
