以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  打开外部程序  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=172741)
--  作者：mxl810823
--  发布时间：2021/10/28 16:46:00
--  打开外部程序
Dim Proc As New Process
Proc.File = "C:\\Program Files (x86)\\方正高影仪\\CamScan.exe"
For Each Verb As String In Proc.Verbs
    Output.show(Verb)
Next
结果是：open,runas,runasuser
所以执行如下程序时打不开程序，提示“程序已打开正在激活”，可是什么东西都没看到，那要怎么打开？？

Dim Proc As New Process \'定义一个新的Process
Proc.File = "C:\\Program Files (x86)\\方正高影仪\\CamScan.exe" \'指定要打开的文件
Proc.Start()
--  作者：有点蓝
--  发布时间：2021/10/28 16:54:00
--  
打开目录接双击CamScan.exe文件能不能正常打开
--  作者：mxl810823
--  发布时间：2021/10/28 17:12:00
--  
可以的
--  作者：有点蓝
--  发布时间：2021/10/28 17:14:00
--  
把程序安装到其它目录，不要安装到C:\\Program Files (x86)里，再试试
--  作者：mxl810823
--  发布时间：2021/10/28 17:37:00
--  
不行呢， 现安装在D盘，也是一样的提示“软件已经运行，正在激活”然后一闪就什么都没有了
--  作者：有点蓝
--  发布时间：2021/10/28 20:09:00
--  
试试

Dim Proc As New Process 
proc.StartInfo.FileName = "C:\\Program Files (x86)\\方正高影仪\\CamScan.exe"
proc.StartInfo.WorkingDirectory = "C:\\Program Files (x86)\\方正高影仪"
Proc.Start()
--  作者：mxl810823
--  发布时间：2021/10/29 15:07:00
--  
可以打开了谢谢