以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]请问,停止事件,会引起菜单不起作用吗?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95487)

--  作者:瞩望星空
--  发布时间:2017/1/21 11:25:00
--  [求助]请问,停止事件,会引起菜单不起作用吗?
本人想通过高速合并,把ACCESS的数据导入到SQL数据表中。因表属性中编写了事件,想在高速合并前
停止事件执行(SystemReady = False),可是使用这个命令后,系统菜单按下去没反应了。

--  作者:有点蓝
--  发布时间:2017/1/21 12:44:00
--  
用代码合并:http://www.foxtable.com/webhelp/scr/0685.htm

SystemReady = False
Dim mg As New Merger
mg
.SourcePath = "c:\\data\\销售管理.xls"
mg
.Format = "excel" \'指定格式
mg
.SourceTableName = "订单" \'指定要合并的表
mg
.DataTableName = "订单" \'指定接收数据的表
mg
.Merge() \'开始合并
SystemReady = true

--  作者:瞩望星空
--  发布时间:2017/1/21 13:07:00
--  
谢谢