Delete a line that starts with "\"

[euverve]

How could i delete a line in a text file that starts with a backslash?

Thanks

[foster74]

Here's an example:

#Include <Array.au3>
#Include <File.au3>
$file1 = FileOpenDialog("Input", @scriptdir, "Text Documents (*.txt)", 1)
$file2 = FileOpenDialog("Output", @scriptdir, "Text Documents (*.txt)", 1)
Dim $array
_FileReadToArray($file1,$array)
Dim $NewArray[1]
For $i = 1 to $array[0]
   If Stringleft($array[$i], 1) <> "/" Then _Arrayadd($NewArray, $array[$i])
Next
_arraydelete($NewArray,0)
_FileWriteFromArray($file2,$NewArray)

[euverve]

Here's an example:

#Include <Array.au3>
#Include <File.au3>
$file1 = FileOpenDialog("Input", @scriptdir, "Text Documents (*.txt)", 1)
$file2 = FileOpenDialog("Output", @scriptdir, "Text Documents (*.txt)", 1)
Dim $array
_FileReadToArray($file1,$array)
Dim $NewArray[1]
For $i = 1 to $array[0]
   If Stringleft($array[$i], 1) <> "/" Then _Arrayadd($NewArray, $array[$i])
Next
_arraydelete($NewArray,0)
_FileWriteFromArray($file2,$NewArray)

Thanks for the quick answer, it works...

Thanks for the help foster74.