向SQL数据库追加一批数据,我的做法是用Merger方法将EXCEL类型数据合并到数据表中,再执行保存命令,
由于数据量较大(80列,2000行),保存比较耗时(可能是我的方法有问题)做了一个进度条,代码如下:
Dim s As Integer
Dim jd As WinForm.ProgressBar = e.Form.Controls("ProgressBar1")
jd.Minimum=0
jd.Maximum=Tables("测试").Rows.Count
e.Form.Controls("ProgressBar1").Visible=True
For s = 0 To Tables("测试").Rows.Count-1
Tables("测试").Rows(s).Save()
If s Mod 20 = 0 Then
jd.Value=s
Application.DoEvents()
End If
Next
MessageBox.Show("导入完成!","提示")
现在主要想解决保存的速度问题,搜了一下论坛贴子,说是用事务,但这句不知道怎么弄
cmd.CommandText = "save From {测试}"
或者各位老大有什么好办法,请赐教!