Foxtable(狐表)用户栏目专家坐堂 → [BUG]FileCreated 代码为何不执行?


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

主题:[BUG]FileCreated 代码为何不执行?

帅哥哟,离线,有人找我吗?
有点甜
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/7/8 14:50:00 [只看该作者]

 回复10楼,我测试了一下,只要你新增的是.xls后缀的文件,不可能没有弹出窗口。

 

 你看看你是不是添加了别如xlsx文件了。


 回到顶部
帅哥哟,离线,有人找我吗?
don
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2014/7/8 15:05:00 [只看该作者]

确实是.xls文件,

我现在文件监视器 就一句 弹窗提示代码,但创建.xls文件后也没有弹窗!难道文件监视器对繁体系统支持不好?
msgbox(e.FullPath)

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


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/8 15:06:00 [只看该作者]

看看目录是否设置对.

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/8 15:06:00 [只看该作者]

检查路径是否设置正确,是否有启用.是否有设置文件过滤.

 回到顶部
帅哥哟,离线,有人找我吗?
don
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2014/7/8 15:10:00 [只看该作者]

目录正确

 回到顶部
帅哥哟,离线,有人找我吗?
don
  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2014/7/8 15:11:00 [只看该作者]

以下是引用Bin在2014-7-8 15:06:00的发言:
检查路径是否设置正确,是否有启用.是否有设置文件过滤.
1 楼 说 了:
'AfterOpenProject代码

With FileWatcher
    .Path = "D:\Met\Reports"
    .Filter = "*.xls"
    .Delay = 1000
    .Enabled = True
End With


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/7/8 15:17:00 [只看该作者]

 我测试,在afteOpenProject加入对应代码,然后在事件写入msgbox(e.FullPath),然后在文件里创建一个excel文件,会弹出对应路径的。

 

 你再试试看什么问题吧。


 回到顶部
帅哥哟,离线,有人找我吗?
don
  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2014/7/8 15:35:00 [只看该作者]

下面是我新建的测试文件,在D:\Met文件里创建一个.xls文件后,也不弹窗!
这样看来文件监视器 对繁体版 支持 不好!


'AfterOpenProject代码

With FileWatcher
    .Path = "D:\Met"
    .Filter = "*.xls"
    .Delay = 1000
    .Enabled = True
End With

'FileCreated 代码
msgbox(e.FullPath)

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:test.foxdb


[此贴子已经被作者于2014-7-8 15:35:29编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/7/8 15:39:00 [只看该作者]

 测试了,在Met创建文件,会弹出。

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/8 15:46:00 [只看该作者]

会弹出+ 1

 回到顶部
总数 22 上一页 1 2 3 下一页