|
ｿｽ@ｿｽｿｽVB6 SendMessageｿｽｿｽBM_CLICKｿｽ送ゑｿｽﾆエｿｽｿｽｿｽ[
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
m 2005/10/27(ｿｽｿｽ) 09:30:05
EXE1ｿｽｿｽEXE2ｿｽｿｽｿｽｿｽｿｽｿｽAEXE1ｿｽｿｽｿｽｿｽEXE2ｿｽﾌボｿｽ^ｿｽｿｽｿｽｿｽSendMessageｿｽｿｽBM_CLICKｿｽ送ゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽBEXE2ｿｽﾌボｿｽ^ｿｽｿｽｿｽﾌ擾ｿｽｿｽｿｽｿｽｿｽ Unload Me ｿｽﾌみでゑｿｽｿｽB
ｿｽｿｽｿｽﾌとゑｿｽｿｽAｿｽﾈ会ｿｽｿｽﾌエｿｽｿｽｿｽ[ｿｽｿｽｿｽﾅて具ｿｽｿｽｿｽｿｽIｿｽｿｽEXE2ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽuｿｽIｿｽ[ｿｽgｿｽｿｽｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽﾅゑｿｽｿｽB
ｿｽ@ｿｽAｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍ難ｿｽｿｽｿｽｿｽﾄび出ｿｽｿｽｿｽｿｽfｿｽBｿｽXｿｽpｿｽbｿｽ`ｿｽｿｽｿｽﾄゑｿｽｿｽ驍ｽｿｽﾟ、ｿｽﾄび出ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽBｿｽv
ｿｽｿｽｿｽUｿｽｿｽｿｽｿｽﾜゑｿｽ驍､ 2005/10/27(ｿｽｿｽ) 09:47:25
ｿｽGｿｽｿｽｿｽ[ｿｽﾌ暦ｿｽｿｽRｿｽｿｽ
http://www.bcap.co.jp/hanafusa/logbbs1/wforum.cgi?no=2078&reno=2065&oya=2065&mode=msgview
ｿｽｿｽｿｽｿｽｿｽ[ｿｽｿｽｿｽ骭滂ｿｽｿｽｿｽﾅ茨ｿｽｿｽｿｽｿｽ|ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
m 2005/10/27(ｿｽｿｽ) 09:58:56
ｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽﾍ鯉ｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBｿｽmｿｽｿｽｿｽﾉ包ｿｽｿｽsｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
EXE2ｿｽﾍ起ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽｿｽLｿｽｿｽｿｽﾉゑｿｽｿｽAIEｿｽ立ゑｿｽｿｽ繧ｰｿｽiｿｽｿｽ¥ｿｽｿｽｿｽjｿｽｿｽIEｿｽﾌ読み搾ｿｽｿｽﾝゑｿｽｿｽIｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾌまゑｿｽ
IEｿｽｿｽEXE2ｿｽﾍ暦ｿｽｿｽｿｽｿｽ繧ｰｿｽｿｽｿｽﾜまにゑｿｽｿｽﾄ、ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜまにゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽﾌ擾ｿｽｿｽｿｽ(ｿｽｿｽbｿｽﾔ隔)ｿｽﾍ、ｿｽﾊのウｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽﾄ趣ｿｽｿｽｿｽｿｽﾄ鯉ｿｽｿｽtｿｽｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽEXE2ｿｽｿｽIｿｽｿｽ
ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽﾊのウｿｽBｿｽｿｽｿｽhｿｽEｿｽｿｽEXE1ｿｽｿｽｿｽNｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾔは起ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾌで、ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽﾌ擾ｿｽｿｽｿｽｿｽﾍ趣ｿｽｿｽﾛは会ｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽｿｽﾔでゑｿｽｿｽB
EXE2ｿｽﾌ擾ｿｽｿｽｿｽｿｽｿｽ Unload Me ｿｽﾌみと擾ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾛはタｿｽCｿｽ}ｿｽ[ｿｽ無鯉ｿｽｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽ
Unload Me ｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
m 2005/10/27(ｿｽｿｽ) 10:14:33
ｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽ皷橸ｿｽGｿｽｿｽｿｽ[ｿｽﾍ出ｿｽﾈゑｿｽｿｽﾈゑｿｽﾜゑｿｽｿｽｿｽｿｽB
Unload Me ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽ Form_QueryUnload ｿｽﾌ擾ｿｽｿｽｿｽｿｽﾅエｿｽｿｽｿｽ[ｿｽﾉなゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
Form_QueryUnloadｿｽ@ｿｽﾌ擾ｿｽｿｽｿｽｿｽﾍ、
IE.Quit
Set IE = Nothing
ｿｽﾅゑｿｽｿｽB
IE.Quitｿｽﾌ趣ｿｽｿｽﾉゑｿｽｿｽﾔんそのエｿｽｿｽｿｽ[(VBｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽH)ｿｽｿｽｿｽoｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
IEｿｽｿｽ [Set IE = New SHDocVw.InternetExplorer] ｿｽﾆゑｿｽｿｽﾄ作成ｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽ
IEｿｽｿｽIｿｽｿｽｿｽｿｽｿｽｿｽｿｽ骼橸ｿｽｿｽ [Set IE = Nothing] ｿｽｿｽｿｽｿｽｿｽﾅよいｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
IE.Quitｿｽﾅ終ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ [Set IE = Nothing] ｿｽｿｽﾊ擾ｿｽﾍゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽEｿｽEｿｽEｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2005/10/27(ｿｽｿｽ) 12:41:52
> IEｿｽｿｽIｿｽｿｽｿｽｿｽｿｽｿｽｿｽ骼橸ｿｽｿｽ [Set IE = Nothing] ｿｽｿｽｿｽｿｽｿｽﾅよいｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽﾊ目でゑｿｽｿｽ蛯､ｿｽBｿｽｿｽｿｽﾌまま終ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉ残ｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾍゑｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽﾆゑｿｽｿｽﾎ、
ｿｽ@Set x = CreateObject("InternetExplorer.Application")
ｿｽ@x.Visible = True
ｿｽ@Set x = Nothing
ｿｽﾆゑｿｽｿｽｿｽ 3ｿｽsｿｽｿｽｿｽｿｽｿｽﾌ単ｿｽｿｽｿｽﾈアｿｽvｿｽｿｽｿｽｿｽｿｽｿｽsｿｽｿｽｿｽｿｽｿｽﾄみゑｿｽﾆ会ｿｽｿｽﾜゑｿｽｿｽｿｽﾋ。
> IE.Quitｿｽﾅ終ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ [Set IE = Nothing] ｿｽｿｽﾊ擾ｿｽﾍゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽEｿｽEｿｽEｿｽB
ｿｽｿｽｿｽﾌ趣ｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽﾔ茨ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽけｿｽﾅはゑｿｽｿｽｿｽﾜゑｿｽｿｽが、IE ｿｽﾌ終ｿｽｿｽｿｽﾍプｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ Quit ｿｽｿｽ
ｿｽﾄび出ｿｽｿｽｿｽ黷ｽｿｽ鼾ｿｽｿｽｿｽｿｽｿｽﾅはなゑｿｽｿｽAｿｽXｿｽNｿｽｿｽｿｽvｿｽgｿｽｿｽｿｽｿｽ window.close() ｿｽｿｽｿｽ黷ｽ
ｿｽ鼾ｿｽｿｽAｿｽ闢ｮｿｽｿｽｿｽｿｽﾅ終ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ黷ｽｿｽ鼾ｿｽｿｽｿｽｿｽ閧ｦｿｽﾜゑｿｽｿｽﾌで、Quit ｿｽｿｽｿｽ謔､ｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉは、ｿｽｿｽｿｽｿｽ IE ｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾈゑｿｽｿｽﾄゑｿｽｿｽｿｽﾂ能ｿｽｿｽｿｽｿｽ[ｿｽｿｽｿｽﾅはゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽﾅゑｿｽｿｽｿｽﾎ、OnQuit ｿｽ併用ｿｽｿｽｿｽ黷ｽｿｽｿｽｿｽｿｽｿｽﾇゑｿｽｿｽﾌではなゑｿｽｿｽｿｽｿｽﾆ。
