Sorry GtaSpider .
Da habe ich Dich glatt übersehen? Vllt. kannst das ja noch mal verzeichen.
Habe jetzt von jedem etwas genommen. Von @pee, @bug & @gta.
Jeder bekommt eine virtuelle Bussytüte !!! 
Ging alles bisschen schnell.
LG und DANKE auch für die gute ID.
LG, Lina.
Edit GtaSpider: [04.11.2007 19:32]
Hmm - nagut, ich denke ich kann dir nochmal verzeihen *bussytüte rauch* 
OK, jetzt läuft es auch.
Super und DANKE !!!!
LG, Lina.
#include <GUIConstants.au3>
$mygui = GUICreate("MYGui", 367, 98, 193, 115)
$Label1 = GUICtrlCreateLabel("Bitte jeweils 5 Zahlen/Buchstaben eintragen.", 0, 0, 366, 17, $SS_CENTER)
$Input5 = GUICtrlCreateInput("", 24, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$Input1 = GUICtrlCreateInput("", 88, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$Input2 = GUICtrlCreateInput("", 152, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$Input3 = GUICtrlCreateInput("", 216, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$Input4 = GUICtrlCreateInput("", 280, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$btnok = GUICtrlCreateButton("&Ok", 144, 64, 75, 25, 0)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btnok
If StringLen(GUICTRLRead($Input5)) and StringLen(GUICTRLRead($Input1)) and StringLen(GUICTRLRead($Input2)) and StringLen(GUICTRLRead($Input3)) and StringLen(GUICTRLRead($Input4)) = 5 Then
MsgBox(4096, "Rückmeldung", "es sind jeweils 5 Buchstaben/Zahlen pro Feld.", 10)
Else
MsgBox(4096, "Rückmeldung", "In jedem Feld muessen 5 Buchstaben/Zahlen sein.", 10)
EndIf
EndSwitch
WEnd
Wo ist hier nochd er Fehler??? 
If StringLen(GUICTRLRead($Input1)) and StringLen(GUICTRLRead($Input2)) and StringLen(GUICTRLRead($Input3)) = 5 Then
das prüft also, ob in jedem Eingabefeld 5 Buchtaben/Zahlen drinne stehen?
Ich werde es mal testen.
LG, Lina.
Hallo @pee.
ok, aber wie frage ich ab, ob in jedem Feld 5 Buchtstaben/Zahlen oder beides drinne ist.
Ist muß einfach abfragen, ob in jedem Feld 5 drinne sind und nicht mehr und nicht weniger.
Das ist mein großes Problem !!!
LG, Lina
Hallo.
Ich möchte, wenn man auf den OK-Button drückt, erst einmal überprüft wird, ob ich jedem Feld genau 5 Buchstaben/Zahlen drinne sind abfragen.
Leider bekomme ich das derzeitig einfach nicht hin.
#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]$mygui = GUICreate("MYGui", 367, 98, 193, 115)
$Label1 = GUICtrlCreateLabel("Bitte jeweils 5 Zahlen/Buchstaben eintragen.", 0, 0, 366, 17, $SS_CENTER)
$Input5 = GUICtrlCreateInput("", 24, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$Input1 = GUICtrlCreateInput("", 88, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$Input2 = GUICtrlCreateInput("", 152, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$Input3 = GUICtrlCreateInput("", 216, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$Input4 = GUICtrlCreateInput("", 280, 32, 57, 21, BitOR($ES_CENTER,$ES_UPPERCASE,$ES_AUTOHSCROLL))
GUICtrlSetLimit(-1, 5)
$btnok = GUICtrlCreateButton("&Ok", 144, 64, 75, 25, 0)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btnok
Danke schon jetzt für evtl. Hilfe.
LG, Lina
geht doch perfekt
nur die 5000 würde ich für Entwicklungszwecke auf 1000 umstellen.
Lina
Fast2
Also wenn man es geippt vorliegen hat, dauert es länger als wenn ich den geposteten Text markieren, 1x <Strg>+<C> dann Editor aufrufen (SciTE) und dann <STRG>+<V> und nichts erst downloaden, dann auspacken und dann ....
Ist wie ein Weihnachtsgeschenk. Nicht erst dwonladen und auspacken, das sind Kinderschuhe. Gleich in die Hand drücken.
Spaß bei Seite, Quelltexte sind doch auch schon geippt. Und die Person die Dir helfen möchte, sieht sofort, ob sie etwas machen kann oder nicht.
In diesem Sinne, eine fleißige ippt-night *fg* LOL
LG, Lina.<--- weiß was Männer denken
P.S. Lange nicht mehr so gut drauf wie heute. Und Männer? Auch nicht drunter. *fg*
manuell mit einem Rechtsklick auf den Schlüssel ändern.
Diese Aussage sagt doch schon, das es mit Autoit möglich sein sollte.
Du kannst die Tastatureingaben und Maustätigkeiten doch aufzeichenen (ScriptWirter) und das ganze dann bearbreiten.
Probier das mal aus.
Gruss, Lina.
OK, aber in seinem Bsp. waren dennoch Fehler, die er vllt. übersehen hat und wo man gerne hilft
Muß da nicht evtl. ein Leerzeichen vor: C:\Programm.log
Bei Dir steht: -f2C:\Programm.log
Versuche es mal so:
ShellExecute("\\Server\Freigabe\nocheine\UserInstall\setup.exe -a -s -f1" , "\\Server\Freigabe\nocheine\UserInstall\Programm.iss - f2 C:\Programm.log")
Zumindest von der Logik her sinnvoller. Du kannst nämlich, meine ich, nicht mit -a anfangen. Das -a bezieht sich auf etwas davor. Dann habe ich noch aus Vreigabe mal Freigabe gemacht und aus -f2C:\Programm.log habe ich -f2 C:\Programm.log gemacht.
Gruss, Lina
@kleine_Made.
Also ich sehe in den Befehl:
ShellExecute("\\Server\Freigabe\nocheine\UserInstall\setup.exe", "-a -s -f1\\\Server\Vreigabe\nocheine\UserInstall\Programm.iss -f2C:\Programm.log")
zahlreiche Leerzeichen.
Nach dem -a ist das erste Leerzeichen.
Somit bitte peethebee Frageliste durch gehen und dann die Suchfunktion nutzen. Thema ist bereits mehrfach hier gelößt. Leider habe ich gerade keine Zeit danach zu suchen.
Ansonsten schau Dir mal das hier an, da geht es auch um diesen Fehler.
Gruss, Lina.
BugFix .
Das ist echt hammer Granate, wie die Jugend ja heute sagt.
Nun kann ich mich ran machen und das GUI komplett machen. Schade das ich heute so viel zu tun habe, denn am liebsten würde ich das ganze GUI heute erstellen. Aber das muß bisschen warten.
Sind cirka 12 x 25.000 Datensätze die später dann über das fertige GUI eingegeben werden müssen. Aber das werde ja nicht ich machen, sondern dafür werden die Damen der Archivierung sich kümmern. Was ich auf jeden Fall machen werde ist, das regelmäßig die Daten gespeichert werden, wo die nicht wieder nach Stunden alles "ausversehen" löschen oder die Daten weg sind, weil die den Computer soweit bekommen haben, ds gar nichts mehr geht. War Smastag der Fall nach gut neun Stunden Dateneingabe. Die Daten waren weg und die ganze Tagesarbeit umsonst.
DANKE BUGFIX !!!!
LG, Lina.
Hallo BugFix.
ini siehtz dann so aus:
[dat]
00001 = 021008 vorher
00002 = 027008 vorher
00003 = 035008 vorher
4=366011 nachher
5=66011 nachher
6=65011 nachher
7=65011 nachher
Vorher= richtig
Nacher= Nullen vorweg fehlen und bei den Tagen 0 - 99 schreibt er die Zahl hinter dem Gleichzeichen auch nicht sechsstellig.
Schlafen wir glaube ich beide erst einmal.
LG, Lina.
BugFix .
das mit dem automatischen Auslesen ist eine gute Idee, aber ich bekomme das nicht hin. Nicht einmal das mit dem auslesen des zuletzt eingegebenen Wertes. 
LG und Danke.
Lina
1.) Verschoben, da besser in Hilfe.
So sieht es nun funktionsfähig aus:
#include <GUIConstants.au3>
#include <Date.au3>
GUICreate("Datum Eingabe", 100,80, 100, 45, -1, 0x00000018); WS_EX_ACCEPTFILES
$nr = GUICtrlCreateInput ( "", 10, 5, 80, 20)
$file = GUICtrlCreateInput ( "", 10, 30, 80, 20)
$ok = GUICtrlCreateButton ("Ok", 20, 55, 60, 20)
GUISetState ()
$msg = 0
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg = $ok
$lfdnr = GUICtrlRead($nr)
$date = GUICtrlRead($file)
$val = StringSplit($date, '.')
$d = StringRight('0' & $val[1],2)
$m = StringRight('0' & $val[2],2)
If $val[3] > 30 Then
$y = StringRight(19 & $val[3], 4)
Else
$y = StringRight(20 & $val[3], 4)
EndIf
IniWrite(@ScriptDir & "daten.ini", "dat" , $lfdnr, _alinaDatum($y, $m, $d)); & @CRLF)
EndSelect
Wend
Func _alinaDatum($year, $month, $day)
Return StringFormat('%0.3d', $year - 1989) & StringFormat('%0.3d', _dayOfyear($year, $month, $day))
EndFunc ;==>_alinaDatum
Func _dayOfyear($year, $month, $day)
Return _DateDiff('d', $year & '/01/01', $year & '/' & $month & '/' & $day) + 1
EndFunc ;==>_dayOfyear
!!! Danke an BugFix & Xenobiologist !!!
Frage: Wie mache ich es jetzt, das ich im oberen Eingabefeld des GUI's den letzten Eintrag beim starten des Scriptes bekomme? Nach einer Eingabe bleiben ja die Daten bestehen.
Die daten.ini
[dat]
00001 = 021008
00002 = 027008
00003 = 035008
LG, Lina.
OK BugFix .
Dann suche ich mir was neues odetr warte ab, was Deine Hilfeseite die nächsten Tage bringt.
Vielen Dank !!!
LG, Lina.
Also im Ersten Array:
001 = 1. Januar
002 = 2. Januar
...
032 = 1. Februar
033 = 2. Februar
...
365 = 31. Dezember
Zweites Array:
001 = 1990
002 = 1991
...
Soweit verständlich? Ich gehe mal davon aus.
Habe gerade gesehen, das ich ganz oben die Werte falsch geschrieben habe. statt der 1 hätte ich 001 schreiben müssen, da sonst die Werte nicht sechsstellig sind und das müssen sie sein.
Über ein Gui (siehe oben) gebe ich ein Datum ab dem 01.01.1990 ein. Gebe ich z. B. den 21.01.1990 ein, so soll beim drücken des OK-Buttons in die Datei test.ini folgendes geschrieben werden: 021001 mit einer Nr. vorweg.
test.ini sieht dann so aus:
[dat]
000001 = 021001
Eigentlich ist die 000001 eine laufende Nr. aber ich werde es beim Gui so später machen, das man die Nr. mit eingeben muß. Ist einfacher, wenn man etwas berichtigen muß. Aber das ist derzeitig gar nicht wichtig, denn das GUI wird, wenn ich das mit dem Array verstanden habe erweitert.
Ok, dann ist es kein julianisches Datum, aber nach dem System aufgebaut (grob).
Gruß, Lina.
BugFix .
Also das erste Schuljahr ist ja bekanntlich nicht immer leicht, aber ich finde es sehr gut, das Du zeigst, was falsch und richtig ist. So lernt man doch am besten. Sorry, wenn ich nun mich als "Versuchskaninchen" nehme, aber vllt. schauen andere sich auch dieses Thema an und lernen dann davon.
Also muß es heißen Dim $arTest[364]? Wir ja 365 Tage haben.
Ich möchte unbedingt Array lernen und den Umgang.
Habe jetzt schon mal gelernt, das man bei kompakten Teilen mit Schleifen arbeitet.
Freue mich schon, wenn Du weiter machst. Wenn das Gui dann fertig ist, meine ich verstehe ich schon einiges mehr und kann vllt. selber mit Array bisschen umgehen. Okay?
Ich bewundere die Leute, die mit Array umgehen können. Ist nämlich doch rigendwo etwas besonderes.
Bis spääääääter.
LG, Lina.
Hast Du da ran gedacht, das Du beim Laptop eine andere IP hast?
Ich habe es gerade ausprobiert.
192.168.210.2 (PC1) zu 192.168.210.3 (PC2) : läuft
129.168.210.2 (PC1) zu 192.168.210.5 (Laptop) : läuft.
Hängen bleibt er, wenn ich beim Laptop versuche mit den Einstellungen von PC2 die Dateien auszuführen.
Mal sehen wo ran es sonst liegen kann. Vllt. machst Du für Deine Zwecke eine If/Then Anfrage, wo Du die Client-IP's abfragst.
Hast Du feste IP's oder dynamische IP's? Ist eigentlich nicht so wichtig, aber wenn Du das Script später dann compalieren möchtest, solltest Du über o. g. Abfrage die möglichen IP's abfragen.
Was mir sonst noch einfällt: Ist das Laptop für das gleiche Netzwerk eingerichtet oder hängt es irgendwo anders drinne.
Mach mal bitte über die Konsole die Anfrage ipconfig/all >>ipconfigall.txt und veröffentliche die, denn dann kann man da schauen ob dort ein Fehler ist. Auf jedem PC dieses ausführen und mit verschiedenen NAmen abspeichern. Sonst können wir nicht sehen ob die Netzwerke richtig sind.
Gruss, Lina.
