源码运行正常，编译后出错？ - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 源码运行正常，编译后出错？

标题：源码运行正常，编译后出错？

只看楼主

wxzd123

等　级：论坛游民
帖　子：238
专家分：43
注　册：2012-9-6
结帖率：85.71%

楼主

已结贴√ 问题点数：20 回复次数：4

源码运行正常，编译后出错？

command1代码
excel_m=Createobject('Excel.application')
excel_m.Workbooks.Open(Sys(5)+Sys(2003)+"\Book1.xls")
excel_m.Visible=.T.

command2代码
wps_m=Createobject('KET.application')
wps_m.Workbooks.Open(Sys(5)+Sys(2003)+"\Book1.xls")
wps_m.Visible=.T.

系统装wps,源码运行command1和command2都好用
编译exe后，都出错

但编译后在装有excel都机器上command1好用
问题出在哪？谢谢

[此贴子已经被作者于2023-2-27 21:46编辑过]

搜索更多相关主题的帖子: 出错　编译　 Open　运行　源码　

2023-02-27 21:45

吹水佬

等　级：版主
威　望：432
帖　子：10064
专家分：41463
注　册：2014-5-20

第 2 楼

得分:5

两个都不是VFP的东西

2023-02-27 22:44

csyx

等　级：版主
威　望：29
帖　子：484
专家分：1827
注　册：2018-3-13

第 3 楼

得分:10

查查你的 OLEOBJECT 设置，Set('OLEOBJECT') 正常应返回 ON

2023-02-28 02:33

wxzd123

等　级：论坛游民
帖　子：238
专家分：43
注　册：2012-9-6

第 4 楼

得分:0

LPARAMETERS szParam
IF (_VFP.STARTMODE == 4) AND (VARTYPE(szParam) != "C")
    ASTACKINFO(aPrg)
   oApp = CREATEOBJECT("Shell.Application")
   oApp.ShellExecute(aPrg[2], "以管理员身份运行", "", "runas", 1)
  QUIT
ENDIF
跟这段代码有关？去掉就好了

2023-02-28 07:10

pvm2000

等　级：版主
威　望：24
帖　子：159
专家分：256
注　册：2022-12-22

第 5 楼

得分:5

以下是引用wxzd123在2023-2-28 07:10:02的发言：

LPARAMETERS szParam
IF (_VFP.STARTMODE == 4) AND (VARTYPE(szParam) != "C")
    ASTACKINFO(aPrg)
   oApp = CREATEOBJECT("Shell.Application")
   oApp.ShellExecute(aPrg[2], "以管理员身份运行", "", "runas", 1)
  QUIT
ENDIF
跟这段代码有关？去掉就好了

得装WPS

2023-02-28 10:01

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-511410-1-1.html