Dunque ora mediante questo codice
Prendo un array contenente tutte le righe del mio file da modificare.codice:Dim objFSO, strTextFile, strData, strLine, arrLines,appoggio Set objFSO = CreateObject("Scripting.FileSystemObject") strData = objFSO.OpenTextFile(strFileName,ForReading).ReadAll arrLines = Split(strData,vbCrLf) Dim i i = 0 For i = 0 To UBound(arrLines) - 1 If arrLines(i).StartsWith("<Area_Specialistica") Then arrLines(i) = "" End If Next For Each strLine in arrLines wscript.echo strLine Next Set objFSO = Nothing
Con un ciclo voglio prendere le righe che iniziano con "<Area_Specialistica" e cancellarla.
Solamente che l'istruzione
Mi da errore di runtime.. Come posso risolvere ??codice:If arrLines(i).StartsWith("<Area_Specialistica") Then
GRAZIE

Rispondi quotando