Herzlich Willkommen und viel Spaß hier
Beiträge von Xenon
-
-
Also bei mir gehts.
Ich habe einfach das Programm gestartet, den Dialog "Ausführen" (Win+r) gestartet und "q" gedrückt.Es wurde sofort der Text eingefügt... Komisch.
Vllt. hast du nicht in den Texteditor geklickt? Ich versteh das sonst nicht.Ach so: vielleicht solltest du auch was zum Beenden hinzufügen?
Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <misc.au3>HotKeySet("{q}", "Schreiben2")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
HotKeySet("{w}", "Schreiben")
HotKeySet("{Esc}", "_Exit")Func Schreiben()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$c = "text"
ClipPut($c)
Sleep(100)
Send("^v")
EndFuncFunc Schreiben2()
[/autoit] [autoit][/autoit] [autoit]
$v = "text2"
ClipPut($v)
Sleep(100)
Send("^v")
EndFuncFunc _Exit ()
[/autoit] [autoit][/autoit] [autoit]
Exit
EndFuncWhile 1
[/autoit]
Sleep(100)
WendMfG Xenon
-
Wenn deine Frage nun beantwortet ist, dann setze den Thread doch bitte auf "gelöst",
indem du deinen ersten Beitrag bearbeitest.MfG Xenon
-
Wenn du die Namen einfach untereinander in eine Textdatei schreibst, als so:
"Test.txt"
Max
Peter
John
Karl
Dieter
Dann kannst du das so machen:Spoiler anzeigen
[autoit]Local $a = 1
[/autoit] [autoit][/autoit] [autoit]
Local $Name = ""$File = FileOpen ("Test.txt", 0) ;Datei zum Lesen öffnen
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Run("notepad.exe")WinWaitActive("[CLASS:Notepad]")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]While $a <= 5
[/autoit] [autoit][/autoit] [autoit]
$Name = FileReadLine ($File, $a) ; liest den Text aus Zeile $a
If @error Then ExitLoop ;falls Zeile nicht existiert, wird abgebrochen
send($Name) ; Namen sendensend("{ENTER}")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$a = $a + 1
WEndsleep (3000)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Send("!f")
Send("x")WinWaitActive("Notepad")
[/autoit] [autoit][/autoit] [autoit]
Send("n")WinWaitClose("[CLASS:Notepad]")
[/autoit] [autoit][/autoit] [autoit]FileClose ($File) ; Datei wieder schließen
[/autoit]MfG Xenon
-
Von mir auch noch: Herzlich Willkommen!
-
Cooles Spiel!
Da stimme ich voll und ganz zu.
-
Tolles Skript, Andy!
Hab's gerade getestet... Echt spitze! -
Vielleicht so:
[autoit]$BlankStat = FileOpenDialog("Datei öffnen", "G:\Ham_Änderung\AEND_2013_06_07_A400M\Orig" & "\", "Excel (*xls;*.xlsx)", 1+2)
[/autoit]
Grüße Xenon -
Vielen Dank !
-
-
Hallöchen liebe AutoIt-Gemeinde,
ich möchte mich hier auch mal kurz vorstellen:
Mein Nickname lautet Xenon, benannt nach dem Edelgas.
Ich wohne in Halle an der Saale (momentan Halle in der Saale wegen des Hochwassers ) und Programmiere schon seit einiger Zeit mit AutoIt und C++.
Da ich zufällig hier neulich auf dieses Forum gestoßen bin, habe ich mich jetzt hier angemeldet.