Beiträge von peethebee

Hallo!

Danke erst mal für deinen Test!

Zitat

Original von th.meger
Hi,

ich habe gerade mal die Version 0.92 geöffnet.

1. Terminanlage bis 0 Uhr verursacht einen Termin am Folgetag von 0-0 Uhr.
Soll das so?

Muss ich noch beheben, sollte nicht so sein. Er wird es wohl in Zukunft auf 23:59 zurücksetzen und damit den Beginn des neuen Tages verhindern.

Zitat

2. Der Kalender auf der Startseite wird bei 1024*768 und XP SP1 zu klein dargestellt.

Scheinbar hast nur du das Problem. Schwester hat es mit der gleichen Auflösung nicht. Update auf SP2 möglich? vielleicht wurde das Control da verändert...

Zitat

3. Ich hätte gern in der Tages-u. Wochenansicht Buttons zum Blättern. (vor /zurück)

Mal sehen, wann, aber sollte kein Problem sein.

Zitat

4. Wochenansicht Start flackert

Habe ich noch nicht vermeiden können. Vielleicht hat ja jemand einen Tipp!?

Zitat

5. Statuszeile : Insgesamt 40 Termine angelegt

PlugIn oder später. Ist ja nur eine Zeile SQl jeweils, aber da will jeder was anderes an Statistiken.

Zitat

6. Gehe zu Datum Funktion

in 0.93 dabei.

Zitat

7. Wiederkehrender Termin sollte wiederholender Termin heißen

wieso? klingt für mich etwas hölzern. Wie heißt es in Outlook?

Zitat

8. Wiederholende Termine, die in der Vergangenheit angelegt werden mit Alarm, sollten nicht für alle vergangenen Termine einen Alarm erzeugen.
(Geburtstagsfunktion)

Die Geburtstagssachen -> PlugIn, Alarme in der Vergangenheit evtl. behebbar, aber in diesem Fall auch User-Fehler.

Zitat

Mehr beim Nächsten mal.

So long,

Mega

peethebee

Leider kann ich das Programm nicht ausführen. Ist das RemoteDesktop?
Habe WinXP home SP2.

peethebee

Ja, mit SQLite ist das eigentlich eine gute Chance. SQL als Verbindungssprache ist bei einfachen Sachen recht einfach, dennoch sind sehr detaillierte Abfragen möglich. Da alles in C realisert ist, ist es pfeilschnell und damit die optimale Alternative zu purem AutoIt bei größeren Datenmengen.
Zusammen mit jonk habe ich eine Funktion _DoSQL geschrieben, der man nur noch die entsprechende SQL-Zeile übergeben muss. Dann bekommt man ein Array mit den Suchergebnissen zurück. Diese Funktion ist auch oben verwendet.

Also, pack es an!

peethebee

Hallo!

Zitat

StringSplit ( "string", "delimiters" [, flag ] )

Parameters

string The string to evaluate.
delimiters One or more characters to use as delimiters.
flag [optional] If flag is 0 (the default), then each character in the delimiter string will mark where to split the string. If flag is 1, then the entire delimiter string is needed to mark the split.

Sorry, hatte gerade nur die englische Hilfe da, dafür aber aktuell.
Du brauchst also den Paramter flag mit dem Wert 1.

peethebee

Meine Version:

#include <array.au3>
#include <file.au3>
#include <Date.au3>


$filename = "C:\ipconfig.txt"
$source_filename = "C:\macs.txt"




; Macs auslesen
RunWait(@ComSpec & " /c ipconfig /all > " & $filename, "", @SW_HIDE)
Dim $array
_FileReadToArray($filename, $array)
$text = _ArrayToString($array, ";")
$macs = StringRegExp($text, ":\s((?:\A\A-){5}\A\A);", 3)
_ArrayDisplay($macs, "Macs")


; Macs vergleichen
Dim $filearray
_FileReadToArray($source_filename, $filearray)
For $i = 1 To UBound($filearray) - 1
	$filearray_splitted = StringSplit($filearray[$i], ":")
	For $j = 0 To UBound($macs) - 1
		If $filearray_splitted[3] = $macs[$j]Then
			; Benutzernamen checken
			If $filearray_splitted[1] <> _hash(InputBox("Benutzername", "Benutzernamen eingeben:")) Then
				MsgBox(0, "Benutzername inkorrekt", "Sie haben einen falschen Benutzernamen eingegeben!")
				Exit
			EndIf
			; Passwort checken
			If $filearray_splitted[2] <> _hash(InputBox("Passwort", "Passwort eingeben:", "", "*")) Then
				MsgBox(0, "Passwort inkorrekt", "Sie haben ein falsches Passwort eingegeben!")
				Exit
			EndIf
			; Ablauf checken
			If _DateDiff("D", _NowCalcDate(), $filearray_splitted[4]) < 0 Then
				MsgBox(0, "Abgelaufen", "Ihr Account ist abgelaufen!")
				Exit
			EndIf
		EndIf
	Next
Next


; temporäre Datei löschen
FileDelete($filename)




Func _hash($_hash_string)
	; Testfunktion, die nicht hashed
	Return $_hash_string
EndFunc   ;==>_hash

peethebee

p.s. 3:1 für bernd

bernd: dabei habe extra ne 1/2 Stunde gewartet ob jemand antwortet bevor ich mit meiner Lösung angefangen habe!

Muss der User User/Pass eingeben? Per Inputbox, oder wie?
Sonst habe ich ja nichts zum gegenchecken...

peethebee

Wo kommen Username und Passwort her?
Und wieso stehen die scheinbar im Klartext in der Datei?

peethebee

Zitat

mit unseren zu Vergleichen

Dann könntet ihr ja an euren arbeiten, oder sehe ich das falsch?

Außerdem kann man den Autor nett (!) fragen, ob er den Source (gegen Geld?) herausgibt. Sonst gibt es keine Möglichkeit.

peethebee

Hast du eine Leerzeile unten in deiner MAC-Adressen-Datei?

peethebee

Nein, sie ist echt - glaube ich bestätigen zu können

peethebee
p.s. er denkt sicher was falsches über uns, Schwester. Naja, egal, ist nicht so...

:willkommen:

Meines Wissens bist du der erste Schweizer hier...
*duck* - gibt bestimmt gleich eine böse Antwort

peethebee

Antwore kommt gleich, ist ja z.T. mein Skript

Edit:

#include <array.au3>
#include <file.au3>


$filename = "C:\ipconfig.txt"
$source_filename = "C:\macs.txt"


Global $found = ""


; Macs auslesen
RunWait(@ComSpec & " /c ipconfig /all > " & $filename, "", @SW_HIDE)
Dim $array
_FileReadToArray($filename, $array)
$text = _ArrayToString($array, ";")
$macs = StringRegExp($text, ":\s((?:\A\A-){5}\A\A);", 3)
_ArrayDisplay($macs, "Macs")


; Macs vergleichen
Dim $filearray
_FileReadToArray($source_filename, $filearray)
;~ _ArrayDisplay($filearray, "filearray")
For $i = 1 To UBound($filearray)-1
$filearray_splitted = StringSplit($filearray[$i], ":")
For $j = 0 To UBound($macs)-1
If $filearray_splitted[3] = $macs[$j] Then
$found = $macs[$j]
ExitLoop
EndIf
Next
Next


; Ausgabe
If $found <> "" Then
MsgBox(0, "MAC-Adresse gefunden", "Ihre MAC-Adresse wurde gefunden ("&$found&")")
Else
MsgBox(0, "MAC-Adresse nicht gefunden", "Ihre MAC-Adresse wurde nicht gefunden.")
EndIf


; temporäre Datei löschen
FileDelete($filename)

Es fehlte zweimal das -1 bei den Ubounds. Außerdem habe ich die Ausgabe wieder so gebaut, dass er auch sagt, wenn er nichts gefunden hat. Bei Fund zeigt er die entsprechende MAC-Adresse an (allerdigns max. eine).

peethebee

peethebee

Bei WinWait kannst du eine Zeit angeben, die er mmaximal auf ein Fenster wartet. Dann wäre diese zeit halt entweder für das Fenster, sonst passiert einfach nichts.
Wenn du uns sagst, wie es weitergeht, gibt es möglicherweise elegantere Lösungen.

...
If WinWait("IBM DB2 Performance Expert V2 Setup", "Text...", 10) Then
WinActivate("IBM DB2 Performance Expert V2 Setup", "Text...")
WinWaitAcvtive("IBM DB2 Performance Expert V2 Setup", "Text...")
Send("{ENTER}")
EndIf
...
Exit

peethebee

Hilft ByRef evtl. etwas vor den Parametern in der Funktionsdeklaration?

peethebee

Send("!j") <- sendet Alt + j!

peethebee

Edit: Punkt für Bernd... 2:1 oder so.

erstens kannst du versuchen, ob die @GUI_CTRLID auch in deiner Kopierfunktion aktualisiert wird

zweitens könntest du in deiner Kopierfunktion eine Dateiiliste anlegen und die Funktion dann beenden. Dann könntest du in der While-Schleife checken, ob es was zu kopieren gibt, wenn ja eine Datei kopieren und aus der Liste löschen. Dann wird die Nachricht vom Abbrechen-Button verarbeitet und danach die nächste Datei aus der Liste kopiert.

peethebee

@DJMANU:
Sorry, aber ich muss das jetzt mal loswerden: Du hast doch noch mindestens 3 andere (z.T. eigene) Projekte, an denen du mitwirken willst. Mach doch erst mal die fertig, sonst kommst du nie zu was. Es gibt ja noch einiges zu tun, z.B. hier (Installations-Assistent).

peethebee

also:

Run('RunDll32 C:\PROGRA~1\GEMEIN~1\INSTAL~1\PROFES~1\RunTime\0701\Intel32\Ctor.dll,Launch
Setup "C:\Programme\InstallShield Installation Information\{6961181E-0DE4-43ED-970F-DB9968A0E393}\Setup.exe" -l0x9 remove_all')

So könnte es gehen. Hinten muss man String (' ') und Klammer wieder zu machen.

peethebee

Das ist nicht erlaubt. Schließlich hat der Autor das schon aus einem bestimmten Grund verschlüsselt...
Du würdest ja auch nicht wollen, dass deine Skripte ausgelesen werden können.

peethebee

:willkommen:

Was sagt der Run-Befehl und wie hast du ihn aufgebaut?

peethebee