该连接未关闭。连接的当前状态为开启 [英] The connection was not closed. The connection's current state is open

问题描述

 尝试
    如果functionmode =ADD然后，
        SQLStr =INSERT INTO boatmast VALUES（'＆放大器; gBoatType和放大器;，＆放大器; TxtBoat code.Text和放大器;，＆放大器; TxtBoatName.Text和放大器;，＆放大器;格式（txtBP.Text，## 0＃0）及'，'与＆amp;格式（txtBPM.Text，## 0＃0）及'，'与＆amp;格式（ txtLDA.Text，## 0＃0）及'，'与＆amp;，BPK'，'与＆amp;今日＆安培;'，'与＆amp; updtime＆安培;'，'BPK' '＆放大器;今天和放大器;，＆放大器; updtime＆安培;'）
    结束如果
    conn.Open（）
    SQLCmd.Connection =康恩
    SQLCmd.CommandText = SQLStr
    SQLCmd.ExecuteNonQuery（）
    conn.Close（）


抓住EX作为OdbcException
    MSGBOX（ex.ToString）
最后
    conn.Close（）
结束尝试
 

解决方案

现在的问题是，你叫conn.Close（）的两倍。保留你的finally块在您关闭连接。

 尝试

    如果functionmode =ADD然后，
                                        //想这也许是你columnNAmes //设置参数
        SQLStr =INSERT INTO boatmast（gBoatType，船code，BoatName，BP，BPM，LDA，BPK，今天，updtime，bpk2，Today2，updtime2）VALUES（@ gBoatType，@船code，@ BoatName， @BP，@ BPM，@ LDA，@ BPK，@今天，@ updtime，@ bpk2，@ Today2，@ updtime2）

      SQLCmd.Parameters.AddWithValue（@ gBoatType，gBoatType）
      //做其他的东西TIL @ updtime2

    conn.Open（）
    SQLCmd.Connection =康恩
    SQLCmd.CommandText = SQLStr
    SQLCmd.ExecuteNonQuery（）

  结束如果
抓住EX作为OdbcException
    MSGBOX（ex.ToString）
最后
     如果conn.State = ConnectionState.Open然后conn.Close（）
结束尝试
 

问候

Try
    If functionmode = "ADD" Then
        SQLStr = "INSERT INTO boatmast VALUES ('" & gBoatType & "','" & TxtBoatCode.Text & "','" & TxtBoatName.Text & "','" & Format(txtBP.Text, "##0.#0") & "','" & Format(txtBPM.Text, "##0.#0") & "','" & Format(txtLDA.Text, "##0.#0") & "','" & , 'bpk', '" & Today & "', '" & updtime & "', 'bpk', '" & Today & "', '" & updtime & "')"
    End If
    conn.Open()
    SQLCmd.Connection = conn
    SQLCmd.CommandText = SQLStr
    SQLCmd.ExecuteNonQuery()
    conn.Close()


Catch ex As OdbcException
    MsgBox(ex.ToString)
Finally
    conn.Close()
End Try

解决方案

The problem is you call conn.Close() twice. Retain your Close connection on your finally block.

Try

    If functionmode = "ADD" Then
                                        //Supposed this is you columnNAmes                                                     //Set parameters                 
        SQLStr = "INSERT INTO boatmast (gBoatType,BoatCode,BoatName,BP, BPM,LDA,bpk,Today,updtime,bpk2,Today2,updtime2) VALUES (@gBoatType,@BoatCode,@BoatName,@BP, @BPM,@LDA,@bpk,@Today,@updtime,@bpk2,@Today2,@updtime2)"

      SQLCmd.Parameters.AddWithValue("@gBoatType",gBoatType)
      //DO OTHER STUFF TIL @updtime2            

    conn.Open()
    SQLCmd.Connection = conn
    SQLCmd.CommandText = SQLStr
    SQLCmd.ExecuteNonQuery() 

  End If
Catch ex As OdbcException
    MsgBox(ex.ToString)
Finally
     If conn.State = ConnectionState.Open Then conn.Close()
End Try

Regards

这篇关于该连接未关闭。连接的当前状态为开启的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！