Vilken position i textfilen är det frågan om?
Är det ett uniktvärde du vill söka efter och sedan ta bort?
Frågan#1
Jag vill ta bort rad 2 i en textfil via ASP.
Hur görs detta med minst serverresurser (är textfiler på dryga 10MB i vissa fall)?
Ta bort specifik rad i textfil
6 svar · 427 visningar · startad av Pikkenix
hela rad 2 som sagt.
Söker inte efter ett värde eller liknande utan hela rad 2 ska bort.
skulle även fungera att ta bort X antal tecken med början vid ett visst ställe då de första 4 raderna alltid ser likadana ut...
OK, hela rad nummer två från toppen i textfilen?
<%
Set MittTxtObj = Server.CreateObject("Scripting.FileSystemObject")
Set MinFil = MittTxtObj.OpenTextFile(server.MapPath("test.txt"), 1)
dim tmpVar
i = 1
do until MinFil.AtEndOfStream
if i = 2 then
tmpVar = tmpVar & minFil.SkipLine & minFil.ReadAll
else
tmpVar = tmpVar & minFil.ReadLine & chr(10)
end if
i = i - -1
loop
MinFil.close
Set MinFil = MittTxtObj.OpenTextFile(server.MapPath("test.txt"), 2)
MinFil.Write tmpVar
MinFil.close
%>
Filerna jag ska editera ligger på 100 000+ rader så det där suger serverkraft... finns inget lättare sätt än att läsa in hela filen i en sträng, redigera den och sen spara igen?