F# SqlDataProvider .NET Core 2.0：不支持环境事务登记问题求助

嘿，作为一个从C#转F#、也折腾过Suave的开发者，我太懂你这种“代码看着没问题但就是写不了数据库”的憋屈了！结合你说的情况——能读SQL Express但删不了数据，还搞不懂什么是环境事务——我给你梳理几个大概率能解决问题的方向：

Suave默认会给每个请求上下文绑定一个环境事务，简单说就是它自动帮你开启了一个事务，但如果你的代码没显式提交，或者这个事务的配置有冲突，所有写操作（删除、新增、更新）最后都会被悄悄回滚，看起来就像没执行过一样。而读操作不受影响，因为读可以在事务里正常执行，只是写的改动被撤销了。

方案1：手动控制事务（更可控，推荐） #

既然你不在意事务行为，只想让写操作生效，那直接在数据访问代码里显式创建、提交事务就行，绕过Suave的自动事务。比如用原生ADO.NET写删除逻辑：

open System.Data.SqlClient

let deleteItem itemId =
    // 注意用use关键字自动释放资源
    use conn = new SqlConnection("你的SQL Express连接字符串")
    conn.Open()
    // 显式开启事务
    use tx = conn.BeginTransaction()
    try
        use cmd = new SqlCommand("DELETE FROM YourTable WHERE Id = @Id", conn, tx)
        cmd.Parameters.AddWithValue("@Id", itemId) |> ignore
        // 执行删除
        let affectedRows = cmd.ExecuteNonQuery()
        // 关键！一定要提交事务
        tx.Commit()
        if affectedRows > 0 then Ok "删除成功" else Error "未找到对应数据"
    with
    | ex ->
        tx.Rollback()
        Error $"删除失败：{ex.Message}"

方案2：直接禁用Suave的环境事务 #

如果你完全不想碰事务，也可以在启动Suave服务器时关掉自动事务功能，修改配置即可：

open Suave
open Suave.Filters

// 你的路由定义
let app = choose [
    path "/delete/:id" >=> fun ctx ->
        let itemId = ctx.request.queryParam "id" |> function
            | Ok id -> int id
            | Error _ -> 0
        match deleteItem itemId with
        | Ok msg -> Successful.OK msg
        | Error err -> RequestErrors.BadRequest err
]

// 禁用环境事务的配置
let config =
    { defaultConfig with
        binding = HttpBinding.createSimple HTTP "0.0.0.0" 8080
        // 清除上下文的事务绑定
        webPart = fun ctx -> ctx |> withoutTransaction |> app }

startWebServer config app

• 数据库权限：确认你的SQL Express账号有写入/删除权限！很多时候读权限开了，但写权限没配置，操作会静默失败。
• 连接字符串：试试在连接字符串里加Enlist=false，阻止自动登记到Suave的环境事务里，比如：

  "Server=.\SQLEXPRESS;Database=YourDB;Trusted_Connection=True;Enlist=false;"
  

• 日志排查：在数据操作前后加日志（比如printfn），看看代码到底有没有执行、有没有抛出异常——有时候异常被吞了，你以为没执行其实是报错了没捕获到。

内容的提问来源于stack exchange，提问作者MrD at KookerellaLtd