- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]退出项目问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=53187)
-- 发布时间：2014/7/1 22:22:00
-- [求助]退出项目问题
我的项目是使用外部表数据来管理登陆用户的；而且我还做了一个注册窗口，这个窗口为 模式 窗口；其中有一个按钮我希望按下该按钮后能够关闭该窗口、退出项目、禁止弹出任何错误提示；该按钮如下命令：
e.Form.Close()
Syscmd.Project.Exit() \'正常退出飞狐
Return \'这个要加上,因为既然要退出,就不应该再执行后面的初始化代码了,否则会出错
这个命令本来的目的是关闭项目并禁止弹出任何错误提示；但是他实际上还是会弹出很多错误提示；如果我把命令顺序倒过来：
e.Form.Close()
Return \'这个要加上,因为既然要退出,就不应该再执行后面的初始化代码了,否则会出错
Syscmd.Project.Exit() \'正常退出飞狐
这种情况下就没有弹出任何错误提示；但是他却直接把项目给打开啦。我是不是哪里错了？
-- 发布时间：2014/7/1 22:24:00
--
参考
|
system.diagnostics.process.GetProcessesByName("foxtable")(0).kill |
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=52874&skin=0
-- 发布时间：2014/7/1 22:53:00
--
不好意思。新手看了半天还是不得要领；像链接中的那些命令全部用了、都不行。能不能把链接中的那个附件一样，做给我看怎么实现。行吗？
-- 发布时间：2014/7/1 22:55:00
--
关闭按钮的代码，这样写
system.diagnostics.process.GetProcessesByName("foxtable")(0).kill
-- 发布时间：2014/7/1 23:12:00
--
OK，谢谢！！！
[此贴子已经被作者于2014-7-1 23:24:21编辑过]
-- 发布时间：2014/7/2 0:46:00
--
实在是高，帮助中却没有。
-- 发布时间：2014/7/3 14:05:00
--
如果项目在自动升级后、也会弹出错误提示；我该在哪里写入 system.diagnostics.process.GetProcessesByName("foxtable")(0).kill 来实现不提示错误
-- 发布时间：2014/7/3 14:10:00
--
放在升级代码后面
-- 发布时间：2014/7/3 14:14:00
--
这样写对吗？
If Syscmd.Project.Update(False,True) = False Then \'如果没有升级(False,True)
Forms("用户登录").Open() \'打开 用户登录 窗口
If _UserName = "" Then \'如果用户名= 空
system.diagnostics.process.GetProcessesByName("foxtable")(0).kill
End If
End If
-- 发布时间：2014/7/3 14:18:00
--
If Syscmd.Project.Update(False,True) = False Then \'如果没有升级(False,True)
Forms("用户登录").Open() \'打开 用户登录 窗口
end if
If _UserName = "" Then \'如果用户名= 空
system.diagnostics.process.GetProcessesByName("foxtable")(0).kill
End If