【VBScript】WSHについて話し合うスレ【JScript】

**デフォルトの名無しさん** · 2025/07/16(水) 12:44:55.22

もうV8でええやん
COM載せるだけでしょ

**デフォルトの名無しさん** · 2025/07/16(水) 15:03:42.67

>>173
JSのメソッドディスパッチ自体にOLEオートメーションと互換を持たせないといけないからなあ
MS製以外のエンジンを使うなら大改造になる

**デフォルトの名無しさん** · 2025/08/07(木) 11:13:25.81

HTAでWScriptの標準入出力Stdin/Stdoutを使う方法はありますか？

という疑問でwebを漁ってたら、以下のコードを見つけたのですが、
これは何をしているか判りますか
http://www.roy.hi-ho.ne.jp/mutaguchi/bbs/list127.shtml
の
＞Set oExec=wShell.Exec("MSHTA～
＞oExec.StdIn.Write fso.OpenTextFile(Left(WScript.ScriptFullName,InStrRev(WScript.ScriptFullName,"."))&"HTA").ReadAll
＞oExec.StdIn.Close
の辺り。～は専ブラだとバグる

**デフォルトの名無しさん** · 2025/08/07(木) 16:01:49.20

意味がよくわからない
「WScript」がcscript.exeではなくwscript.exeのことなら元から標準入出力しても何も起きないけど多分そういう話ではないよね

そのソースコードは、mshta.exeを子プロセスとして起動してテキストファイルから読み込んだ内容をその子プロセスの標準入力に流してる
mshta.exeの側では標準入力から読み取った内容を実行してる

**デフォルトの名無しさん** · 2025/08/07(木) 16:53:21.35

元々HTAとpowershell間のプロセス間通信を考えてました
WSH(WScript)とpowershellでの通信はできていたので、
ならばHTAからWScript.Stdin/Stdout相当をどうにかして得られないかという疑問に代わりました

さてGetStandardStream(0)でStdinを得るまでは何となく判りますが
そのハンドルでReadAll()これの意味が判らない
結果的にoExecにはWScript相当？が入るようですが

**デフォルトの名無しさん** · 2025/08/07(木) 17:25:58.39

あー了解
で、oExecに入るのはwShell.Exec()の結果で、起動したmshta.exeのプロセスをラップしたWshScriptExecオブジェクト
oExec.StdIn.Writeでmshta.exeの標準入力に内容を書き込んでる、これがWSH側でやってること
MSのサイトですらリンク切れしまくってたけどitmediaに解説が残ってた ttps://atmarkit.itmedia.co.jp/ait/articles/0407/08/news101_2.html

**デフォルトの名無しさん** · 2025/08/07(木) 17:28:32.02

GetStandardStream(0).ReadAll() を実行しているのは起動されたHTAの側で、標準入力から読み込んだ内容を実行してる
リンク先サンプルだとその内容はH.HTAで、その後は裏で起動させたIEを通じてやり取りをする…という実験っぽい

というわけでHTAで標準入出力を使うには new ActiveXObject('Scripting.FileSystemObject').GetStandardStream() だけでいいと思う
手元で確認したわけではないので違ってたらごめん

**デフォルトの名無しさん** · 2025/08/07(木) 20:06:59.39

>>179
WshScriptExecというのですね
色々ありがとうございます

**デフォルトの名無しさん** · 2025/08/07(木) 21:37:56.02

Exec メソッド
https://learn.microsoft.com/ja-jp/previous-versions/windows/scripting/cc364356(v=msdn.10)
GetStandardStream Method
https://learn.microsoft.com/en-us/previous-versions/windows/internet-explorer/ie-developer/windows-scripting/y6hbz9es(v=vs.84)