#include <FileConstants.au3>
#include <MsgBoxConstants.au3>
#NoTrayIcon
TRAYCL01()
Func TRAYCL01()
$TRAYCL01 = FileRead ("4CL01.txt") ; Check if file opened for reading OK
If $TRAYCL01 = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
Sleep(300)
clipput ($TRAYCL01)
Sleep(300)
Send("^v")
ControlSend("", "", "", ".", 0)
EndFunc ;==>FileCreateSpot the difference, TD