Hallo,
Hier mla eine kleine UDF von mir, mit der zwei AutoIt Scripte Daten austauschen können ![]()
habe direkt mal zwei kleine Testprogramme dazugepackt, damit ihr Sie sofort testen könnt. Habt ihr noch Verbesserungsvorschläge?
Würde mich über Feedback freuen ![]()
UDF
Spoiler anzeigen
#include <GUIConstantsEx.au3>
#NoTrayIcon
#cs
by Jonathan - http://www.autoit.de
Erklärung:
[/autoit] [autoit][/autoit] [autoit]Funktion senden:
senden($data,$name)
$data = zu verschickende Daten
$name = Name der Daten. möglichst ausgefallen, NUR buchstaben / KEINE Sonderzeichen & Leerzeichen !!!!!
Funktion empfangen:
empfangen($name[,$frei])
$name = der unter senden verwendete Datenname
$frei = Daten nach dem Empfangen freigeben / Löschen
#ce
Func senden($data,$name) ;Funktion um Daten zu Senden
[/autoit] [autoit][/autoit] [autoit]GUICreate($name) ; Erstellt ein GUI-Fenster um Daten Freizugeben
[/autoit] [autoit][/autoit] [autoit]GUICtrlCreateLabel($data, 10, 30)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]GUISetState(@SW_HIDE)
Do
$msg = GUIGetMsg()
Until $msg = $GUI_EVENT_CLOSE
EndFunc
[/autoit] [autoit][/autoit] [autoit]func empfangen($name,$frei) ; Funktion um Daten zu empfangen
[/autoit] [autoit][/autoit] [autoit]If $frei = True Then ; Wenn Daten nach dem Abrufen Freigegeben werden sollen.
$daten = ControlGetText($name,"",3); Daten abrufen
WinClose($name); Fenster schließen.
Freigabe
Else ; Wenn nur Daten abgerufen werden sollen
[/autoit] [autoit][/autoit] [autoit]$daten = ControlGetText($name,"",3);Daten abrufen
EndIf
Return($daten); Daten zurückgeben
[/autoit] [autoit][/autoit] [autoit]EndFunc
[/autoit]
Tesprogramm Senden:
Spoiler anzeigen
#include <scriptconnect.au3>
[/autoit] [autoit][/autoit] [autoit]$daten = "hallo welt" ; Sendende Daten festlegen
$name = "abcdefg" ; Datenname Festlegen, um Daten später wiederzufinden
senden($daten,$name) ; Daten Senden
[/autoit]TestProgramm Empfangen:
Spoiler anzeigen
#include <scriptconnect.au3>
[/autoit] [autoit][/autoit] [autoit]$name = "abcdefg" ; Der im Senden Testscript vorgegebene Name
[/autoit] [autoit][/autoit] [autoit];;;;;;;;;; Beispiel ;;;;;;;;;;;;;;
[/autoit] [autoit][/autoit] [autoit]$Daten = empfangen($name,True) ; Daten Abrufen, danach Daten freigeben
[/autoit] [autoit][/autoit] [autoit]MsgBox(64,"Empfangene Daten",$Daten)
[/autoit] [autoit][/autoit] [autoit];;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[/autoit]Und einmal als Downlaod für die ganz faulen angehängt ![]()