Ein freundliches Hallo !
Habe mit autoit frisch angefangen, mir ein paar Zeilen bereits zusammenkopiert und stehe vor meinem ersten Problem.
Die Prozedur wechselt in ein MS Access Formular, über Send("{TAB}") ein bestimmtes Formularfeld angesteuert.
Der Inhalt dieses Feldes ist dann markiert und soll an eine Variable weitergegeben werden:
$bak = ClipGet()
Das funktioniert nur leider nicht.
Würde mich über einen Tipp sehr freuen.
LG
Fabian
Dim $bak
Example()
Func Example()
; Retrieve a list of window handles.
dim $x
Local $aList = WinList()
$x = 0
; Loop through the array displaying only visable windows with a title.
For $i = 1 To $aList[0][0]
If $aList[$i][0] <> "" And BitAND(WinGetState($aList[$i][1]), 2) Then
if StringInStr($aList[$i][0],"KAO") > 0 then
$x = 1
ExitLoop 1
endif
;MsgBox($MB_SYSTEMMODAL, "", "Title: " & $aList[$i][0] & @CRLF & "Handle: " & $aList[$i][1])
EndIf
Next
;KAO-Datenbankfenster gefunden
if $x = 1 Then
WinActivate ("Microsoft Access - KAO-2014")
Sleep(1500)
Send("{HOME}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Sleep(1500)
$bak = ClipGet()
MsgBox(0, "Clipboard contains:", $bak)
MsgBox ("Info","", $x)
Else
MsgBox ("Info", "", "Konnte die Datenbank nicht finden")
EndIf
exit
EndFunc ;==>Example