阿里云数据源，用如下代码保存数据。运行后显示“18”附近语法错误，影响了xxx行，感觉数据已经保存，但是关闭项目重新打开后表里数据全无，是什么原因？
Dim strlist As List(Of String) = Functions.Execute("sql提取函数",Tables("凭证"),"凭证","_Identify","[_Identify]","摘要|科目名称|科目编码|部门编码|供应商名称","摘要|科目名称|科目编码|部门编码|供应商名称",1)
Dim sql As String
Dim cmd As New SQLCommand
cmd.C
Dim Count As Integer = 0
try
Connections("cs").BeginTransaction
For Each s As String In strlist
cmd.CommandText = s
Count += cmd.ExecuteNonQuery()
output.show(s)
Next
Connections("cs").Commit '提交事务,所有操作生效
Catch ex As Exception '如果出错
msgbox(ex.message)
Connections("cs").Rollback() '回滚事务,撤销所有操作
End Try
Tables("凭证").DataTable.BaseTable.AcceptChanges() '提交修改
MessageBox.Show("耗时: " & (Date.Now - st1).TotalSeconds & "秒")
msgbox("影响行数:" & strlist.count)
加好友 
发短信
Post By：2017/9/20 22:50:00 [显示全部帖子]
