自動化ツールUWSC使いよ集まれ30 (702ﾚｽ)
自動化ツールUWSC使いよ集まれ30 http://egg.5ch.net/test/read.cgi/software/1710386246/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
676: 名無しさん＠お腹いっぱい。 [sage] 2024/12/29(日) 10:37:17.95 ID:yJN5i/oY0 >672 肉じゃがの材料でポトフが出てきた感じ。 >673 そうなんだけど、ちょっとハードルが高い・・・ すくなくとも元作者さん急死が判明してからPythonに移行した勢くらいの 行動力が必要と思われる。 以下は冬休みの暇つぶしで・・・(´-ω-`) UWSCで複数開いてるエクスプローラをから特定のフォルダ名を含んでいたら 最前面にするプログラム・・・のはず(抜粋したから動かなかったらスマヌ) FolderName="適当なフォルダ名" DIM ObjShell = CREATEOLEOBJ("Shell.Application") for i = 0 To ObjShell.Windows.Count - 1 tmp_LURL= ObjShell.Windows.Item(i).LocationURL if pos(FolderName,tmp_LURL) > 0 then hWnd= ObjShell.Windows.Item(i).HWND id_folder= HNDtoID(hWnd) CTRLWIN(id_folder, ACTIVATE) break endif next UwscRで動かすと、hWndがVARIANT値になる。でHNDtoIDは数値を要求するのでエラーになる。 誰かVARIANT値を数値や数字、文字に変更する教えてください。 vartypeはVARIANT型であることを変更できない（っぽい）。type_ofで見てもTYPE_VARIANTで変わらんし、 print hWnd でも中の情報が見れない（VARIANT型はprintで中身が表示されない？）、val(hWnd)だと-99999、 この変換ができないので、CREATEOLEOBJ使用するものはすんなり動かない。 http://egg.5ch.net/test/read.cgi/software/1710386246/676
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 26 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.005s