Question

asp修改txt文件中的某一行

比如：a.txt
hhh yre
ggg nok
~~~~
~~~~~~
修改
hhh ok
ggg off

Answer 1

'=========================================================
'读取文件代码 
'=========================================================
Function loadfile(file)'读取文件
    dim ftemp
    Set fso = CreateObject(FSObject)
    Set ftemp=fso.OpenTextFile(Server.MapPath(""&file&""), 1)
    loadfile=ftemp.ReadAll
    ftemp.Close
    fso.close
set fso=nothing
End Function
'========================================
'保存文件
'■file生成文件名
'■code文件的代码
'========================================
Function savefile(file,code)'保存文件
    dim MyFile
    Set fso = CreateObject(FSObject)
    Set MyFile = fso.CreateTextFile(Server.mapPath(file), True)
    MyFile.WriteLine(code)
    MyFile.Close
    set MyFile=nothing
End Function

你读取文件后，将其split(文件内容,vbcrlf)到数组中，然后再逐一处理即可

最后将处理完的文件保存回去