Hi,
ich versuche grad das Pattern zu lernen.
In einer txt steht :
Artikel: 10100305.09
Material: 25698
Das will ich auslesen und mir dann einfach als Message wieder geben um zu sehen ob es geklappt hat. Nur scheitere ich am Patternbefehl...
Derzeit sieht es so aus
Code
Global $starten
Global $path = "C:\Users\sfriese\Desktop\Dokument.txt"
Switch MsgBox(32+4,"Start", "Soll jetzt ausgelesen werden?")
case 6
$starten = True
Case 7
$starten = False
EndSwitch
If $starten Then
$Fileopen = FileOpen ($path, $FO_READ)
$File = FileRead ($Fileopen)
FileClose ($Fileopen)
Else
Exit
EndIf
$Artikel = StringRegExp ($File, "Artikel:\s+(\d+\.+\d+)",3)
$Material = StringRegExp ($File, "Material:\s+(\d+)",3)
MsgBox(0,"Ergebnis", $Artikel & @CRLF & $Material)
Alles anzeigen