易表在线答疑 → 技术与交流 → 用户社区 → 请教 如何确定公式 有效


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

主题：请教 如何确定公式 有效
帅哥哟，离线，有人找我吗？
薛世隆
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：业余侠客 帖子：330 积分：522 威望：0 精华：0 注册：2006/9/17 21:43:00 		请教 如何确定公式 有效  发帖心情 Post By：2012/6/26 23:17:00 [只看该作者]

Export([主系统!备份路径],"销售表","888","销售明细","销售", " = ", - 1)  
And Export([主系统!即时备份路径],"销售表","888","销售明细","销售", " = ", - 1)  


这个公式  有时 有 效  有时 无效     

请教 老师  如何确定 公式的 执行  有效 

最好是无效有提示


谢谢  
 回到顶部
帅哥哟，离线，有人找我吗？
lyang70
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：5115 积分：862 威望：0 精华：0 注册：2006/8/15 16:57:00 		  发帖心情 Post By：2012/6/27 9:00:00 [只看该作者]

是不是局域网多用户使用？

 回到顶部
帅哥哟，离线，有人找我吗？
薛世隆
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：业余侠客 帖子：330 积分：522 威望：0 精华：0 注册：2006/9/17 21:43:00 		  发帖心情 Post By：2012/6/27 23:08:00 [只看该作者]

3个用户  打开的是3个文件     每个电脑都备份到这个文件 [主系统!即时备份路径]                       
同时备份在 各自的电脑上的备份文件中 
同时记录 转移到 各自使用的文件的另一个表中 
 
 这样同一条记录 就有了3个备份   放在3个文件中  

就这样还是不能保证 记录数据 不丢失 
因为 有时 上面的两个公式 没有起到作用 数据没有备份  正在 运行的主文件 又意外关闭 。

输入的数据 找不回了。
下面是  完整的公式。EvalFor("销售明细","销售",-1) 
And Export([主系统!备份路径],"销售表","62265","销售明细","销售", " = ", - 1)  
And Export([主系统!即时备份路径],"销售表","62265","销售明细","销售", " = ", - 1)  And CopyRows("销售表","销售", " = ", - 1) 
And DelFor("销售表","货品名称"," = ","") 
And DelFor("销售明细")    


同样结构的表 有3个  销售明细    销售表      销售查询表         在销售明细表中 输入数据   输入完后  有按钮 执行上面的公式  把输入的数据 备份在 不同的电上的不同的文件中。


请老师帮一下   有没有公式能在  And DelFor("销售明细")     之前      确定       Export([主系统!备份路径],"销售表","62265","销售明细","销售", " = ", - 1)  
And Export([主系统!即时备份路径],"销售表","62265","销售明细","销售", " = ", - 1)   一定是有效了   最好能有公式  验证一 下


谢谢
 回到顶部
帅哥哟，离线，有人找我吗？
lyang70
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：5115 积分：862 威望：0 精华：0 注册：2006/8/15 16:57:00 		  发帖心情 Post By：2012/6/28 8:47:00 [只看该作者]

这样试试，在操作前先判断一下目标文件是否可写。

 

——EvalFor("销售明细","销售",-1) And If(CanWrite([主系统!备份路径]) = False,MsgBox([主系统!备份路径] + "正在使用，请稍后再执行！",1),Export([主系统!备份路径],"销售表","62265","销售明细","销售", " = ", - 1)) And If(CanWrite([主系统!即时备份路径]) = False,MsgBox([主系统!即时备份路径] + "正在使用，请稍后再执行！",1), Export([主系统!即时备份路径],"销售表","62265","销售明细","销售", " = ", - 1))  And CopyRows("销售表","销售", " = ", - 1)
And DelFor("销售表","货品名称"," = ","")
And DelFor("销售明细")   


 回到顶部
帅哥哟，离线，有人找我吗？
薛世隆
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：业余侠客 帖子：330 积分：522 威望：0 精华：0 注册：2006/9/17 21:43:00 		  发帖心情 Post By：2012/7/2 22:48:00 [只看该作者]

图片点击可在新窗口打开查看lyang70  您好      CanWrite([主系统!备份路径])    文件不存在    查不到    而且结果是真
[主系统!备份路径] 这个文件不存在了    CanWrite 这个公式  查不了  返回结果是 文件可写 
是这样吗
有点搞不动

请测试一下

谢谢
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
lyang70
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：5115 积分：862 威望：0 精华：0 注册：2006/8/15 16:57:00 		  发帖心情 Post By：2012/7/3 9:13:00 [只看该作者]

检查参数“[主系统!备份路径] ”路径是否正确！

 

原公式的意思是在每次备份（存盘）前先要检测目标文件（[主系统!备份路径] ）是否在“可写”状态，如果“可写”则执行备份操作，否则提示稍后执行。
 回到顶部
帅哥哟，离线，有人找我吗？
薛世隆
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：业余侠客 帖子：330 积分：522 威望：0 精华：0 注册：2006/9/17 21:43:00 		  发帖心情 Post By：2012/7/3 13:13:00 [只看该作者]

CanWrite([主系统!备份路径])   能不能 发现  [主系统!备份路径]  这个文件 不存在  或损坏  并提示

谢谢
 回到顶部
帅哥哟，离线，有人找我吗？
lyang70
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：5115 积分：862 威望：0 精华：0 注册：2006/8/15 16:57:00 		  发帖心情 Post By：2012/7/4 10:34:00 [只看该作者]

以下是引用薛世隆在2012-7-3 13:13:00的发言：
CanWrite([主系统!备份路径])   能不能 发现  [主系统!备份路径]  这个文件 不存在  或损坏  并提示

谢谢




Exist

用于判断指定文件是否存在，例如：Exist("c:\data\sales.egd")，如果存在，则返回True，否则返回False

 

 

CanWrite

如果其他用户正在向指定的文件写入数据，例如存盘，CanWrite就会返回False，否则返回True。也就是说该函数用于判断目标文件在当前是否可写，这样我们就可以在其他用户完成写入操作后，再开始向目标文件写入数据。
除了保存外，Delfor2、Export、CopyGrid等函数也可以向指定文件写入或删除数据，这些函数在任何时候只能一个用户执行。所以在使用这些函数之前，应该用CanWrite判断是否有其他用户正在向目标文件写入数据。

语法：

CanWrite(FileName)

Filename: 目标文件名，包括路径。

例如：

CanWrite("c:\data\orders.egd")
判断文件c:\data\orders.egd现在是否可写。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright ©2002 - 2005 egrid2000.com   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03125 秒, 5 次数据查询