执行 JMP 应用程序的问题

【问题标题】：Issue Executing JMP Application执行 JMP 应用程序的问题
【发布时间】：2014-09-02 01:40:42
【问题描述】：

我打算使用下面的脚本自动调用 JMP 应用程序，但是当我运行它时，它直接打印 hello word，脚本初始化并完成，但它不执行 JMP 应用程序。它跳过它，没有结果被保存。为什么？

#! C:\Dwimperl\perl\bin
#!/usr/bin/perl   -w
use strict;
use Win32::OLE;

print "hello word";

use Win32::OLE;
print "Script Initializing", "\n";

my $jmp = Win32::OLE->new('JMP.Application');

$jmp->{Visible} = 1;

$jmp->RunJSLFile("Z:\\trybar.jsl");

print "Done\n";

$jmp->Quit();

【问题讨论】：

标签： perl winapi ole

【解决方案1】：

您的问题不清楚，您的问题有几个潜在原因。但这些要点可能会有所帮助

shebang 行在 Windows 上是没用的，所以最好去掉它
在 shebang 线上总是use warnings 而不是-w

您自己的代码的这种变体可以正常工作，但请记住，如果trybar.jsl 的内容有问题，您会收到错误

use strict;
use warnings;

use Win32::OLE;

print "Script initialising\n";

my $jmp = Win32::OLE->new('JMP.Application');

$jmp->{Visible} = 1;
$jmp->RunJSLFile('Z:\trybar.jsl');

print "Done\n";

$jmp->Quit;

【讨论】：