自動啟動QQ

來源:互聯網
上載者:User
 ShellExecute(NULL, "open",
"d://Program Files//Tencent//QQ//QQ.exe",
NULL, NULL, SW_HIDE);
::Sleep(2300);   //設定時間等待QQ開啟,
char szText[256];
HWND hWnd=::FindWindow(NULL,"QQ使用者登入");
if(hWnd==NULL)
{
MessageBox("QQ開啟不成功!");
return;
}           //判斷QQ是否開啟成功

  HWND hEdit = FindWindowEx(hWnd,NULL,"ComboBox",NULL);
  ::SendMessage(hEdit,WM_SETTEXT,0,((LPARAM)"448098551")); //設定QQ號碼

  HWND hDiaPass = ::FindWindowEx(hWnd,NULL,"#32770",NULL);
  HWND hPass=::GetDlgItem(hDiaPass,0x3EA6);
char str[15]=" 密碼 ";    
int i;
for(i=0;i<12;i++)
{
::SendMessage(hPass,WM_CHAR,TCHAR(str[i]),0);
Sleep(200);   //類比鍵盤輸入
}

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.