请教一行一行写文件的代码

[zhaoangliuyan]

请教一行一行写文件的代码

[li_d_s]

Integer li_ret
li_ret = FileOpen("c:\test.txt", LineMode!, Write!, LockWrite!, Replace!)
If li_ret < 1 Then
MessageBox("失败", "文件打开失败!")
Return
End If

FileWrite(li_ret, "第一行")
FileWrite(li_ret, "第二行")
...
FileClose(li_ret)

[tmxkdldw]

up

[freegoodboy]

to: 小鬼
Integer li_ret
li_ret = FileOpen("c:\test.txt", LineMode!, Write!, LockWrite!, Replace!)
If li_ret < 1 Then
MessageBox("失败", "文件打开失败!")
Return
End If

FileWrite(li_ret, "第一行")
FileWrite(li_ret, "第二行")
...
FileClose(li_ret)

它的方法就很好

[孤单北风]

问题解决
不必多说