Problem mit StringBetween

Guten Tag!

Ich möchte aus einem String mittels _StringBetween einen Teilstring welcher sich zwischen einem Doppelpunkt ":" und dem nächsten Zeilenumbruch befindet auslesen, nur leider klappt das nicht und ich bekomme immer die Meldung, meine Variable wäre kein Array, was aber bei korrekter Funktion von _StringBetween sein sollte.
Meine Frage nun: wie muss der Syntax der Zeile richtig lauten?

MfG

Ok, dann muß ich aber etwas weiter ausholen:

Was ich machen möchte ist folgendes:
Wenn ich auf Arbeit aus meiner CNC-Fräsmaschine eine Datensicherung (NC-Programme) ausspiele, werden alle Programme nacheinander in einer Textdatei abgelegt
Nun habe ich mit AutoIt ein Script erstellt, welches diese Datei als String ausliest und als einzelne Text-Dateien abspeichert.

So in etwa ist ein NC-Programm aufgebaut:

Mein Problem besteht nun in der "Erstellung" des Dateinamens.
Bislang habe ich den Dateinamen nur aus dem Wert in der Klammer erstellt, etwa so:

$Text = FileRead($File) ; $File aus einer FileOpen()
$String = String($Text)

$DateiName = _StringBetween($String, "(", ")")

Nun tauchte aber in der Praxis das Problem auf, daß, wenn mehrere NC-Programme den gleichen Kommentar hatten, gleichnamige immer überschrieben werden.
Mein Lösungsansatz war nun also, die Programm-Nummer mit in den Dateinamen zu übernehmen, also via

_Stringbetween($String, ":", Chr(13))

Dieses funktioniert nun leider nicht

MfG

Zitat von i2c

Spoiler anzeigen

[autoit]

#Region - Timestamp
;2011-05-08 18:19:04
#EndRegion
#include<array.au3>
$sPath = ""
$hFile = FileOpen($sPath)
$sFile = FileRead($hFile)

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

$aResult = StringRegExp($sFile, '\:(\d+)\((.*)\)', 1, 1)
If IsArray($aResult) And UBound($aResult) >= 2 Then
$sFileName = $aResult[0] & "_" & $aResult[1]
ConsoleWrite($sFileName & @CRLF)
EndIf

[/autoit]

Alles anzeigen

Hier wird's wahrscheinlich 'n Problem geben, wenn ein NC-Programm nach der Programmnummer (:0123) keinen Kommentar hat, was zwar selten aber doch von Zeit zu Zeit vorkommt

Zitat von Raupi

Funzt mit _StringBetween auch.

Spoiler anzeigen

[autoit]

#Region - Timestamp
; 2011-05-08 18:22:55
#EndRegion

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

#include <array.au3>
#include <String.au3>
$String = FileRead("C:\Program Files (x86)\AutoIt3\SciTE\tools\test.txt") ; $File aus einer FileOpen()

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

$DateiName = _StringBetween($String, "(", ")")
_ArrayDisplay($DateiName)
$Dateiname2= _Stringbetween($String, ":", Chr(13))
_ArrayDisplay($DateiName2)

[/autoit]

Ich denke mal das Problem liegt eher daran, das der TE nicht beachtet hat, das die Rückgabe von _StringBetween ein Array ist.

Alles anzeigen

Die Array-Geschichte hat der TE sehr wohl beachtet!

Allerdings passiert folgendes:
Bei

$Start = ":"
$End = Chr(13)

$Dat = _StringBetween($String, $Start, $End)

G:\Datensicherungs-Splitter.au3 (89) : ==> Subscript used with non-Array variable.:
$Neu = FileOpen($Pfad&"\"&$Dat[0]&".nc", 2)
$Neu = FileOpen($Pfad&"\"&$Dat^ ERROR

Scheinbar lag's tatsächlich an der Datei...

Unsere NC-Programme haben eben die Endung .nc
Nun habe ich eine Sicherung (vorher .nc) als .txt abgespeichert und mein Script nochmal laufen lassen - siehe da, es lief...

Wenn du mir jetz noch erklären kannst, warum das so ist wäre ich sehr dankbar!

Danke für den Tip noch!

Es wird allerdings auch schon meine Original-Datei per @CR@LF beendet, jetz funktioniert's aber!

Gruß