如果我可以强制 include() 使用父级的默认目录(或者我设置的任何目录,而不是创建自己的目录),我会很高兴。
例如
Names default to here(1);
dir = convert file path("$DESKTOP\TestDefaultDirectory\");
create directory(dir);
parent = JSLQuote(
Set Default Directory(convert file path("$DESKTOP"));
print("Parent");
show(Get Default Directory());
include("TestDefaultDirectory\child.jsl");
print("Parent");
show(Get Default Directory());
);
save text file(convert file path("Parent.jsl", base(dir)), parent);
child = JSLQuote(
print("Child");
show(Get Default Directory());
);
save text file(convert file path("Child.jsl", base(dir)), child);
nw = open(convert file path("Parent.jsl", base(dir)));
script = nw[scriptbox(1)];
script << Run();
退货
"Parent"
Get Default Directory() = "/Desktop/";
"Child"
Get Default Directory() = "/Desktop/TestDefaultDirectory/";
"Parent"
Get Default Directory() = "/Desktop/";
我希望孩子也返回“/Desktop/”