Mal in die Hilfe geschaut und die Parameter ausprobiert?
$FO_ANSI (512) = Use ANSI reading and writing mode.
Mal in die Hilfe geschaut und die Parameter ausprobiert?
$FO_ANSI (512) = Use ANSI reading and writing mode.
Hast du deinen Beispielcode mal in eine eigene Datei gepackt und geschaut was passiert? Da wirst du sehen, dass das kein Problem gibt...
Wenn du nicht gen ganzen Code posten kannst, kann dir niemand helfen. Laut dem Errorcode ist der Fehler offensichtlich, sofern du der englischen Sprache mächtig bist.
Formatierungsfehler.
Achso cron @reboot ging auch nicht
Was meinst du damit? Wenn du einen Eintrag in der Cron machst, ist der i.d.R. nicht nach einem neustart weg. Ich nutze die Cron eig. für alles was irgendwo zu Zeiten gestartet werden soll.
Sicherlich kann man den richtigen Input irgendwie zum Skript pipen, es liegt aber viel näher, einfach das Python-Skript anzupassen. Entweder kannst du die Zahleingaben fix im Skript speichern oder über die Aufrufparamater übergeben. So kannst du auch ohne Probleme sämtliche Startmechanismen verwenden.
Ich würde als erste Anlaufstelle die Eingaben via Parameter übergeben wollen, wie @chesstiger das beschrieben hat, solange es der Anwendungsfall das hergibt.
Immer gerne
Setzt du den Thread adnn noch auf gelöst?
Hallo AutoIt Gemeinde,
ich habe mein Notebook neu Aufgesetzt, Windows 10 aufgespielt sowie die aktuellste Version von AutoIt & Scite installiert. Nun habe ich das Problem das ich keine "Hilfe" mehr aufrufen kann. Weder per F1 Tastendruck, noch über das Menü ist es mir möglich die Hilfe aufzurufen. Hat hier jemand ähnliche Erfahrungen gemacht und kennt eine Lösung für dieses Problem?
Wär echt super wenn mir da jemand helfen könnte.
Besten Dank im Voraus!
Greetings
Horst
Hast du das Skript das aktuell offen ist gespeichert? Wenn du ein Skript offen hast, das noch nie gespeichert worden ist, geht die Hilfe via F1 nicht auf. Sobald du das aber gespeichert hast, funktioniert es normal einwandrei.
Danke soweit,
bin dabei das zu testen, ob ich das jedoch heute noch schaffe weiß ich nicht. MUeld mich dann spätestens morgen.
Update: Danke @Oscar das hat geklappt
Das wäre uncool, weil die Vorgabe vom Format in diesem Dingen auf jeden Fall am besten geeignet ist Stunden-Werte auszuwählen. Nur müssen diese Werte halt auch nach einem neustart wieder angezeigt werden
Hallo zusammen,
ich steh grad echt auf dem Schlauch
Ich habe diverse DateTimePicker und muss denen Werte zuweisen die aus einer Datenbank kommen, und dort auch wieder gespeichert werden können. GUICtrlSetDate klappt bei mir jedoch nicht, das Ergebnis ist nicht das erwartete Ergebnis.
#include <GUIConstantsEx.au3>
#include <GuiDateTimePicker.au3>
Example()
Func Example()
Local $hDTP
; Create GUI
GUICreate("DateTimePick Set Format", 400, 300)
$hDTP = GUICtrlGetHandle(GUICtrlCreateDate("", 2, 6, 190))
GUISetState(@SW_SHOW)
; Set the display format
_GUICtrlDTP_SetFormat($hDTP, "HH:mm")
GUICtrlSetData($hDTP, "08:00")
; Loop until the user exits.
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>Example
Alles anzeigen
Kann mir einer auf die Sprünge helfen?
Hab grad leider keine Zeit das zu testen, aber eine erste Idee die mir gekommen war ist:
Wenn du ein anderes Fenster aktiv schaltest, bedeutet das im Umkehrschluss, dass du dein AutoIt Fenster deaktivierst. Also nach dem Senden der Eingaben mal ein WinActive auf dein AutoIt Tool machen und dann sollte das gehen denke ich.
#Edit: Oder statt WinActive und Send mal versuchen via ControlSend zu arbeiten.
Freut mich wenn du das Problem lösen konntest
Alles anzeigenHi Yaerox,
1. Weil ImageSearch für mich als Änfanger einfacher zu bedienen ist.
und
2. Weil das Programm auf einem Server läuft und ich nicht die nötigen Informationen (Class und ControlID) auslesen kann.
Vielleicht habe ich auch einfach zu wenig wissen, wir ich es sonst lösen soll/kann, aber bis jetzt hat das mit ImageSearch super geklappt.
Gruß
Sirius
Aber hier stimme ich dir nicht zu. Etwas nicht-dokumentiertes zu nutzen weil es durch Rumprobieren ein erwartetes Ergebnis zeigt, ist meiner Meinung nach qualitativ eher minderwertiger, als ein Tool zu schreiben, dass auf einer grandiosen Dokumentation der Programmiersprache basiert. Besonders als Anfänger solltest du dich eher damit vertraut machen, wie die Dinge funktionieren, die du nutzt. Bei dem nächsten Problem stehst du sonst wieder da und musst da rumfrikeln bis es funktioniert. Ich würde dir davon abraten.
Wieso kannst du die Informationen nicht auslesen? Wenn du nun Bereiche mit ImageSearch vorher ausguckst und definieren kannst, kannst du dir auch vorher die entsprechenden Informationen der Controls besorgen. Ich habe schon mehrere Tools geschrieben die ebenso mit externen Tools arbeiten, und da gab es bislang auf keinem Server ein Problem.
Letzten Endes ist und bleibt es deine Entscheidung
Ich kann dir mit der UDF nicht helfen, da ich diese nie bis selten nutze. Ich kann eins nicht nachvollziehen, wieso ImageSearch? Vom Vorhaben mal ganz abgesehen, du möchtest etwas auslesen (Excel) und dann eine andere Anwendung bedienen. Wenn ich mir nun das Anwendungsfeld der Imagesearch UDF anschaue denke ich du bist auf dem falschen Weg.
Excel UDF zum auslesen, und zum Steuern einer anderen Anwendung ist in AutoIt doch alles native was du brauchst:
WinSetActive
ControlClick
ControlSend
...
lasse dann per ImageSearch die Klicks in dem Proragmm ausführen und füge dann die Daten in die einzelnen Felder ein.
Meiner Meinung nach ist die ImageSearch UDF nicht dafür gedacht. Wenn es einen Grund gibt wieso du es nicht wie üblich mit AutoIt lösen kannst, würde mich dieser ernsthaft interessieren.
Herzlich willkommen schnecke311 ,
ich bin mit nicht sicher ob du hier richtig bist ...
Dieses Forum dient zur Hilfe bei Problemen mit der Sprache "AutoIt". Aus deiner Frage geht mir entsprechend der Sprache AutoIt kein Problem hervor.
Davon ab denke ich, dass du wenn du ein Passwort benötigst, als rechtmäßiger Besitzer dieser Datei das Passwort kennen solltest.
Andernfalls glaube ich, wünscht du, dass dir jemand ein Tool schreibt mit dem du das Passwort "knacken" kannst? Denn das wird hier sicherlich niemand tun.
Edit:
aber das Programm fragt immer nach einem Passwort.
Was für ein Programm?
#Erster
Nach deinem "jetzt stürzt euch drauf" musste das jetzt sein
Hallo zusammen. Vielen Dank, Ihr habt mir alle weiter geholfen. Mars: deine Version ist sehr interessant, werde ich mal studieren, um alles zu verstehen!
Gruß
SiriusGesendet von meinem GT-I9505 mit Tapatalk
Denkst du daran, den Thread auf gelöst zu setzen, sofern du alles verstanden hast und es das Problem auch wirklich gelöst hat?
Cool, funktioniert tadellos!!!
Vielen dank!
Setzt du das Thema dann noch auf gelöst?
Gerne.
Weil deine If-Anweisungen vorher schon greifen, siehe hier:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <WinAPIShPath.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ###
$Form1 = GUICreate("Umbenennungs-Tool für Doku´s", 423, 495, 198, 124)
$Input1 = GUICtrlCreateInput("", 65, 24, 121, 21)
$Label1 = GUICtrlCreateLabel("Objekt-Nr.:", 8, 26, 55, 17)
$Input2 = GUICtrlCreateInput("", 264, 24, 121, 21)
$Label2 = GUICtrlCreateLabel("Jahr:", 229, 26, 27, 17)
$Checkbox1 = GUICtrlCreateCheckbox("Frühjahrswartung", 64, 56, 110, 17)
GUICtrlSetOnEvent(-1, "Checkbox1Click")
$Checkbox2 = GUICtrlCreateCheckbox("Herbstwartung", 64, 88, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox2Click")
$Checkbox3 = GUICtrlCreateCheckbox("Inspektion", 64, 120, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox3Click")
$Checkbox4 = GUICtrlCreateCheckbox("Jahreswartung", 64, 152, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox4Click")
$Checkbox5 = GUICtrlCreateCheckbox("RLT", 264, 375, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox5Click")
$Checkbox6 = GUICtrlCreateCheckbox("Heizung", 264, 184, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox6Click")
$Checkbox7 = GUICtrlCreateCheckbox("DDC", 264, 56, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox7Click")
$Checkbox8 = GUICtrlCreateCheckbox("MSR", 264, 344, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox8Click")
$Checkbox9 = GUICtrlCreateCheckbox("GLT", 264, 152, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox9Click")
$Checkbox10 = GUICtrlCreateCheckbox("Kälte", 264, 248, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox10Click")
$Checkbox11 = GUICtrlCreateCheckbox("Klima", 264, 312, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox11Click")
$Checkbox12 = GUICtrlCreateCheckbox("Elektro", 264, 120, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox12Click")
$Checkbox13 = GUICtrlCreateCheckbox("WVA", 264, 472, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox13Click")
$Checkbox14 = GUICtrlCreateCheckbox("KKL", 264, 280, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox14Click")
$Checkbox15 = GUICtrlCreateCheckbox("TWA", 264, 440, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox15Click")
$Checkbox16 = GUICtrlCreateCheckbox("EAB", 264, 88, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox16Click")
$Checkbox17 = GUICtrlCreateCheckbox("Hygiene", 264, 216, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox17Click")
$Checkbox18 = GUICtrlCreateCheckbox("Sanitär", 264, 408, 97, 17)
GUICtrlSetOnEvent(-1, "Checkbox18Click")
$oeffnen = GUICtrlCreateButton("Datei öffnen", 72, 328, 75, 25)
GUICtrlSetOnEvent(-1, "oeffnen")
$umbenennen = GUICtrlCreateButton("Umbenennen", 72, 368, 75, 25)
GUICtrlSetOnEvent(-1, "umbenennen")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox19 = GUICtrlCreateCheckbox("ergänzte Version", 64, 208, 97, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents")
Func SpecialEvents()
Select
Case @GUI_CtrlId = $GUI_EVENT_CLOSE
Exit
EndSelect
EndFunc ;==>SpecialEvents
Func Checkbox1Click()
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox2, $GUI_DISABLE)
GUICtrlSetState($Checkbox3, $GUI_DISABLE)
GUICtrlSetState($Checkbox4, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox2, $GUI_ENABLE)
GUICtrlSetState($Checkbox3, $GUI_ENABLE)
GUICtrlSetState($Checkbox4, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox2Click()
If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox1, $GUI_DISABLE)
GUICtrlSetState($Checkbox3, $GUI_DISABLE)
GUICtrlSetState($Checkbox4, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($Checkbox3, $GUI_ENABLE)
GUICtrlSetState($Checkbox4, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox3Click()
If GUICtrlRead($Checkbox3) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox1, $GUI_DISABLE)
GUICtrlSetState($Checkbox2, $GUI_DISABLE)
GUICtrlSetState($Checkbox4, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($Checkbox2, $GUI_ENABLE)
GUICtrlSetState($Checkbox4, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox4Click()
If GUICtrlRead($Checkbox4) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox1, $GUI_DISABLE)
GUICtrlSetState($Checkbox2, $GUI_DISABLE)
GUICtrlSetState($Checkbox3, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($Checkbox2, $GUI_ENABLE)
GUICtrlSetState($Checkbox3, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox5Click()
If GUICtrlRead($Checkbox5) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox6Click()
If GUICtrlRead($Checkbox6) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox7Click()
If GUICtrlRead($Checkbox7) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox8Click()
If GUICtrlRead($Checkbox8) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox9Click()
If GUICtrlRead($Checkbox9) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox10Click()
If GUICtrlRead($Checkbox10) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox11Click()
If GUICtrlRead($Checkbox11) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox12Click()
If GUICtrlRead($Checkbox12) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox13Click()
If GUICtrlRead($Checkbox13) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox14Click()
If GUICtrlRead($Checkbox14) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox15Click()
If GUICtrlRead($Checkbox15) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox16Click()
If GUICtrlRead($Checkbox16) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox17Click()
If GUICtrlRead($Checkbox17) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox18, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox18, $GUI_ENABLE)
EndIf
EndFunc
Func Checkbox18Click()
If GUICtrlRead($Checkbox18) = $GUI_CHECKED Then
GUICtrlSetState($Checkbox5, $GUI_DISABLE)
GUICtrlSetState($Checkbox6, $GUI_DISABLE)
GUICtrlSetState($Checkbox7, $GUI_DISABLE)
GUICtrlSetState($Checkbox8, $GUI_DISABLE)
GUICtrlSetState($Checkbox9, $GUI_DISABLE)
GUICtrlSetState($Checkbox10, $GUI_DISABLE)
GUICtrlSetState($Checkbox11, $GUI_DISABLE)
GUICtrlSetState($Checkbox12, $GUI_DISABLE)
GUICtrlSetState($Checkbox13, $GUI_DISABLE)
GUICtrlSetState($Checkbox14, $GUI_DISABLE)
GUICtrlSetState($Checkbox15, $GUI_DISABLE)
GUICtrlSetState($Checkbox16, $GUI_DISABLE)
GUICtrlSetState($Checkbox17, $GUI_DISABLE)
Else
GUICtrlSetState($Checkbox5, $GUI_ENABLE)
GUICtrlSetState($Checkbox6, $GUI_ENABLE)
GUICtrlSetState($Checkbox7, $GUI_ENABLE)
GUICtrlSetState($Checkbox8, $GUI_ENABLE)
GUICtrlSetState($Checkbox9, $GUI_ENABLE)
GUICtrlSetState($Checkbox10, $GUI_ENABLE)
GUICtrlSetState($Checkbox11, $GUI_ENABLE)
GUICtrlSetState($Checkbox12, $GUI_ENABLE)
GUICtrlSetState($Checkbox13, $GUI_ENABLE)
GUICtrlSetState($Checkbox14, $GUI_ENABLE)
GUICtrlSetState($Checkbox15, $GUI_ENABLE)
GUICtrlSetState($Checkbox16, $GUI_ENABLE)
GUICtrlSetState($Checkbox17, $GUI_ENABLE)
EndIf
EndFunc
Func oeffnen()
Global $code = FileOpenDialog("Wähle eine Datei aus!",@StartupDir, "(*.xlsx;*.xls;*.xlsm;*.pdf)",1 + 2)
Global $aFile = StringSplit($code, "|", 1)
Global $folder = _WinAPI_PathRemoveFileSpec($aFile[1])
If IsString($folder) Then GUICtrlSetState($umbenennen, $GUI_ENABLE)
EndFunc
Func umbenennen()
Global $Objektnr = GUICtrlRead($Input1)
Global $Jahr = GUICtrlRead($Input2)
;RLT
If GUICtrlRead($Checkbox1) = $GUI_CHECKED And GUICtrlRead($Checkbox5) = $GUI_CHECKED And GUICtrlRead($CheckBox19) = $GUI_UNCHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Frühjahrswartung_" & "RLT_" & $Jahr & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox2) = $GUI_CHECKED And GUICtrlRead($Checkbox5) = $GUI_CHECKED And GUICtrlRead($CheckBox19) = $GUI_UNCHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Herbstwartung_" & "RLT_" & $Jahr & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox3) = $GUI_CHECKED And GUICtrlRead($Checkbox5) = $GUI_CHECKED And GUICtrlRead($CheckBox19) = $GUI_UNCHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Inspektion_" & "RLT_" & $Jahr & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox4) = $GUI_CHECKED And GUICtrlRead($Checkbox5) = $GUI_CHECKED And GUICtrlRead($CheckBox19) = $GUI_UNCHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Jahreswartung_" & "RLT_" & $Jahr & ".pdf" & @CRLF)
;ergänzte Version RLT
ElseIf GUICtrlRead($Checkbox1) = $GUI_CHECKED And GUICtrlRead($Checkbox5) And GUICtrlRead($Checkbox19) = $GUI_CHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Frühjahrswartung_" & "RLT_" & $Jahr & "_ergänzte Version" & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox2) = $GUI_CHECKED And GUICtrlRead($Checkbox5) And GUICtrlRead($Checkbox19) = $GUI_CHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Herbstwartung_" & "RLT_" & $Jahr & "_ergänzte Version" & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox3) = $GUI_CHECKED And GUICtrlRead($Checkbox5) And GUICtrlRead($Checkbox19) = $GUI_CHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Inspektion_" & "RLT_" & $Jahr & "_ergänzte Version" & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox4) = $GUI_CHECKED And GUICtrlRead($Checkbox5) And GUICtrlRead($Checkbox19) = $GUI_CHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Jahreswartung_" & "RLT_" & $Jahr & "_ergänzte Version" & ".pdf" & @CRLF)
EndIf
;Heizung
If GUICtrlRead($Checkbox1) = $GUI_CHECKED And GUICtrlRead($Checkbox6) = $GUI_CHECKED And GUICtrlRead($CheckBox19) = $GUI_UNCHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Frühjahrswartung_" & "Heizung_" & $Jahr & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox2) = $GUI_CHECKED And GUICtrlRead($Checkbox6) = $GUI_CHECKED And GUICtrlRead($CheckBox19) = $GUI_UNCHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Herbstwartung_" & "Heizung_" & $Jahr & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox3) = $GUI_CHECKED And GUICtrlRead($Checkbox6) = $GUI_CHECKED And GUICtrlRead($CheckBox19) = $GUI_UNCHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Inspektion_" & "Heizung_" & $Jahr & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox4) = $GUI_CHECKED And GUICtrlRead($Checkbox6) = $GUI_CHECKED And GUICtrlRead($CheckBox19) = $GUI_UNCHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Jahreswartung_" & "Heizung_" & $Jahr & ".pdf" & @CRLF)
;ergänzte Version Heizung
ElseIf GUICtrlRead($Checkbox1) = $GUI_CHECKED And GUICtrlRead($Checkbox6) And GUICtrlRead($Checkbox19) = $GUI_CHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Frühjahrswartung_" & "Heizung_" & $Jahr & "_ergänzte Version" & ".pdf" & @CRLF)
ElseIF GUICtrlRead($Checkbox2) = $GUI_CHECKED And GUICtrlRead($Checkbox6) And GUICtrlRead($Checkbox19) = $GUI_CHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Herbstwartung_" & "Heizung_" & $Jahr & "_ergänzte Version" & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox3) = $GUI_CHECKED And GUICtrlRead($Checkbox6) And GUICtrlRead($Checkbox19) = $GUI_CHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Inspektion_" & "Heizung_" & $Jahr & "_ergänzte Version" & ".pdf" & @CRLF)
ElseIf GUICtrlRead($Checkbox4) = $GUI_CHECKED And GUICtrlRead($Checkbox6) And GUICtrlRead($Checkbox19) = $GUI_CHECKED Then
ConsoleWrite($folder & "\" & $Objektnr & "_Jahreswartung_" & "Heizung_" & $Jahr & "_ergänzte Version" & ".pdf" & @CRLF)
EndIf
EndFunc
While 1
Sleep(200)
WEnd
Alles anzeigen
Wenn du ein mal Umbenennen klickst, gibt er dir 2 Zeilen Code aus. Bei einem Filemove bedeutet das, dass die Datei umbenannt wird in *rtl* ... Dann existiert die alte nich mehr, und somit kann der zweite BEfehl nicht erfolgreich durchgeführt werden.
Tipp: Error handling einbauen. Vereinfacht auch oft das Debugging.
So?
HotKeySet("{F9}", "_Start")
HotKeySet("{F10}", "_Stop")
HotKeySet("{F11}", "_Exit")
Local $iStop = 0
While (1)
Sleep(500)
WEnd
Func _Start()
$iStop = 0
While (1)
Send("{1}")
Sleep(1200)
If $iStop = 1 Then Return 1
WEnd
EndFunc
Func _Stop()
$iStop = 1
EndFunc
Func _Exit()
Exit
EndFunc
Alles anzeigen
Wie gesagt, das Problem war die Funktion wie ich den Barcode-Scanner ausgelesen habe ... habe da eine Funktion mit der RawInput.au3 genutzt die ich in der Vergangenheit mal geschrieben habe. Das Problem tritt nicht auf, wenn ich die gescannten Informationen einfach native in die Controls schreiben lasse. hab es nun gelöst.
Sry für den panik-post, aber das war wichtig und eilig das das heute fertig wird "-.-
Hallo zusammen,
ich habe ein kleines problem. Habe ein Skript mit dem ich Barcode-Scanner-Eingaben verarbeiten möchte. Derzeitiger Stand ist, dass das einlsen funktioniert, ich allerdings einige Probleme mit Steuerzeichen habe.
Steuerzeichen werden mir nur in der AutoIt Konsole angezeigt, nicht im Notepad++. Ich habe die Steuerzeichen hier in eckige Klammern [] geschrieben.
Barcode: 012345 678 910
Notepad++: 012345 678 910
AutoIt: J[DC1]012345 678 910
Barcode: 012345 678 910A
Notepad++: 012345 678 910A
AutoIt: J[DC1]012345 678 910[DLE]
Herausgefunden habe ich:
DC1 = CTRL
DLE = SHIFT
Ich nutze grundästzlich:
- German
- Full ASCII
- Code 32
- Code 93
- Code 11
Bar Code ID "With this function ON, a leading character will be added to the output string..." ist es nicht. Das wäre ein zusätzliches E als führendes Zeichen. Das hatte ich bereits ausprobiert.
Ich verzweifel langsam. Jemand eine Idee? Nutze einen Manhattan Barcode Scanner.
Update: Aufgabe hat sich geändert. Das Problem war die Funktion wie ich den Barcode-Scanner ausgelesen habe ... habe da eine Funktion mit der RawInput.au3 genutzt die ich in der Vergangenheit mal geschrieben habe. Das Problem tritt nicht auf, wenn ich die gescannten Informationen einfach native in die Controls schreiben lasse. Hier muss ich jetzt jedoch Enter und Tab abfangen. Enter ist ja noch einfach ... in der While-Schleife ein Case $MSG = $input, aber wie fange ich so ein TAB ab?