如何寫入到F＃中的文件開頭＃

Question

我需要編寫一個運行編號 - 在現有文件的開頭。到目前爲止，我所能做的只是寫入每個文件的末尾。請幫忙嗎？

Answer 1

如何（警告未經測試的代碼！）：

open System.IO 
File.ReadAllText("c:\\old.txt") 
    |> fun s -> let r = new StreamReader(s) 
       let data = r.ReadToEnd 
       r.Close() 
       s.Close() 
       data 

let writeStringToFile d = 
    (File.OpenWrite("c:\\new.txt"), d) 
    |> fun ((s : FileStream), (d : string)) -> let r = new StreamWriter(s) 
               r.WriteLine("new data") 
               r.Write(d) 
               r.Close() 
               s.Close() 

getStringFromFile() 
|> writeStringToFile 

編輯：

更好的解決方案：

File.WriteAllText("c:\\new.txt", "new Text" + File.ReadAllText("c:\\old.txt"))