- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 请教Syscmd.Project.Open用法 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=157888)
-- 发布时间：2020/11/1 18:09:00
-- 请教Syscmd.Project.Open用法
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:项目测试.rar |
一、以下代码在命令窗口中直接执行没有问题，但在窗口中的按钮执行时出现以下提示：
“This row has been removed from a table and does not have any data. BeginEdit() will allow
creation of new data in this row.”，如何取消这个提示？
\'\'\'
Dim 原目录 As String = FileSys.GetParentPath(FileSys.GetParentPath(ProjectFile))
Dim 备份目录 As String = 原目录 & "备份"
Dim 备份文件 As String = 备份目录 & "\\" & ProjectFile.Replace(原目录,"").split("\\")(1) & "\\项目2.table"
FileSys.CopyDirectory (原目录, 备份目录, True)
Syscmd.Project.Open(备份文件)
二、测试顺序：
1、文件打开：解压文件后，打开“项目测试-项目”文件夹中的“项目1.table”
2、代码执行：分别在命令窗口中和窗口的按钮中执行以上代码
三、代码目的：先复制整个“项目测试”文件夹为“项目测试备份”到同一目录，然后打开复制文件夹中的“项目2.table”（非原项目文件夹中）。
-- 发布时间：2020/11/1 20:49:00
--
……
FileSys.CopyDirectory (原目录, 备份目录, True)
e.cancel = true
Syscmd.Project.Open(备份文件)
Syscmd.Project.Open(备份文件)
-- 发布时间：2020/11/2 8:27:00
--
谢谢蓝版
-- 发布时间：2020/11/2 9:43:00
--
蓝版，用Syscmd.Project.Open打开另一个文件时会出现“正在打开文件，请稍后”的提示，请问可以去掉这个提示吗？
-- 发布时间：2020/11/2 9:59:00
--
不能