Beiträge von autoBert

Zitat von mirko2002

Die Monatsauswahl klappt bei mir leider nicht. Das DropDown bleibt einfach leer - obwohl ich kein Fehler im Source ausmachen kann.

liegt evtl. an deiner AutoItversion.

Zitat von mirko2002

Ebenfalls bin ich grad überfragt, welcher Codeschnipsel die Sonntage raus"rechnet"... ich habe nicht dafür gefunden, was dies kalkuliert

mit dieser (zweigeteilten) Zeile

If _DateToDayOfWeek($iJahr, $iMonat, $i) <> 1 Then _
				GUICtrlSetData($iID, $i & '.' & $iMonat & '.' & $iJahr)

Zitat von TrueVision

Wenn ich es mit StringRegExp mache bekomme ich immer nur den Ersten titel

Zeig dein Skript, damit man sehen kannst wo dein Fehler liegt, denn StringRegExp kennt Flag's die ein Array zurück gegeben.

Hier ein kleines Beispielskript:

#include <GUIConstantsEx.au3>
#include <Date.au3>
#include <GuiComboBox.au3>


Global $hGui, $iJahr, $iMonat


_Example()
Func _Example()
	$hGui = GUICreate("Kalender Test", 180, 180)
	Local $idCboJahr = GUICtrlCreateCombo('', 5, 5, 170)
	Local $idCboMonat = GUICtrlCreateCombo('', 5, 30, 170)
	Local $idCboTag = GUICtrlCreateCombo('', 5, 55, 170)
	Local $idBtnOK = GUICtrlCreateButton("&OK", 5, 150, 170, 25)
	_InitJahr($idCboJahr)
	_InitMonat($idCboMonat)
	_InitTag($idCboTag)
	GUISetState(@SW_SHOW)


	While 1
		$nMsg = GUIGetMsg()
		Switch $nMsg
			Case $GUI_EVENT_CLOSE
				Exit
			Case $idCboJahr, $idCboMonat
				$iJahr=GUICtrlRead($idCboJahr)
				$iMonat=_GUICtrlComboBox_GetCurSel($idCboMonat)+1
				_InitTag($idCboTag)
		EndSwitch
	WEnd
EndFunc   ;==>_Example


Func _InitJahr($iID)
	For $i = @YEAR - 2 To @YEAR + 5
		If $i = @YEAR Then
			GUICtrlSetData($iID, $i, $i)
		Else
			GUICtrlSetData($iID, $i)
		EndIf
	Next
	$iJahr = @YEAR
EndFunc   ;==>_InitJahr


Func _InitMonat($iID)
	For $i = 1 To 12
		$sMon = _DateToMonth($i, 2)
		If $i = @MON Then
			GUICtrlSetData($iID, $sMon, $sMon)
		Else
			GUICtrlSetData($iID, $sMon)
		EndIf
	Next
	$iMonat = @MON
EndFunc   ;==>_InitMonat


Func _InitTag($iID)
	GUICtrlSetData($iID,"","")
	$iTage = _DateDaysInMonth($iJahr, $iMonat)
	For $i = 1 To $iTage
		If _DateToDayOfWeek($iJahr, $iMonat, $i) <> 1 Then _
				GUICtrlSetData($iID, $i & '.' & $iMonat & '.' & $iJahr)
	Next
EndFunc   ;==>_InitTag

enthält alles (warscheins etwas zuviel) was du brauchst.

Dein Rechner müßte ersteinmal erklärt werden. Ich kann jedenfalls kein int, round oder stringfunktion finden, die für das abrunden verantwortlich sein sollte. Das ganze kommt mir spanisch vor: aus 1200 Brutto wird 13584.90566 monatlich netto. Da müßte man erst Versicherungsmathematik studieren um das zu begreifen. Soviel Zeit hast du sicher nicht, bis einer von uns ein solches Studium abgeschlossen hat. Also mußt du wohl alleine deine(n) Fehler suchen.

Zitat von xSunLighTx3

Eine Datei mit unbekannter Endung starten.

Bei Shellexecute("Datei") oder einer anderen unbekannten Endung
funktioniert das ja leider nicht.

Bei Run("Datei") ging das aber immer bis jetzt.D

Die in Win ehemals integrierte Glaskugel ist seit kurzem in Rente!

Daher must du das Programm selbst bennenen mit dem die Datei geöffnet werden soll.

Ihr habt die Daten doch sicher in einer DB. Damit wäre es wohl am einfachsten möglich. Ansonsten schau dir alle Control* Funktionen an wie z.B.:

ControlSend

damit ist eine zuverlässigere Steuerung möglich.

Zitat von Eidli

Auch wäre es für mich allgemein sehr hilfreich, wenn ich ein Skript im Hintergrund in einem minimierten Fenster laufen lassen und dabei normal weiterarbeiten könnte.

das geht mit PixelgetColor schon mal gar nicht. Wo kein Fenster sichtbar, werden auch keine Pixels in irgenwelchen Farben gezeichnet.
Mit der Skype UDF dagegen sollte es möglich sein. Vor allem ist diese Art der Steuerung zuverlässiger.

Ich denke einfach, daß das Infosystem etwas dagegen hat das seine Daten auf diese Art und Weise benutzt werden.

Bis eine URL bzw die App genannt ist gehe ich von einem Verstoß gegen die Forenregeln aus und habe daher den Startbeitrag deaktiviert. Bitte mit ScreenShot, Daten vom Au3-Infotool o.ä. belegen bzw. warten bis ein Mod den Beutrag wieder freischaltet.

Letzteres hoffe ich allerdings nicht. Denn ein Apothekenprogramm sollte sinnvolle Werkzeuge besitzen um auf solch unzuverlässige Steuerung (Maus- Schubserei und Klocherei) verzichten zu können.

Zitat von Lanealine

hmm.. das ganze script ist etwas lang um es hier zu posten. der fehler passiert aber genau in diesen funktionen.

ich sagte ja nicht du sollst dein Originalscript posten. Wenn du ea aber nicht schaffst ein Skript bereitszustellen, daß den Fehler produziert, wie soll dir dann jemand helfen? Denn eines bin ich mir sicher FileExists arbeitet richtig. Muß der Fehler also woanders liegen, ich tippe auf Logik.

Übbrigens meist findet man bei dem Versuch ein (möglichst kleines, lauffähiges) Skript zu schreiben, welches den Fehler produziert, selbst den Fehler.

Du könntest natürlich auch Singleton dazu verwenden. Einfach beide Skripte mit dem gleichen "einmaligen Namen" = $sOccurenceName testen. Dann funktionieren beide Skripte nach dem:

Zitat von Highländer Prinzip

Es kann nur einen geben.

Wenn ich Software anbieten würde und die Gewissheit haben möchte, daß jeder Anwender die Eula mit Haftungsfreistellung akzeptiert, würde ich Registrierungspflicht (10 Tage Zeit) einführen und dafür Hardwareinformationen des Nutzers einholen. Nach Registrierung erhält er eine Bestätigungsemail mit seinem Lizenzschlüssel, unregistrierte Versionen beenden sich automatisch.
Wollte ich absolute Kontrolle würde ich Teile ein(ig)er Zeile(n) des Skriptes des Skriptes auf eine Webseite auslagern und bei der Ausführung einbinden.
Den 2. Punkt stehe allerdings selbst kritisch gegenüber, den ein Skript das ohne Internetverbindung nicht funktioniert lehne ich selbst auch ab.

Zitat von Lanealine

die funktion ist sehr simple aufgebaut

stimmt die beiden Funktionen:

Zitat von Lanealine

Code

Func Arbeitet()
While 1
If Not FileExists($DirArbeitet) Then
FileWrite($DirArbeitet, "")
Return
EndIf
WEnd
EndFunc


Func Fertig()
FileDelete($DirArbeitet)
EndFunc

Alles anzeigen

sind sehr simpel. Der Fehler liegt also woanders. Ohne ein lauffähiges Skript, daß diesen Fehler produziert kann man nur die befragen. Meine sagt vielleicht solltest du SIngleTon benutzen um nur eine Instanz zu zu lassen.

Zitat von Code-Jack

Etwas viel Arbeit, für nur einmalige Anwendung und für lau. Der Fotograf will eigentlich nur mal schnell auf bestimmte Bilder zugreifen können, ohne viel Zirkus. So wie es jetzt ist, nützt ihm meine Datenrettung "goa nix".

Für lau muß er nehmen was er bekommt, sprich sich selber hinsetzen und die Dateien manuel verschieben. Besser 465.000 unsortierte Bilder als gar keine.

Zitat von Code-Jack

Hier nun das einsatzbereite Script:

Dann kann er ja jetzt automatisiert verschieben.

Zitat von alpines

@autoBert Die Bezeichnung $sRes ist falsch, da du ein Array hast und keinen String, treffender wäre $aRes oder $as_Res gewesen.

Stimmt, da habe ich geschludert.

Zitat von alpines

Du vernachlässigst die Tatsache das der Output der Email-Datei komplett anders aussehen kann. Was ist wenn der Check failed und da kein OK steht?

Dann wurde die vom TE definierte Bedingung nicht erfüllt, und wer sagt denn das auf OK gecheckt werden muß?. Bei meiner Lösung nicht:

#include <String.au3>
$sEmail = 'eMail-Delay=6.67 OK - Login and Email successfull in 8 seconds, eMail-Delay 6.67 seconds'
$sRes=_StringBetween($sEmail,", eMail-Delay","seconds")
MsgBox(0,'Ergebnis', $sRes[0])

und falls irgendwann einmal der EMail-Client das Ausgabeformat ändert, muß deine Lösung genauso wie meine angepasst werden. Ob der TE bis dahin RegEx gelernt hat, weiß ich nicht. Aber die Parameter für _StringBetween anpassen, sollte er schaffen.

Ich verstehe zwar nicht warum du deine GUI mit AutoIt machen willst, mit VBA in Access hast du doch auch die möglichkeit dies zu tun. Mit

Zitat von mLipok

I want to present BETA Version of my ADO.au3 UDF. This is modifed version of _sql.au3 UDF. For that I want to thanks...

• 85 replies

sollte die Verbindung zu Access möglich sein,

Ich habe nur auf die Funktionalität der Tasten geachtet, diese ist bei mir bei bei 32- und 64-Bit compilaten gegeben. Allerdings jetzt, da Bazii mich darauf aufmerksam gemacht hat, das Textfeld wird bei mir im 64-Bit Compilat auch nicht upgedatet.

Läuft bei mir auch als 64bit EXE. AutoIt 3.3.14.2 und Win 10 x64.Welches OS u. AutoItversion benutzt du.
Übrigens du benutzt PrgInfo_UDF.au3, diese muste ich auskommentieren. Kannst du sie bitte dem Eröffnungspost anhängen.

wenn du die Skype.au3 verlinkst steigen deine Aussichten auf nützliche Antworten.

Zitat von alpines

.a3x ist sowas wie ein kompiliertes Script aber nur lauffähig auf Rechnern mit AutoIt installiert.

Zitat von Helpfile

AutoItX is a DLL version of AutoIt v3 that provides a subset of the features of AutoIt via an ActiveX/COM and DLL interface. This means that you can add AutoIt-like features to your favourite scripting and programming languages, e.g. VB, VBScript, Delphi, C, C++, Kixtart, and most other languages that support the use of DLLs.

Zitat von alpines

Du verwechselt da was autoBert. Er spricht nicht von AutoItX (die .DLL für andere Sprachen) sondern von .a3x

Ok wieder etwas gelernt, ich dachte bisher immer das AutoItX die *.a3x files erzeugt zum einbinden. Muß wirklich AutoIt installiert sein, oder kann es aus auch aus einer mit AutoIt erzeugten EXE gestartet werden?

Zitat von alpines

.a3x ist sowas wie ein kompiliertes Script aber nur lauffähig auf Rechnern mit AutoIt installiert.

Zitat von Helpfile

AutoItX is a DLL version of AutoIt v3 that provides a subset of the features of AutoIt via an ActiveX/COM and DLL interface. This means that you can add AutoIt-like features to your favourite scripting and programming languages, e.g. VB, VBScript, Delphi, C, C++, Kixtart, and most other languages that support the use of DLLs.