小编Cas*_*dit的帖子

我暂时试图找出一种从F#插入SQL Server的方法.

我有一个F#函数,它按照用户定义的模式迭代文件夹中的所有文件.然后我可以使用返回的数据放入列表或(理想情况下)插入数据库.

我已经有一个正常工作的insert-to-sql函数:

let execNonQuery conn s =
let comm = 
    new SqlCeCommand(s, conn)
try 
    comm.ExecuteNonQuery() |> ignore
with e ->
    printf "Error : %A\n" e

let string = "insert into MyTable (MyColumn) values ('test .. again')"
execNonQuery conn string; // works

我正在尝试使此方法正常工作:

let rec getAllFiles dir pattern =
    seq { yield! Directory.EnumerateFiles(dir, pattern)
          for d in Directory.EnumerateDirectories(dir) do
              yield! getAllFiles d pattern }

let getApplications (dir : string) (extension : string) = 
    getAllFiles  dir extension
    //|> Seq.toList // …