专家坐堂-[求助]保存为电子表格后，自动打开Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]保存为电子表格后，自动打开  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=47658)

--  作者：hiliuyong
--  发布时间：2014/3/14 11:39:00
--  [求助]保存为电子表格后，自动打开

Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xls" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
     Tables("订单").SaveExcel(dlg.FileName, "订单") \'保存文件
End If

能不能实现保存后，自动打开这个电子表格呢？

--  作者：Bin
--  发布时间：2014/3/14 11:41:00
--
http://www.foxtable.com/help/topics/0353.htm

--  作者：Bin
--  发布时间：2014/3/14 11:41:00
--
Dim Proc As New Process \'定义一个新的Process
Proc.File = dlg.FileName
Proc.Start()

--  作者：hiliuyong
--  发布时间：2014/3/14 11:47:00
--
谢