|
ｿｽ@ｿｽｿｽｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
|
ｿｽ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
ｿｽｿｽｿｽｿｽｿｽE 2004/08/06(ｿｽｿｽ) 17:54:38
ｿｽｿｽｿｽﾟまゑｿｽｿｽﾄ、ｿｽｿｽｿｽｿｽｿｽEｿｽﾆ鯉ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽ竄ｪｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
VBｿｽｿｽｿｽｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽ操作すｿｽｿｽdｿｽgｿｽﾝゑｿｽ成ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
SHELLｿｽﾖ撰ｿｽｿｽﾅ起ｿｽｿｽｿｽｿｽｿｽｿｽSendKeyｿｽﾖ撰ｿｽｿｽｿｽgｿｽpｿｽｿｽｿｽｿｽｿｽさｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽﾈ会ｿｽｿｽﾌ托ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽPｿｽDｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽJｿｽｿｽ
ｿｽQｿｽDｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽEｿｽCｿｽｿｽｿｽhｿｽEｿｽｿｽﾉゑｿｽｿｽｿｽcｿｽｿｽｿｽ[ｿｽｿｽIｿｽｿｽ
ｿｽRｿｽDｿｽEｿｽCｿｽｿｽｿｽhｿｽEｿｽｿｽﾉゑｿｽｿｽｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽｿｽjｿｽｿｽｿｽ[ｿｽｿｽIｿｽｿｽ
ｿｽSｿｽDｿｽIｿｽｿｽｿｽｿｽjｿｽｿｽｿｽ[ｿｽｿｽﾌ「ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾛ托ｿｽｿｽvｿｽｿｽIｿｽｿｽｿｽｿｽ_ｿｽCｿｽAｿｽｿｽｿｽOｿｽｿｽ¥ｿｽｿｽ
ｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽﾌウｿｽCｿｽｿｽｿｽhｿｽEｿｽﾍ最擾ｿｽｿｽｿｽｿｽﾉゑｿｽｿｽ_ｿｽCｿｽAｿｽｿｽｿｽOｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽMSｿｽｿｽｿｽiｿｽﾅなゑｿｽｿｽｿｽﾌゑｿｽｿｽﾎ象でゑｿｽｿｽB
SHELLｿｽﾖ撰ｿｽｿｽｿｽvbMinimizedNoFocusｿｽﾉ設定しｿｽNｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
ｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽﾌウｿｽCｿｽｿｽｿｽhｿｽEｿｽﾌ最擾ｿｽｿｽｿｽｿｽｿｽｿｽoｿｽｿｽｿｽﾜゑｿｽｿｽｿｽBｿｽLｿｽ[ｿｽｿｽｿｽｿｽﾍ擾ｿｽ閧ｭｿｽsｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽﾅ擾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌに托ｿｽｿｽﾉゑｿｽｿｽｿｽﾋばなゑｿｽﾈゑｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽﾜゑｿｽｿｽAｿｽｿｽｿｽ{ｿｽIｿｽﾈゑｿｽｿｽﾆでゑｿｽｿｽｿｽｿｽEｿｽCｿｽｿｽｿｽhｿｽEｿｽｿｽﾅ擾ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾔで托ｿｽｿｽｿｽｿｽ
ｿｽﾂ能ｿｽﾈのでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
sai 2004/08/06(ｿｽｿｽ) 19:27:17
ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾋ〜
ｿｽｿｽｿｽすｿｽｿｽAｿｽvｿｽｿｽｿｽPｿｽ[ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽﾄゑｿｽｿｽｿｽﾈゑｿｽ
FindwindowｿｽｿｽFindwindowEXｿｽﾈどでウｿｽBｿｽｿｽｿｽhｿｽEｿｽnｿｽｿｽｿｽhｿｽｿｽ
ｿｽｿｽ謫ｾｿｽｿｽｿｽﾄ鯉ｿｽｿｽSendMessageｿｽｿｽgｿｽｿｽｿｽﾎイｿｽCｿｽﾅゑｿｽｿｽ蛯､ｿｽB
ｿｽｿｽｿｽｿｽｿｽE 2004/08/11(ｿｽｿｽ) 14:44:15
saiｿｽｿｽｿｽｿｽAｿｽﾔ難ｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽBAPIｿｽsｿｽｿｽｿｽｿｽﾈゑｿｽｿｽ迹ｿｽｿｽｿｽ成ｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽB
ｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽｿｽShellExecuteｿｽﾅ起ｿｽｿｽｿｽｿｽFindWindowｿｽﾅ起ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽAｿｽvｿｽｿｽｿｽﾌウｿｽCｿｽｿｽｿｽhｿｽEｿｽｿｽｿｽｿｽ閧ｵｿｽwｿｽｿｽｿｽvｿｽｿｽJｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽLｿｽｿｽ
ｿｽRｿｽ[ｿｽhｿｽﾅ趣ｿｽｿｽsｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽ閧ｭｿｽsｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽwｿｽｿｽｿｽvｿｽﾆゑｿｽｿｽﾅ鯉ｿｽｿｽﾄ作成ｿｽｿｽｿｽﾄみゑｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽﾇゑｿｽｿｽｿｽｿｽｿｽｿｽﾈのゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽｿｽﾝまゑｿｽｿｽが、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
' ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽJｿｽｿｽ
rlng = _
ShellExecute(Me.hwnd, _
srtOperation, _
strFileName, _
vbNullString, _
strDefaultDirectory, _
SW_SHOWNORMAL)
hHandle = FindWindow(vbNullString, "AAA")
SendMessage hHandle, WM_KEYDOWN, vbKeyF1, 0
SendMessage hHandle, WM_KEYUP, vbKeyF1, 0
ｿｽｿｽｿｽｿｽｿｽE 2004/08/11(ｿｽｿｽ) 14:48:34
ｿｽｿｽｿｽﾝまゑｿｽｿｽｿｽAｿｽﾇゑｿｽｿｽｿｽｿｽｿｽ閧ｭｿｽsｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽ明記ｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
SendMessageｿｽﾌ托ｿｽｿｽｿｽﾅヘｿｽｿｽｿｽvｿｽｿｽｿｽJｿｽｿｽｿｽﾜゑｿｽｿｽｿｽBkeybd_eventｿｽﾅ趣ｿｽｿｽｿｽｿｽｿｽｿｽ閧ｷｿｽｿｽｿｽ
ｿｽｿｽｿｽxｿｽﾍ外ｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽｿｽｿｽAｿｽNｿｽeｿｽBｿｽuｿｽﾉならずVBｿｽﾌウｿｽCｿｽｿｽｿｽhｿｽEｿｽｿｽｿｽAｿｽNｿｽeｿｽBｿｽuｿｽﾉなゑｿｽ
ｿｽLｿｽ[ｿｽｿｽｿｽ自ｿｽﾌゑｿｽｿｽｿｽ閧ｭｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾈようｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽE 2004/08/11(ｿｽｿｽ) 18:08:45
ｿｽｿｽｿｽ[ｿｽｿｽAPostMessageｿｽﾉ置ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBｿｽwｿｽｿｽｿｽvｿｽ¥ｿｽｿｽｿｽﾉつゑｿｽｿｽﾄ。
SendMessageｿｽﾌ包ｿｽｿｽﾅほゑｿｽﾆにキｿｽ[ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽｿｽｿｽｿｽｿｽE 2004/08/11(ｿｽｿｽ) 18:16:09
ｿｽｿｽAｿｽuAltｿｽ{Fｿｽvｿｽﾆゑｿｽｿｽ操作しｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
Postmessageｿｽﾅ費ｿｽﾎゑｿｽｿｽﾆゑｿｽｿｽﾈ会ｿｽｿｽﾌ包ｿｽｿｽ@ｿｽﾅ行ｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
ｿｽOｿｽｿｽｿｽAｿｽvｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽLｿｽqｿｽｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽ@Dim hHandle As Long
hHandle = FindWindow(vbNullString, "AAA")
If hHandle <> 0 Then
PostMessage hHandle, WM_KEYDOWN, VK_ALT, 0
PostMessage hHandle, WM_KEYDOWN, ASC("F"), 0
PostMessage hHandle, WM_KEYUP, ASC("F"), 0
PostMessage hHandle, WM_KEYUP, VK_ALT, 0
DoEvents
End If
