Foxtable(狐表)用户栏目专家坐堂 → [求助]判断文件是否已经打开,代码问题?


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

主题:[求助]判断文件是否已经打开,代码问题?

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


加好友 发短信
等级:童狐 帖子:254 积分:1963 威望:0 精华:0 注册:2013/2/6 19:09:00
[求助]判断文件是否已经打开,代码问题?  发帖心情 Post By:2013/3/16 21:14:00 [只看该作者]

If FileIsOpened("D:\门诊收费系统\收费2013.3.15.Foxtable项目")= True Then
    MessageBox.Show("文件已经打开")
Else
    MessageBox.Show("文件未打开")
End If

 

以上代码不能正确判断,难道狐表不能判断自己做的文件吗?

 

是不是文件后缀名“Foxtable项目”有问题?

 

打开文件后,在窗口做了个测试按钮,测试了n次都提示("文件未打开"),明明已经打开了!


 回到顶部
帅哥哟,离线,有人找我吗?
晕了快扶我
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1207 积分:7224 威望:0 精华:0 注册:2013/3/4 18:02:00
  发帖心情 Post By:2013/3/16 21:28:00 [只看该作者]

少了后缀名

D:\门诊收费系统\收费2013.3.15.Foxtable项目.table

或者是.foxdb


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


加好友 发短信
等级:童狐 帖子:254 积分:1963 威望:0 精华:0 注册:2013/2/6 19:09:00
  发帖心情 Post By:2013/3/16 22:21:00 [只看该作者]

都试过了,狐表不知是什么类型文件,几个后缀名都不成的。

可能是不支持。


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


加好友 发短信
等级:等待验证 帖子:3855 积分:20692 威望:0 精华:5 注册:2012/6/21 14:03:00
  发帖心情 Post By:2013/3/18 8:27:00 [只看该作者]

用户已被锁定

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2013/3/18 8:34:00 [只看该作者]

下面代码是项目发布后可以打开,发布前不行

Dim fl As String = "E:\CableERP\原材料仓\Project\原材料仓.foxex"
    If FileSys.FileExists(fl) Then  '如果文件存在
    Syscmd.Project.Open(fl,_UserName,_UserPassword) '打开项目   
Else
    Messagebox.Show("文件不存在!","提示")
End If


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


加好友 发短信
等级:二尾狐 帖子:501 积分:4167 威望:0 精华:0 注册:2013/1/18 13:34:00
  发帖心情 Post By:2013/6/11 11:20:00 [只看该作者]

用getfiles("D:\门诊收费系统")试试,可看到所有包括后缀的文件名,当然也包括”收费2013.3.15.Foxtable项目“这个文件。

 回到顶部