Windows-Programme automatisieren (z.B. mit VBScript)

#include "string.h" 
#include <windows.h>
                      
//nützliches Makro um schreibarbeit zu sparen...
#define CHECKNULLHWND(hWnd,msgboxmsg,msgboxcaption,abbruchlabel) \
          if(!hWnd)                                              \
          { MessageBox(NULL,msgboxmsg,msgboxcaption,MB_OK);      \
            goto abbruchlabel;                                   \
          }                                                      \

//====================================================================================
// main()
//====================================================================================
int main(int argc, char* argv)
{
//Trick um Warnings zu unterdrücken (die meisten Compiler kennen das)
  argc;
  argv;

//var
  HWND hWnd,hWndChild;
  size_t i,ilen;
  const char *pszString = "Das ist der Text der übertragen wird!!! \n\nAuch Zeilenumbrüche und "\  
                          "Tab's sind möglich\nx\tTab\nxx\t\tTab\nxxx\t\t\tTab\n\n\n\n\n\n\n"\  
                          " W  W  W  33333   2222          AAAA   PPPPP  III             RRRRRR  U    U  L       ZZZZZZZ \n"\  
                          " W  W  W      3  2   2         A    A  P   P   I              R    R  U    U  L             Z \n"\  
                          " W  W  W      3      2         A    A  P   P   I              R    R  U    U  L            Z  \n"\  
                          " W  W  W  33333     2    ---   AAAAAA  PPPPP   I              RRRRRR  U    U  L           Z   \n"\  
                          " W  W  W      3    2           A    A  P       I              RR      U    U  L          Z    \n"\  
                          " W  W  W      3   2            A    A  P       I              R R     U    U  L         Z     \n"\  
                          " W  W  W      3  2    2        A    A  P       I              R   R   U    U  L        Z      \n"\  
                          "  WWWWW   33333  22222         A    A  P      III             R    R   UUUU   LLLLLL  ZZZZZZZ \n";  
//code
  hWnd=FindWindow                           //Handle vom Notepad suchen
         (NULL,(LPCTSTR)"Unbenannt - Editor");  
  CHECKNULLHWND(hWnd,"Kein Notepad offen. Bitte ein leeres Notepad öffnen. ","Info",abbruch)  
  
    
  hWndChild=NULL;                           
  hWnd=FindWindowEx                         //Handle des Editfeldes vom Notepad suchen
    (hWnd,hWndChild,(LPCTSTR)"Edit",NULL);  
  CHECKNULLHWND(hWnd,"Hmmm das sollte nicht passieren: Das Eingabefeld vom Notepad konnte nicht gefunden werden! ","Info",abbruch)  


  ilen = strlen(pszString);                 //Länge des zu sendenden Strings bestimmen
  for(i=0;i<ilen;i++)                       //Vom ersten bis zum letzten Zeichen übertragen
  {
    PostMessage                             //WM_CHAR-Nachricht posten
      (hWnd,WM_CHAR,pszString[i],0);

    // So kommt es von der Tastatur, blos hier muessen eben VK's (VK_TAB etc.) gesendet werden.  
    // Außerdem ist Shift etc. zu drücken wenn man z.B. ein großes A will. Einfacher ist da schon die 
    // fertige WM_CHAR-Nachricht zu senden (TranslateMessage in der MessageLoop baut die beiden folgenden Nachrichten
    // sowieso in eine WM_CHAR um, die dann von der Anwendung verarbeitet wird)
    //PostMessage(hWnd,WM_KEYDOWN,'A',0x001E0001); 
    //PostMessage(hWnd,WM_KEYUP  ,'A',0xC01E0001); 
  }

	return 0;
abbruch:
  return 1;
}