以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63632)

--  作者:hbhb
--  发布时间:2015/1/25 14:51:00
--  请教
大师好!
请问 退出狐表的程序
 system.diagnostics.process.GetProcessesByName("foxtable")(0).kill   中的“foxtable”  是后缀还是项目名称还是怎么?
那退出项目开发的项目时,红色部分怎样写?

--  作者:有点甜
--  发布时间:2015/1/25 14:56:00
--  
 任务管理器->进程,那里的名称
--  作者:hbhb
--  发布时间:2015/1/25 15:05:00
--  
为何在BeforeCloseProjects事件中写如下代码(如果红色部分不写)就不能退出项目,该如何写代码?
    If Var("变量") = False Then
        e.Cancel = True
    Else
        DataTables.RejectChanges
        DataTables("表1").DataRows.Clear
        DataTables("表2").DataRows.Clear
        DataTables("表3").DataRows.Clear
        DataTables("4").DataRows.Clear
        system.diagnostics.process.GetProcessesByName("foxtable")(0).kill   \'-----删除狐表进程-------
        
    End If


--  作者:有点甜
--  发布时间:2015/1/25 15:10:00
--  

DataTables.RejectChanges
DataTables("表A").DataRows.Clear
DataTables.Save

--  作者:hbhb
--  发布时间:2015/1/25 15:14:00
--  
这样是不是红色部分就可以不写了?
--  作者:有点甜
--  发布时间:2015/1/25 15:28:00
--  
以下是引用hbhb在2015-1-25 15:14:00的发言:
这样是不是红色部分就可以不写了?

 

是的,只要表数据被保存了,就不会再弹出是否保存的提示。

 

最好多加一句 e.SkipSave = True


--  作者:hbhb
--  发布时间:2015/1/25 15:33:00
--  
还是不退出系统。非要用system.diagnostics.process.GetProcessesByName("foxtable")(0).kill   \'-----删除狐表进程-------才行。
--  作者:有点甜
--  发布时间:2015/1/25 15:36:00
--  

 请上传具体例子,提示什么不退出?

 

 如果非要,那你就加上


--  作者:hbhb
--  发布时间:2015/1/25 15:42:00
--  
因为不退出,以前没有关注,只知道电脑运行慢,偶然一次打开进程,才知道打开了很多。于是加了进程判断?
--  作者:有点甜
--  发布时间:2015/1/25 16:01:00
--  
以下是引用hbhb在2015-1-25 15:42:00的发言:
因为不退出,以前没有关注,只知道电脑运行慢,偶然一次打开进程,才知道打开了很多。于是加了进程判断?

 

\'BeforeOpenProject事件:

Dim sucess As Boolean = False
static mu As new System.Threading.Mutex(True, "dsdfhdfghf", sucess)
If not sucess Then
    MessageBox.Show("只能打开一次!")
    e.Cancel = True
End If