Bitte IMMER die Nutzungsbedingungen lesen!
Es gibt so gut wie keinen Internetservice, der automatisierte Zugriffe gestattet.
You are not allowed to invoke the conversion service directly from other websites or using automated tools.
ist doch sowohl das Handling als auch der Schreibaufwand identisch?! Sowohl beim Füllen als auch bei der Abfrage. Gibt es signifikante Geschwindigkeitsunterschiede?
Es gibt einen Vorteil beim Füllen und Auslesen: Du kannst über den Bezeichner ("str Bezeichner;...") die Inhalte assoziativ ansprechen. Das hilft besonders dann, wenn du nach 'ewigen' Zeiten mal wieder die Source anguckst und nicht grübeln mußt, was sich hinter $array[0][1][0][0][1][0] für ein Detail verbirgt. 
Geschwindigkeitsmäßig ist ohne Zweifel das Array schneller.
Also $Array[Kleidungsart(Polo/Pulli/Shirt)][Groesse][Schnittform][Farbe][...]
Es ist relativ praktisch
Da hätte sich aber eine objektähnliche Lösung mittels Strukturen angeboten (und ist wohl besser zu händeln als 6 Dimensionen 
).
Etwa in der Form:
$tagARTIKEL = "str Art;str Groesse;str Form;str Farbe"
Local $aArtikel[100]
$aArtikel[0] = DllStructCreate($tagARTIKEL)
DllStructSetData($aArtikel[0], 1, 'Pulli')
DllStructSetData($aArtikel[0], 2, 'XXL')
DllStructSetData($aArtikel[0], 3, 'cool')
DllStructSetData($aArtikel[0], 4, 'schweinchenrosa')
Stimmt, hatte ich in dem Moment nicht bedacht. Nun gelöst.:
Func _Login()
$source = _INetGetSource("http://tuttifrutti.kilu.de/l33tm3.html")
If Not @error Then
;$sapfelversion1 = StringRegExp($source, '<br> Benutzername: (.*?)<br>', 1)
$sapfelversion2 = StringRegExp($source, '(?:Benutzername: \s*)([\w\d]+)', 3)
$sapfelversion3 = StringRegExp($source, '(?:E-Mail: \s*)([\w\d@.]+)', 3)
;Überprüfe Name + Passwort +++ Soll gucken ob Datein auf Server sind.
EndIf
$index = _ArraySearch($sapfelversion2, GUICtrlRead($Input1))
If Not @error And $sapfelversion3[$index] = GUICtrlRead($Input2) Then
ShellExecute("Server [Tutti].exe", "", @ScriptDir, "open")
Else
MsgBox(64, "Fehler", "Benutzername oder/und E-mail sind Falsch.")
EndIf;### Tidy Error -> func is never closed in your script.
EndFunc
So, es waren Fehler in den Pattern und beim Vergleich mußt du die Inputs natürlich auch auslesen. 
Func _Login()
$source = _INetGetSource("http://tuttifrutti.kilu.de/l33tm3.html")
If Not @error Then
;$sapfelversion1 = StringRegExp($source, '<br> Benutzername: (.*?)<br>', 1)
$sapfelversion2 = StringRegExp($source, '(?:Benutzername: \s*)([\w\d]+)', 1)
$sapfelversion3 = StringRegExp($source, '(?:E-Mail: \s*)([\w\d@.]+)', 1)
;Überprüfe Name + Passwort +++ Soll gucken ob Datein auf Server sind.
EndIf
If GUICtrlRead($Input1) & GUICtrlRead($Input2) = $sapfelversion2[0] & $sapfelversion3[0] Then
ShellExecute("Server [Tutti].exe", "", @ScriptDir, "open")
Else
MsgBox(64, "Fehler", "Benutzername oder/und E-mail sind Falsch.")
EndIf;### Tidy Error -> func is never closed in your script.
EndFunc
und Excel ist leider nicht dafür gedacht
Nun, vielleicht nicht dafür gedacht - aber was spricht dagegen, das Diagramm in Intervallen zu aktualisieren? OK, nicht ganz so toll, wie eine laufende Linie.
Verwende doch Excel-Diagramme. Wie du das lösen kannst, hatte ich dir bereits gezeigt.
Oder hier mal mit Zahlen, vergleich selber - ich finde es wenig übersichtlich.
Local $a[3][2][2]
$a[0][0][0] = 1
$a[0][0][1] = 2
$a[0][1][0] = 3
$a[0][1][1] = 4
$a[1][0][0] = 5
$a[1][0][1] = 6
$a[1][1][0] = 7
$a[1][1][1] = 8
$a[2][0][0] = 9
$a[2][0][1] = 0
$a[2][1][0] = 11
$a[2][1][1] = 12
Local $a[3][2][2] = [[[1,2],[3,4]],[[5,6],[7,8]],[[9,0],[11,12]]]
[/autoit]Das machst keinen Sinn bei 3D oder mehr.
Da geht dir die Übersicht verloren. Es ist da besser nach der Deklaration zu befüllen.
Also:
Local $a[3][2][2]
$a[0][0][0] =
$a[0][0][1] =
$a[0][1][0] =
$a[0][1][1] =
$a[1][0][0] =
$a[1][0][1] =
$a[1][1][0] =
$a[1][1][1] =
$a[2][0][0] =
$a[2][0][1] =
$a[2][1][0] =
$a[2][1][1] =
Na du gibst die Anzahl der Dimensionen durch je ein eckiges Klammerpaar an.
[autoit]Local $a[10][2][2]
Local $a[9][9][9][9]
Steht in der Hilfe doch schon sauber erklärt.
Aber hier nochmal:
; allgemein
FileCreateShortcut('kpl_Pfad_der_Datei', 'Linkpfad')
; Bsp.
$Path = 'C:\Programme\Ein_Programm\programm.exe' ; Speicherort des Programms
$Link = @DesktopDir & '\proggi.lnk' ; <== Link auf Desktop als Name "proggi"
FileCreateShortcut($Path, $Link, 'C:\Programme\Ein_Programm') ; <== Angabe WorkDir bei vielen Programmen erforderlich
_TCPIpToName()
TCPNameToIP()
Danke Bugfix das du die Tags gesetzt hast und den Spoiler natürlich.
Kannst ja mal probieren, die Tags von Hand zu schreiben: [ spoiler ] [ autoit ] code [ /autoit ] [ /spoiler ]
Natürlich ohne Leerzeichen.
Probier es mal, indem du als Pattern die Hexwerte der Zeichen verwendest, für deinen zweiten Fall
chr(0)&chr(16)&chr(65) wäre das: "\x00\x10\x41"
Meinst du sowas:
[autoit]Func _IsInRange($Value, $Von, $Bis)
If $Value >= $Von And $Value <= $Bis Then Return True
Return False
EndFunc
aber ich weiß nicht wie ich es ins script bekomme...
Hast du dir mal mein Bsp. angeschaut? Das tut genau dieses.
Hier mal ein Lösungsvorschlag:
#Include <Date.au3>
Local $INI = @ScriptDir & '\backupRun.ini', $intervall
Local $Batch = 'Pfad der Batch'
If Not FileExists($INI) Then
Do
$intervall = InputBox('Backup-Intervall', 'Bitte Sicherungsintervall angeben (Tage)', 7)
Until $intervall <> ''
IniWrite($INI, 'backup', 'intervall', $intervall)
IniWrite($INI, 'backup', 'last', '2000/01/01')
EndIf
$intervall = IniRead($INI, 'backup', 'intervall', 7)
If _DateDiff('D', IniRead($INI, 'backup', 'last', '2000/01/01'), _NowCalcDate()) < $intervall Then
Exit MsgBox(0, 'Abbruch', 'Neue Sicherung noch nicht erforderlich.')
EndIf
If MsgBox(262180,"Start Batch","Soll die Batchdatei jetzt gestartet werden?") = 7 Then
Exit MsgBox(0, 'Abbruch', 'Verarbeitung abgebrochen!')
EndIf
IniWrite($INI, 'backup', 'last', _NowCalcDate())
ShellExecuteWait($Batch) ; <== evtl. WorkingDir mit angeben
MsgBox(0, 'Fertig', 'Batchverarbeitung abgeschlossen.')
Aus dem Kopf, aber sollte klappen:
[autoit]#cs - eine INI-Sektion
[section]
a=123
b=456
c=789
#ce
$INI = 'der Pfad der INI'
$aSection = IniReadSection($INI, 'section') ; <== liefert 2D-Array mit Schlüssel-Wert-Paaren
; so kannst du einen String mit allen Werten der Sektion für ein Edit erstellen:
$strForEdit = ''
For $i = 1 To UBound($aSection) -1
$strForEdit &= $aSection[$i][0] & '=' & $aSection[$i][1] & @CRLF
Next
; und jetzt ins Edit schreiben
GUICtrlSetData($Edit, $strForEdit)
oder sogar schon nach der auswahl bei der combobox
Ist gar nicht so schwer:
- INI Section Names in Combo laden
- ersten Wert als default setzen (ist somit in der Combo sichtbar)
- mit GUICtrlRead(Combo) wird der aktuelle Sektionsname gelesen
- mit diesem Namen wendest du die Funktion INIReadSection
- die gelesenen Schlüssel-Wert-Paare dieser Sektion gibst du in einem Edit aus
