Beiträge von alpines

Zitat von chip

Dazwischen rutscht das ganze in Unsinn ab besonder mit dem direkt darauf folgenden Hinweis auf diese Forum. Wir brauch nicht noch mehr Scriptkiddys hier.

Ich bezweifle das sein Hinweis auf das Forum hier noch mehr Scriptkiddies anlockt. Sollte das der Fall sein kriegen sie doch sowieso direkt eins aufn Deckel.

Zitat von Cape-City

ich habe meine Begeisterung über AutoIt in einem kleinen YouTube Video zum Ausdruck gebracht.

Die Begeisterung hielt sich bei der Stimmlage irgendwie in Grenzen aber alles in allem war das doch ein solides Video.
Soweit ich weiß sind aber die "Lookaheads", die aufploppen wenn man die Klammer für eine Funktion setzt, sogenannte Calltips.

Zitat von Hingo

Der schmeißt mir gar nichts raus wenn ich das in eine FileWrite packe.

Ich geh mal davon aus das du den Returnwert von den Mac-Funktionen in die FileWrite geschrieben hast.
Das darfst du nicht. Es sind Arrays und keine Strings.

Wenn es geklappt hat, dann setze doch bitte den grünen Haken für erledigt / gelöst (1. Beitrag bearbeiten, Threadstatus anpassen).

Zitat von olfibits

Das mit -3 ... meinst du Case -3 anstatt $GUI_EVENT_CLOSE? Hab das mal so übernommen.

Dann kannst du dir auch die Includes klemmen wenn du da -3 nimmst.

Würde dir dennoch raten dein Code ein wenig aufzulockern und nicht alles untereinander zu schreiben.

Schreib die Ergebnisse doch in eine Datei statt sie mit StdOut zu lesen. Bei mir hat das auch nur immer unzuverlässig funktioniert.
Mit der CMD kannst du mit folgendem Kommando (ipconfig jetzt als Beispiel) ipconfig >> datei.txt die Ausgabe in die Datei schicken.

Diese kannst du dann mit AutoIt lesen und bleibst nie stecken.

Da du das in Skripte gepostet hast nehme ich mal an das du Feedback von uns erwartest.

4 der 5 inkludierten Au3-Dateien brauchst du nicht. Wenn du statt $GUI_EVENT_CLOSE sogar -3 schreibst brauchst du keins der Includes.
Benenne deine Variablen besser. $Label4, $Input2 sind absolut nicht aussagekräftig.

Ich weiß nicht ob das Forum jetzt die Formatierung deines Scriptes gefressen hat, aber locker dein Code ein wenig auf und rücke immer korrekt ein.

An vierter Stelle von rechts etwas einzufügen grenzt schon fast an Fahrlässigkeit mach es lieber variabel auch wenn die Endungen meistens nur 3 Zeichen lang sind.

Mit StringInStr kannst ud nach dem "." der Dateiendung suchen. Als Occurences Parameter nimmst du da mal -1.
Das gibt dir den 1. Fund von rechts zurück. Das kannst du mit StringRight / StringTrimLeft abspeichern und anschließend das ganze nochmal machen.
Dieses mal nimmst du die Datei ohne Endung, packst dein "UPX-COMPRESSED" ran und schmeißt die Endung hinterher.

Du könntest auch nach dem Backslash suchen und vor dem Dateinamen einfach UPX-Compressed schreiben.

Zitat von Bitnugger

Die Klammern kann man sich aber doch sparen...

Keine Frage, die kann man sich sparen. In der Operatorenreihenfolge kommt = nämlich vor Or und And.
Allerdings sehe ich ziemlich häufig, dass Leute sinnlose Klammern setzen wie z.B. Local $sVar = ("string") oder nicht mal auf die Idee kommen,
Funktionen normal zu callen sondern Call("Funktion")stattdessen verwenden.

Zitat von Bitnugger

PS: Ist das nicht dasselbe?

Nein. $DB = NULL ist nicht dasselbe wie $DB.

Allerdings bin ich mir beim zweiten nicht sicher ob das absichtlich oder unwissentlich so geschrieben wurde.
Wenn man in einer If-Verzweigung Bedingunen mit Or verknüpft muss man sie dennoch nochmal nach dem Wert prüfen.

If $Db oder $User oder $Password oder $Server gleich null bedeutet NICHT If $Db = Null or $User = Null or $Password = Null or $Server = null.
Es bedeutet If $Db > 0 or $User > 0 or $Password > 0 or $Server = Null.

Ich weiß jetzt nicht ob du den Codesnippet aus dem Source kopiert hast oder selber zusammengestellt hast.
(Das mit den $DB = NULL explizit oben davor, dann könntem an sich die If-Abfrage auch schenken.)

Zitat von Damion

Was macht eigentlich genau $i += 1 , zählt das noch zu $i 1 dazu also $i=$i+1 ?

Genau, das addiert auf $i einen drauf. Das habe ich absichtlich so gewählt da sonst die Abbruchbedingung in der 2. Schleife (unten If $aSplit[$i] = "" Then) sofort ausgelöst wird.

Alles kann man optimieren. Es gibt bereits schon UDFs die mit der WMI arbeiten die die Infos direkt ausspuckt.
Ich habe das hier im englischen Forum gefunden: https://www.autoitscript.com/forum/topic/17…c-in-workgroup/

Mit StringSplit habe ich das ganze meiner Meinung nach etwas schicker lösen können (im Vergleich zu deinem).
Aber das ganze kann man sicherlich mit regulären Ausdrücken noch hübscher lösen:

Bei dieser Variante werden allerdings die Einträge die zuerst gefunden werden zuerst abgespeichert, also ist die Reihenfolge im Array egal.
Du kannst das sicherlich umbauen, ist ja nur ein Vorschlag wie man es lösen kann.

#include <Array.au3>


RunWait("cmd /c ipconfig /all > ip.txt")


Local $aSplit = StringSplit(FileRead("IP.txt"), @CRLF, 3)
Local $aCategories[7] = ["IPv4-Adresse", "Subnetzmaske", "Standardgateway", "Physikalische Adresse", "DHCP aktiviert", "DHCP-Server", "DNS-Server"]
Local $aResults[7]


For $i = 0 To UBound($aSplit) - 1
	;Nach der 1. IP-Adresse suchen


	If StringInStr($aSplit[$i], "IPv4-Adresse") Then
		For $i = $i To 0 Step -1
			If $aSplit[$i] = "" Then
				$i += 1
				ExitLoop ;Ganz oben im aktuellen Adapter angekommen
			EndIf
		Next


		ExitLoop
	EndIf
Next


For $i = $i To UBound($aSplit) - 1 ;Den ausgewählten Adapter durchgehen und Werte suchen
	For $j = 0 To UBound($aCategories) - 1
		If StringInStr($aSplit[$i], $aCategories[$j]) Then ;Kategorie gefunden
			$aResults[$j] = StringSplit($aSplit[$i], ": ", 3)[1]
			ExitLoop
		EndIf
	Next


	If $aSplit[$i] = "" Then ExitLoop ;Wenn Adapter durch ist
Next


_ArrayDisplay($aResults)

Zitat von Zeitriss

Hi,

versuch mal im Client Zeile 36 :
"=" durch "&=" zu erstzten (ansonsten werden Daten, welche nicht $trenner enthalten, ignoriert) und "32768" durch "2048"

und im Server die verschlüsselten Informertionen in 2048 Zeichen Paketen zu senden.

Kann grade nicht testen ob es irgendetwas hilft.

mfg
Zeitriss

Das hab ich ja volle Kanne übersehen...

Ich bin mir da ziemlich sicher das das der Fehler ist. Eigentlich sollte das aber selbstverständlich sein den bisher empfangenen Inhalt nicht zu verwerfen!

Du sendest die Daten glaube ich falsch. Sende und empfange sie ruhig mal als String und nich explizit als Binary beim TCPRecv.

Hast du auch teilweise vollständige Übertragungen oder ist es immer nur halb?

Super, und beim nächsten Mal setzt du bitte den grünen Haken für erledigt / gelöst in dem du den Threadstatus anpasst (1. Beitrag bearbeiten).
Da Arrays eigentlich zu den Grundlagen von AutoIt gehören würde ich dir raten sie dir nochmal anzusehen.

Na probiers doch mal aus und berichte uns davon.

Du kannst Arrays mit For-Schleifen iterieren. Nehmen wir mal an $aArray ist ein 1-Dimensionales Array, dann kansnt du die Indizes so durchgehen

Local $aArray[5] = [1, 2, 3, 4, 5]
Local $iToFind = 4


Local $bFound = False


For $i = 0 To UBound($aArray) - 1
	If $aArray[$i] = $iToFind Then
		$bFound = True
		ExitLoop
	EndIf
Next


MsgBox(64, "Eintrag gefunden?", $bFound & " im Index: " & $i)

Die UBound-Funktion gibt dir die Größe des Arrays wieder, da du aber die Indizes iterierst darfst du nicht von 1-Größe gehen sondern von 0-Größe-minus-1.

Super, hast du irgendwelche konkrete Vorstellungen?

Haken setzen beim nächsten Mal nicht vergessen! (1. Beitrag bearbeiten)

Es scheint an SciTE/Au3Check zu liegen. example.au3 ist nämlich ausführbar wenn man direkt die au3 startet ohne F5 in SciTE zu drücken.

Ich frag mal platt rein: Wofür brauchst'n das?