March 01, 2006

複線コマンド寸法固定

[CAD]

_あー惜しかったですね。
図面を読み込んだ後でしたら、こんなのがよろしいかと..
' Jw_Fukusen_Def.vbs
dim Ws
set Ws=CreateObject("Wscript.shell")
fw=Ws.AppActivate("jw_win")
Ws.SendKeys"f914{ENTER}1219{ENTER}1524{ENTER}1829{ENTER}1725{ENTER}"
WScript.Quit

投稿者 秋天越 : 11:09 AM | トラックバック (0)

このエントリーのトラックバックURL:

http://akitenh.s55.xrea.com/mt/mt-tb.cgi/198

コメント

そうか、キーボードでできることは何でもできるんですね。
JWWが複数起動している時は、最後にアクティブだったものを掴まえるとか法則があるのですか?

Posted by: : March 1, 2006 02:48 PM

卯さん こんにちは
AppActivate 仕様は良く判っていないところもあるのですが、おそらく「直近にアクティブだったものを掴まえる」との理解で良いのではないでしょうか。

Posted by: 秋天越 : March 1, 2006 06:48 PM

コメントする









名前、アドレスを登録しますか?