Strings als Tastaturausgabe

  • VB

Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

  • Strings als Tastaturausgabe

    Hi...

    ich brauche Code um Strings, die ich vorher vom COM Port hole als Tastaturausgabe in eine andere Anwendung zu zaubern.
    Die Anwendung muss also im Hintergrund laufen, darf aber nicht als Dienst funktionieren, weil es sich um eine Multiuser Umgebung handelt, und der COM Port über den Terminalclient gemappt ist und somit exclusiv für den User existiert.
  • Hallo jfalbrecht,

    das geht so:

    Dim Ergebnis, I
    'Starten des Windows-Calculators und Auffangen der Applikation-ID
    appID = Shell("CALC.EXE", 1)
    'Sicherstellen dass der Calculator den Fokus hat
    AppActivate appID
    'berechnen der Summe der Zahlen von 1 bis 100
    For I = 1 To 99
    'send keys to add the values of I
    SendKeys I & "{+}", True
    Next I
    SendKeys ("100"), True
    SendKeys "=", True
    'Schließen des Calculators mit [Alt]+[F4]
    SendKeys "%{F4}", True

    Viele Grüße
    AlexGSB