岡三デスクトップ自動ログインVB
VBに直してみたぉ。
**APIの宣言は省略**
'マウスカーソルの移動
Windows.Forms.Cursor.Position = New Point(1336, 16)
AppActivate("岡三デスクトップ")
System.Threading.Thread.Sleep(1000)
Application.DoEvents()
'マウスの左ボタンを押す
Call mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
'マウスの左ボタンを離す
Call mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0)
System.Threading.Thread.Sleep(5000)
Application.DoEvents()
System.Windows.Forms.SendKeys.Send("pass")
System.Threading.Thread.Sleep(5000)
Application.DoEvents()
System.Windows.Forms.SendKeys.Send("{ENTER}")
|
トラックバックされた記事
http://blogs.yahoo.co.jp/rinchin1108/trackback/971801/22455676
トラックバック先の記事
コメント(0)