Question

我正在尝试将新记录添加到控制台应用程序内的文件夹中的文本文件中。

open System.IO

let name = "Fred Thompson" 

let addLine (name: string) =
    use wr = StreamWriter("c:\\tempsource\\test.txt")
    wr.WriteLine(name)
    wr.Close

当我在交互式窗口中运行时，我得到了这个：警告FS0760：建议使用语法＆＃39; new Type（args）＆＃39;而不是＆＃39; Type（args）＆＃39;来创建支持IDisposable接口的对象。或＆＃39;键入＆＃39;作为表示构造函数的函数值，表示资源可能由生成的值拥有。

此外，在文件下面获得一条蓝色波浪线 - 我将其缩短为例子。我也得到了完整路径的蓝线。

查看此警告给了我这个Update warning message when creating IDisposable without 'new'，我不知道必须接近这个。

由于

Answer 1

仅采用路径的StreamWriter构造函数会创建一个覆盖文件的流。传递true允许附加：

open System.IO

let name = "Fred Thompson" 

let addLine (name: string) =
    use wr = new StreamWriter("c:\\tempsource\\test.txt", true)
    wr.WriteLine name

addLine name

向文本文件添加新行的问题

1 个答案: