共7 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：关于 sqlBulkCopy 执行报错【已解决】
1楼
km007 发表于：2023/9/21 11:53:00Dim dt As DataTable = DataTables("TableA")
Dim conStr As String = "server=192.168.0.100,1433;uid=sa;pwd=Aa123456;database=ceshi2023"
Dim tran As System.Data.SqlClient.SqlTransaction
Dim conn As New System.Data.SqlClient.SqlConnection(conStr)
Try
Dim st As Date = Date.Now '计算耗时
conn.Open() '执行到这里会报错
此主题相关图片如下：微信图片_20230921114937.png
[此贴子已经被作者于2023/9/21 14:42:00编辑过]
2楼
有点蓝 发表于：2023/9/21 12:00:00如果连接字符串没有问题，这句代码不可能出错的，检查其它代码
3楼
km007 发表于：2023/9/21 13:52:00Dim dt As DataTable = DataTables("TableA")
Dim conStr As String = "server=192.168.0.100,1433;uid=sa;pwd=Aa123456;database=ceshi2023"
Dim tran As System.Data.SqlClient.SqlTransaction
Dim conn As New System.Data.SqlClient.SqlConnection(conStr)
Try
Dim st As Date = Date.Now '计算耗时
conn.Open()
……
Catch ex As exception
tran.Rollback() '找到原因了，是这句报的错
MessageBox.Show("批量插入失败,原因:" & ex.message)
Finally
conn.Close() '必须关闭，否则内存会一直泄露
End Try
4楼
有点蓝 发表于：2023/9/21 13:54:00这个代码根本就没有用到事务，去掉即可
5楼
km007 发表于：2023/9/21 13:56:00Dim dt As DataTable = DataTables("TableA")
Dim conStr As String = "server=192.168.0.100,1433;uid=sa;pwd=Aa123456;database=ceshi2023"
Dim tran As System.Data.SqlClient.SqlTransaction
Dim conn As New System.Data.SqlClient.SqlConnection(conStr)
Try
Dim st As Date = Date.Now '计算耗时
conn.Open()
tran = conn.BeginTransaction()'开始事务
……
Catch ex As exception
tran.Rollback() '找到原因了，是这句报的错
MessageBox.Show("批量插入失败,原因:" & ex.message)
Finally
conn.Close() '必须关闭，否则内存会一直泄露
End Try
6楼
有点蓝 发表于：2023/9/21 14:05:00Dim tran As System.Data.SqlClient.SqlTransaction
Dim conn As New System.Data.SqlClient.SqlConnection(conStr)
Dim st As Date = Date.Now '计算耗时
conn.Open()
tran = conn.BeginTransaction()'开始事务
Try
7楼
km007 发表于：2023/9/21 14:13:00解决了
Dim tran As System.Data.SqlClient.SqlTransaction
Dim conn As New System.Data.SqlClient.SqlConnection(conStr)
Try
conn.Open() '打开链接
Catch ex As exception
conn.Close() '必须关闭，否则内存会一直泄露
MessageBox.Show("链接服务器失败,原因:" & ex.message)
Return Nothing
End Try
Try
Dim st As Date = Date.Now '计算耗时
tran = conn.BeginTransaction()'开始事务
共7 条记录, 每页显示 10 条, 页签:
[1]