Beiträge von Alina

**Alina**

Moin Moin.

Ich habe ein Schleifenproblem.

Folgendes Script arbeitet die Schleife 37 mal durch, danch bricht sie ab.

Spoiler anzeigen

[autoit]

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_UseAnsi=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include<Array.au3>
#include<String.au3>

[/autoit] [autoit][/autoit] [autoit]

$test = FileRead("eingang.txt"); "1A2B3C4D5E6"
$1_len = StringLen($test)
;MsgBox(0, "Stringlänge:", $1_len) ; diese Zeile nur zum testen

[/autoit] [autoit][/autoit] [autoit]

$pass = FileRead("passwort.txt"); "94736"
$2_len = StringLen($pass)
;MsgBox(0, "Stringlänge Passwort:", $2_len) ; diese Zeile nur zum testen

[/autoit] [autoit][/autoit] [autoit]

$zwischensumme = Ceiling($1_len / $2_len)
;MsgBox(0, "Stringlänge Zwischenlänge:", $zwischensumme) ; diese Zeile nur zum testen

[/autoit] [autoit][/autoit] [autoit]

$anwenderpass = _StringRepeat($pass,$zwischensumme)
;MsgBox(0, "Stringlänge Anwendung:", $anwenderpass) ; diese Zeile nur zum testen

[/autoit] [autoit][/autoit] [autoit]

For $i = 1 to $1_len Step +1
$v_s = StringMid($test, $i, 1)
;MsgBox(0, "aus Test:", $v_s) ; diese Zeile nur zum testen
$v_w = StringMid($anwenderpass, $i, 1) ; diese Zeile nur zum testen
;MsgBox(0, "aus Passwort:", $v_w)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

; Array: senkrecht / waagerecht
; alle 37 Zeichen werden in 37 Zeilen dargestellt, wobei das erste Zeichen immer an das Ende rutscht.
Local $avArray[38][38]
Local $avTemp[38] = [" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z","."]
For $x = 0 To 37
$y = 37-$x
For $z = 0 To 37
$y += 1
If $y>37 Then $y=0
$avArray[$x][$y] = $avTemp[$z]
Next
Next
;

[/autoit] [autoit][/autoit] [autoit]

; senkrecht
$s_Index = _ArraySearch($avArray, $v_s, 0, 0, 0, 1)

[/autoit] [autoit][/autoit] [autoit]

; waagerecht
$w_Index = _ArraySearch($avArray, $v_w, 0, 0, 0, 1)

[/autoit] [autoit][/autoit] [autoit]

;MsgBox(0,"Array-Zahlen","Array-Zahlen: " & $s_Index & " - " & $w_Index & @CRLF & "Mathe Zahlen: " & $s_Index +1 & " - " & $w_Index +1) ; diese Zeile nur zum testen

[/autoit] [autoit][/autoit] [autoit]

;MsgBox(0,"Schnittmenge", $avArray[($s_Index)][($w_Index)]) ; diese Zeile nur zum testen
FileOpen("codiert.txt",1)
sleep(50)
FileWrite("codiert.txt", $avArray[($s_Index)][($w_Index)])
sleep(50)
FileClose("codiert.txt")
sleep(50)
Next
Exit

[/autoit]

Die Schleife soll so so oft durchlaufen wie Buchstaben / Zahlen / Zeichen in der Datei eingang.txt stehen.

Wo und was ist das Problem?

Edit: Problem war u. a. am Zeilenende der Umbruch und fehlende Zeichen im Array. Müssen nämlich 85 sein.

**Alina**

Das gesucht?

Aut2exe.exe /in [/out ] [/icon ] [/nodecompile] [/comp 0-4]

**Alina**

Danke und Problem erfolgreich gelöst !!!

**Alina**

Das Script selber müßte meine ich so heißen, da es snst nicht funktioniert:

Spoiler anzeigen

[autoit]

_MsgBox()
Sleep(100)
Func _MsgBox()
MsgBox(0, "aa", "bb")
EndFunc

[/autoit]

Ich meine das man es nicht codieren kann.

**Alina**

JUHU, dann kann ich das ja auch mit allen erlaubten Buchstaben, Zahlen und Zeichen machen.

Das ist ja SUPER !!!

Gleich ausdrucken und abheften !!!

Vielen, vielen Dank !!!

**Alina**

Bitte nehm mal aus dem Script den "Shutdown(1)" raus. Immer wieder fährt der PC runter, weil ich nicht drann denke. LOL

**Alina**

Also ich habe folgendes Array getippt:

Spoiler anzeigen

[autoit]

Local $avArray[37][37] = [ _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"]]

[/autoit]

Die Reihenfolge der Zahlen und Buchstaben soll sich später wie folgt noch ändern, nur ich will erst mein Problem posten, bevor ich es nochmal richtig abtippe, was ich heute nämlich shcon einmal gemacht habe.

So sieht die Reihenfolge dann aus:

Spoiler anzeigen

[autoit]

Local $avArray[37][37] = [ _
[" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"], _
["0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"," "], _
...

[/autoit]

Der erste Wert wird in der nächsten Reihe hinten dran gehängt, so das später jede/r Zahl/Buchstabe einmal an jeder Stelle sich im Array befindet.

Nur ich bekomme diese Fehlermeldung: ==> String missing closing quote.:
Sie bezieht sich auf das " hinter dem "X", in Zeile 27.

Was mache ich falsch und wo denke ich zu blond?

Und jetzt die Krönung. Ich hatte das miteinen Array [76][76], also 76 Werte in 76 Zeilen bereits getippt. Gut das ich nicht mit zwei Fingern tippe, sonst wäre ich ja wochenlang dabei gewesen. So waren es .... (sag ich lieber nicht).

Ich bin über eine Antwort und einen evtl. Lösungsvorschlag dankbar.

**Alina**

Also ich würde das eher so lösen:

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

; Hier ist die GUI-1
$1_GUI = GUICreate("GUI 1", 116, 119, 193, 125)
$Label1 = GUICtrlCreateLabel("GUI 1", 8, 16, 85, 41)
GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
$Button_1 = GUICtrlCreateButton("GUI 2 öffnen", 8, 64, 89, 33, 0)
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

; Hier ist die GUI-2
$2_GUI = GUICreate("GUI 2", 116, 119, 193, 125)
$Label1 = GUICtrlCreateLabel("GUI 2", 8, 16, 85, 41)
GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
$Button_2 = GUICtrlCreateButton("GUI 1 öffnen", 8, 64, 89, 33, 0)

[/autoit] [autoit][/autoit] [autoit]

; hier werden die GUI's ein- und ausgeblendet und das über die jeweiligen Buttons in der zuständigen GUI
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button_1
GUISetState(@SW_HIDE, $1_GUI)
GUISetState(@SW_SHOW, $2_GUI)
Case $Button_2
GUISetState(@SW_HIDE, $2_GUI)
GUISetState(@SW_SHOW, $1_GUI)
EndSwitch
WEnd

[/autoit]

Vorteile:
- GUI's sind übersichtlich am Anfang
- alles in einer Schleife mit den Abfragen
- Als Anfänger braucht er so noch nicht mit Funktionen arbeiten

Wichtig ist das Du dir die Hilfe nimmst und alles dort nochmals versuchst zu verstehen. Die Hilfe findest Du als Download links unter: AutoIt-Hilfe (auch online)

**Alina**

Hallo MatthiasG.

Bitte solche Sachen (was den Seitenaufbau betrifft) direkt an Peethebee & Gun-Food senden. Sie sind die Administratoren der Seite und können das ändern.
Oder an einen Moderator, da dieser das dann an die beiden weiter gibt.

Nicht böse nehmen das ich es öffentlich schreibe, aber so lesen es die Neuen auch und wissen dann, wie sie damit richtig umgehen.

Allen ein sonniges Wochenende.

**Alina**

Zitat von ctec

Bot = Bot = keine Unterstützung!
Wenn der Betreiber sowas dulden würde, würde er eine Funktion anbieten, dass die Forschung eigenständig weiterläuft.

SUPER KURZ und auf's Wort gebracht !!!!

**Alina**

Vielen Dank !!!

Ist erledigt und gelöst.

**Alina**

Das Wort XXXXX (auch altertümlich: Langmut) bezeichnet die Fähigkeit, warten zu können. Oft gilt XXXXX als eine Tugend; ihr Gegenteil ist die XXXXXXX.

Also was brauchst Du ???

**Alina**

Hallo.

Also $A, $B und dann na klar ändert sich auch die Schnittmenge $C, da sich diese ja aus $A und $b erst ergibt.

Muttertag gibt kleine Geschenke, Herrentag gibt für die Frauen kleine "blaue Männer" Aber in Flensburg ist Rum-Regatter, das ist ein Hafenfest und in zwei Wochen ist dann Tummelumm, das ist das Fest der Weltrecorde, welches durch die Fußgängerzone und an gesamten Hafen sein werd. Also ein Besuch auf jeden Fall wert. Irgenwie drei Wochenenden Party, denn nächstes Wochenende ist Pfingsten.

**Alina**

Moin Moin.

Erst einmal den Herren einen schönen sonngen Herrentag !!!

Ich habe folgende Tabelle, die hier mit Excel erstellt ist, jedoch später als Array sein soll:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

$A = 9
$B = 6
$C = Schnittpunkt von $A und $B; in diesem Fall: 7

Da sich aber die Werte später ändern, geht das so nicht. Und so habe ich an Array's gedacht.

So schaut es mit Array's aus:
$A = array[0][8]
$B = array[5][0]
$C = array[5][8]

Frage ist nun, ob man Array addieren kann und ob dieses sinnvoll in diesem Fall ist. Array von $A + Array $B = Array $C

**Alina**

1. Desktop, dann noch Anwendungsdaten. Je nachdem welches Array abgefragt wird. Falls Du es benötigst. Und vor dem test noch ein "\".

Spoiler anzeigen

[autoit]

Dim $String2 = StringSplit("@DesktopDir|@AppdataDir", "|")
MsgBox(0,0, Execute($String2[1]) & "\Test") ; gibt den erwünschten Makro zurück
MsgBox(0,0, Execute($String2[2]) & "\Test") ; gibt den erwünschten Makro zurück

[/autoit]

**Alina**

Moin-Moin.

Also damit Du bischen was hast, wo Du starten kannst und was Du dann mit hilfe der "Suchfunktion" und der "Hilfe" ausbauen kannst, habe ich die anlage beigepackt.

Wenn Dir so viele gute GUI's aufgefallen sind, dann sind in bei Beiträgen doch auch die Scripte. Anschauen, Hilfe zu den Begriffen lesen und dann versuchen es selber umzusetzen. webnn es dann nicht geht, dann poste was Du "gezaubert" hast und keiner nimmt es einen übel, wenn es dann nicht so gut ist. Fehler sind normal, dafür sind wir ein Forum und dafür möchtest Du ja auch Hilfe bekommen.
Das ein Script durcheinander aus schaut, ist auch gerade am Anfang normal, aber das gibt sich nach paar Wochen auch und da sagt keiner ernsthaft was. Vllt. mal ein SPASS, aber den kann Frau ab, also auch "Mann".

Folgender Anhang nicht von mir entwickelt: Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

**Alina**

Zitat von Gianni

... schlecht ist einfach, dass man unter AutoIt nichts findet ...

NOCH NICHT. Ist aber schon gemeldet das Forum.

**Alina**

Ja, dann schau mal was ich gerade gepostet habe. Das kannst Du, wenn Du es verstanden
hast sicherlich genau so einsetzen wie Du es brauchst.
Ich schau sonst später noch mal rein. Will jetzt erst einmal bischen Haushalt machen.

**Alina**

Zitat von subzero007

wie übergebe ich $parameter an meine cmd

Kommandozeilenparameter:
$CmdLine[0] ist die Anzahl der Parameter
$CmdLine[1] ist Parameter 1
$CmdLine[2] ist Parameter 2

Vielleicht hilft Dir folgendes Beispiel etwas, aber auch die Hilfe zu "Kommandozeilenparameter" durch lesen !!!

Spoiler anzeigen

[autoit]

#include <INet.au3>

[/autoit] [autoit][/autoit] [autoit]

If $CmdLine[0] > 0 Then
$parameter1 = $CmdLine[1]
Else
$parameter1 = "autoit"
EndIf

[/autoit] [autoit][/autoit] [autoit]

If $CmdLine[0] > 1 Then
$parameter2 = $CmdLine[2]
Else
$parameter2 = "de"
EndIf

[/autoit] [autoit][/autoit] [autoit]

If $CmdLine[0] > 2 Then
$parameter1 = $CmdLine[3]
Else
$parameter3 = "index.php"
EndIf

[/autoit] [autoit][/autoit] [autoit]

$sReturn = _Inetgetsource("http://www." & $parameter1 & "." & $parameter2 & "/" & $parameter3")

[/autoit]

**Alina**

@DasBoenni

"Herzlich Willkommen"

Erst einmal habe ich schon gesehen das Du die Suchfunktion nutzt. Das finde ich super, das Du das gleich machst. LOB.
"Herzlich Willkommen"

Also ich würdfe auch versuchen ohne Batch-Dateien auszukommen und wenn es denn unbedingt sein muß, dann diese durch das Script erstellen lassen und nachdem sie nicht mehr genutzt werd wieder löschen. eine Batch-Datei kann man ja z. G. auch mit AutoIt schreiben, wobei ich da nur maximal 5% SINN drinne sehe, da man das sicherlich auch mit AutoIt hin bekommt.

leider kenne ich mich mit dem DSQUERY nicht so aus, das ich da nur allgemein sagen kann, wo bei der Übernahme der Batch-Datei Fehler sein können, aber ich sehe das Du dich damit gut aus kennst.

Beiträge von Alina

Schleifenproblem

AutoIt3.exe Parameter

Array Problem

Mehrere Zeilen verschlüsseln (gleichzeitig)

Array Problem

Problem mit meiner ersten GUI

Array Problem

Problem mit meiner ersten GUI

Organize-Includes-Link

Maus in Spielen bewegen

12 x 12

Programme in TreeView ausführen (Drag & Drop)

12 x 12

12 x 12

Makros mit StringSplit()

GUI ein paar fragen

Wolfram|Alpha Neue Searchengine

listview parameter an eine batch übergeben

listview parameter an eine batch übergeben

listview parameter an eine batch übergeben