UWSC初心者用スレ2 (284ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

179: デフォルトの名無しさん [sage] 2022/08/15(月) 04:20:46.46 ID:pm4LQRan(1/2) AAS
>>170
試しにこれを実行してみてほしい

DIM sSearchTitle = INPUT("指定するブラウザのアクティブなタブ表示を入力")
DIM idWnd = getid(sSearchTitle)

DIM sBrowserName = WhatBrowser(idWnd)
MSGBOX("ブラウザは"+sBrowserName)

FUNCTION WhatBrowser(idWnd)
　RESULT = "不明"
　DIM sFullTitle = STATUS(idWnd, ST_TITLE)
　//MSGBOX(sFullTitle)
　INPUT("ウィンドウのフルタイトル", sFullTitle )
　IFB POS( " - Google Chrome", sFullTitle) THEN
　　RESULT = "Chrome"
　ELSEIF POS( " - Chromium", sFullTitle) THEN
　　RESULT = "Chromium"
//　ELSEIF POS( " - Microsoft​ Edge", sFullTitle) THEN
　　// Microsoftの後ろはゼロ幅スペース: U+200Bに続いて通常のスペース
　　// UTF-8 保存でなら使用できる
　ELSEIF POS( " - Microsoft", sFullTitle) AND POS(" Edge", sFullTitle) THEN
　　RESULT = "Edge"
　ELSEIF POS( " - Vivaldi", sFullTitle) THEN
　　RESULT = "Vivaldi"
　ENDIF
FEND

---

180: デフォルトの名無しさん [sage] 2022/08/15(月) 04:44:39.65 ID:pm4LQRan(2/2) AAS
これでの判定があっていれば
>>169のいうとおり
最初からChromeかEdgeか指定して取得できる
表示上ブラウザ名がついていなくても内部的にはたぶんついている
GETID() はタイトルの一部のみで取得できそれが先頭部分である必要もない

もしこれで判定できなければ
https://plaza.rakuten.co.jp/dmaster/diary/200512210004/
のように実行EXE名を取得できるのでそれで判定する方法がある
ただChromeでは問題なかったが
Edgeの場合何かのセキュリティが効いているらしくEnumProcessModules()
がエラーになった

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.835s*