Aaaaaarrrrghhh Ich sag ja ... Wald und Bäume!!!!!
Danke sehr für die tolle und schnelle Hilfe!!!!
Aaaaaarrrrghhh Ich sag ja ... Wald und Bäume!!!!!
Danke sehr für die tolle und schnelle Hilfe!!!!
Huch ... Dann hier noch mal als Anhang ...
Moin,
nach langer Zeit arbeite ich mal wieder mit AutoIt und die Problemstellung ist eigentlich ganz einfach. Habe mir ein NAS gebaut, das auch perfekt läuft. Aus Stromspargründen schaltet es sich nach 30 Minuten ohne Zugriff ab. Ich möchte mittels eines kleines Scripts prüfen, ob das NAS da ist .. dazu pinge ich die NAS-IP einfach mal an Als Rückmeldung soll AutoIt ein kleines Fenster öffnen, je nachdem ob das NAS vorhanden ist oder nicht. Wenn nicht, startet das Wake-on-LAN-Programm und startet den Server. Eigentlich eine recht simple Sache ....
Ist das NAS da, erscheint auch das Fenster .... wenn das NAS nicht erreicht wird, bekomme ich immer den Fehler "Line 687: Variable used without declared ... " .... wahrscheinlich sehe ich den Wald nur vor lauter Bäumen nicht?!
[autoit]$var = Ping("10.1.1.2",250)
If $var Then
#include
#include
#include
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Netzwerkcheck", 507, 248, 402, 14)
GUISetBkColor(0x008000)
$Label1 = GUICtrlCreateLabel("Das Netzwerk ist vorhanden!", 108, 8, 290, 25, $SS_CENTER)
GUICtrlSetFont(-1, 14, 800, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Pic1 = GUICtrlCreatePic("Netzwerk.jpg", 84, 48, 338, 149)
$Label2 = GUICtrlCreateLabel("Die Netzlaufwerke Y: und Z: sind einsatzbereit", 29, 208, 449, 24, $SS_CENTER)
GUICtrlSetFont(-1, 14, 800, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFE1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
sleep (5000)
Else
Run ("wolcmd.exe 0025227a8256 10.1.1.2 255.255.255.0 7")
#include
#include
#include
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Netzwerkcheck", 523, 272, 419, 15)
GUISetBkColor(0x800000)
$Label1 = GUICtrlCreateLabel("Das Netzwerk ist nicht vorhanden!", 84, 8, 354, 25, $SS_CENTER)
GUICtrlSetFont(-1, 14, 800, 0, "Arial")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Pic1 = GUICtrlCreatePic("Netzwerk_2.jpg", 92, 48, 338, 149)
$Label2 = GUICtrlCreateLabel("Die Netzlaufwerke Y: und Z: sind in ca. 2 Minuten einsatzbereit", 11, 232, 500, 24, $SS_CENTER)
GUICtrlSetFont(-1, 12, 800, 0, "Arial")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0xFFFFE1)
$Label3 = GUICtrlCreateLabel("Es wird nun gestartet ... einen Moment Geduld!", 37, 200, 449, 24, $SS_CENTER)
GUICtrlSetFont(-1, 14, 800, 0, "Arial")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0xFFFFE1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
sleep (5000)
EndIf
Die jpg und exe-Dateien sind natürlich im selben Verzeichnis.
Wäre dankbar für einen Tipp
defcon999
Hatte ich schon bemerkt und auch schon entsprechend angepasst! Noch funktioniert es perfekt!
Inzwischen habe ich das "Prinzip" dahinter auch kapiert
Vielen Dank noch mal Euch Beiden!!!!!
defcon999
VIELEN DANK!!!!!!! @alle ... aber insbesondere an den AspirinJunkie Werde Dich in mein Abendgebet einschließen!
Das ist ja wirklich eine tolle und schnelle Hilfe hier. Und die Forums-Formatierung kriege ich auch noch hin ... Versprochen!! Jetzt werde ich mich mal daran machen mir Deinen Quelltext anzusehen um nachzuvollziehen, was Du da eigentlich alles gemacht hast
Es handelt sich um eine selbstentwickelte GPS-Hardware, die ein Bekannter fürs Geo-Caching nutzen will. Leider versteht die Hardware nur dieses komische Format, das sonst kein Mensch benutzt
Viele Grüsse und Danke noch mal!
defcon999
AspirinJunkie: Das Format wird für eine ganz spezielle GPS-Software benötigt! Einfach mal hinnehmen
Bisher steht lediglich das Layout:
--------------------------------------------------------------------------------------------------------------
#include <GUIConstants.au3>
GUICreate("GeoCreator")
$font = "Arial"
GUICtrlCreateLabel("Breitengrad", 150, 5, 150)
GUICtrlSetFont(-1, 12, 400, 2, $font)
GUICtrlCreateLabel("Nord-Süd", 190, 50, 70)
GUICtrlCreateCombo("N", 250, 45)
GUICtrlSetData(-1, "S", "N")
GUICtrlCreateLabel("Grad", 10, 40, 70)
GUICtrlCreateCombo("1", 85, 45)
GUICtrlSetData(-1, "2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85", "53")
GUICtrlCreateLabel("Minuten", 10, 70, 70)
GUICtrlCreateCombo("1", 85, 70)
GUICtrlSetData(-1, "2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85", "30")
GUICtrlCreateLabel("Sekunden", 10, 100, 70)
GUICtrlCreateCombo("1", 85, 100)
GUICtrlSetData(-1, "2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60", "1")
$font = "Arial"
GUICtrlCreateLabel("Längengrad", 150, 130, 150)
GUICtrlSetFont(-1, 12, 400, 2, $font)
GUICtrlCreateLabel("Ost-West", 190, 175, 70)
GUICtrlCreateCombo("O", 250, 170)
GUICtrlSetData(-1, "W", "O")
GUICtrlCreateLabel("Grad", 10, 170, 70)
GUICtrlCreateCombo("1", 85, 170)
GUICtrlSetData(-1, "2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85", "10")
GUICtrlCreateLabel("Minuten", 10, 200, 70)
GUICtrlCreateCombo("1", 85, 200)
GUICtrlSetData(-1, "2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85", "6")
GUICtrlCreateLabel("Sekunden", 10, 230, 70)
GUICtrlCreateCombo("1", 85, 230)
GUICtrlSetData(-1, "2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60", "1")
$font = "Arial"
GUICtrlCreateButton ("UMRECHNUNG!", 200, 220, 130)
GUICtrlSetFont(-1, 10, 400, 2, $font)
GUICtrlSetBkColor(-1,0x00ff00)
GUICtrlCreateLabel("Geo-Daten für die Control-Software", 120, 280, 300)
GUICtrlCreateInput("", 50,300,300)
GUISetState (@SW_SHOW) ; will display an empty dialog box
; Run the GUI until the dialog is closed
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
Wend
--------------------------------------------------------------------------------------------------------------------------------------
Wie gesagt: Das Fomat von Grad und Minuten ändert sich ja nicht ... es wird lediglich zusammengesetzt und dann der Wert der Sekunden geteilt durch 60 mit rangesetzt. Eigentlich ganz einfach
Durch den Druck auf den UMRECHNUNG-Button soll dann der gesamte String im unteren Feld erscheinen und dann per Cut&Paste in die eigentliche Software eingesetzt werden.
Danke schon mal für Eure Mühe!!!!!!!!!!!!!
defcon999
Moin Moin,
ich bin dabei mich gerade in das wirklich tolle AutoIt-Paket einzuarbeiten und brauche Hilfe bei der Bewältigung des folgenden Problems:
Für eine GPS-Anwendung möchte ich Geo-Koordinaten, die im Format Grad (GG), Minuten (MM), Sekunden (SS) vorliegen, in ein spezielles Dezimalformat umzuwandeln. Aus GG MM SS wird dann GGMM.SSSS. Die Grad- und auch die Minutenzahl soll aus dem Dropdownfeld übernommen werden ... lediglich der Sekundenwert wird durch 60 geteilt und 4 Ziffern NACH dem Komma in den euen Wert übernommen.
Beispiel: Aus 53 Grad, 17 Minuten und 25 Sekunden wird dann der Wert 5317.4166 ... da 25/60 = 0,4166
Die Optik des GUI habe ich bereits fertig! Es gibt also 6 Dropdown-Felder für Grad-Minuten- und Sekunden des Längen- und Breitengrades, 2 Dropdownfelder für O/W und N/S und einen "Umrechnung"-Button Ich habe nur keine Ahnung, wie ich die Werte jetzt aus den verschiedenen Feldern in das neue Format-Feld bekommen soll?!
Wenn alles richtig funktioniert soll aus
53° 17' 25" Ost
010° 34' 45" Nord
der folgende String werden:
01034.7500,N,5317.4166,E
werden
Bin für jede Hilfe dankbar!!!
Viele Grüsse - defcon999