Foxtable(狐表)用户栏目专家坐堂 → 文件监视器的问题


  共有9287人关注过本帖树形打印复制链接

主题:文件监视器的问题

帅哥哟,离线,有人找我吗?
小猪鑫鑫
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:832 积分:5867 威望:0 精华:6 注册:2011/5/27 11:41:00
文件监视器的问题  发帖心情 Post By:2012/8/27 11:10:00 [显示全部帖子]

狐爸及各位朋友:大家好!我现在的考勤系统已基本做完,我想把从打卡器中的数据导入的工作交给系统自动去完成,想法是当打卡器的文本文件中有数据变化时,系统能自动执行我设计的一个"数据分析"的键,但我要运行中实现不了,在此请教各位老师了

首先我在文件监视器中输入了下面的内容,但保存时,系统提示找不到文件,不知为何

 


此主题相关图片如下:clip_image003.jpg
按此在新窗口浏览图片

 

 

\\Gdtfc\D\Program Files\Eastriver\一卡通软件\Documents


 我的这个路径是直接从电脑的网络路径中复制下来的,应该不会错啊


此主题相关图片如下:clip_image002.jpg
按此在新窗口浏览图片

然后我在 

  • FileCreated
    创建文件后执行。 
  • FileChanged
    修改文件后执行。

 

写入了执行代码为

Dim sjfx As WinForm.Button = Forms("KQ打卡数据窗口").Controls("数据分析")
sjfx.PerformClick

不知这样操作是否可行,请狐爸及各位老师赐教,谢谢!


 回到顶部
帅哥哟,离线,有人找我吗?
小猪鑫鑫
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:832 积分:5867 威望:0 精华:6 注册:2011/5/27 11:41:00
  发帖心情 Post By:2012/8/27 12:53:00 [显示全部帖子]

狐爸:请帮我看看!

 回到顶部
帅哥哟,离线,有人找我吗?
小猪鑫鑫
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:832 积分:5867 威望:0 精华:6 注册:2011/5/27 11:41:00
  发帖心情 Post By:2012/8/27 17:17:00 [显示全部帖子]

狐爸:我后来就在自己的D盘中加了一个文件夹,完全按帮助中的样子做了一次,它也说找不到文件,我不知道我哪里做错了,或还有什么东东没有打开什么的,或操作系统有什么问题等,请帮我想想,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
小猪鑫鑫
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:832 积分:5867 威望:0 精华:6 注册:2011/5/27 11:41:00
  发帖心情 Post By:2012/8/27 17:29:00 [显示全部帖子]

狐爸:我按您的要求

If FileSys.FileExists("\\Gdtfc\D\Program Files\Eastriver\一卡通软件\Documents\Time20120827.txt") Then
    Messagebox.Show("文件已经存在!","提示")
Else
    Messagebox.Show("文件不存在或已经被删除!","提示")
End If

 

专门找一个具体的文件,系统说能找到,但我在文件监视器中一设置成这个它就说找不到文件,因这个打卡文件是每天增加一个的,明天就新增了一个Time20120828.txt的文件了

 


图片点击可在新窗口打开查看此主题相关图片如下:clip_image003.jpg
图片点击可在新窗口打开查看

请您帮我看看这样设备对不对


 回到顶部
帅哥哟,离线,有人找我吗?
小猪鑫鑫
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:832 积分:5867 威望:0 精华:6 注册:2011/5/27 11:41:00
  发帖心情 Post By:2012/8/27 17:30:00 [显示全部帖子]

这样设置对不对

 回到顶部
帅哥哟,离线,有人找我吗?
小猪鑫鑫
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:832 积分:5867 威望:0 精华:6 注册:2011/5/27 11:41:00
  发帖心情 Post By:2012/8/28 10:08:00 [显示全部帖子]

谢谢飞的提示,我试试先,谢谢!

 回到顶部