VB向数据库中写入多条数据时速度怎么能提高？
我想向SQL SERVER 2008中写入大量数据（几亿条），没条数据只有几个字节，如何能够提高写入的速度呢？我现在写100万条就要20多分钟，请问大家有什么好的解决办法呢？
这个最好是使用批量导入的方式,很快的,就是和DTS相关的方式,甚至你可生成CSV格式的文件
印象中,一般来说比你直接用ado recordset去连接快至少一倍还不止(毕竟是几年前这样干啦).看你说的这个数据量,那还是DTS吧,他是SQL SERVER上自带的工具
请问是使用哪种数据源导入呢？我数据量比较大，单表要到1亿行，2.5个G
我VB代码：
Private Sub Command1_Click()
Dim I As Long
Dim RECORD1 As ADODB.Recordset
Label2.Caption = Now()
Set RECORD1 = New ADODB.Recordset
For I = Text1.Text To Text2.Text Step 10000
K = ""
For J = I To I + 9999
K = K & DigestStrToHexStr(Trim(J))
Next
selestr = "insert into num(word) values ('" & K & "')"
With RECORD1
.ActiveConnection = adoConnection
.CursorLocation = adUseClient
.LockType = adLockOptimistic
.Open selestr
End With
DoEvents
Label1.Caption = I
Next
Label3.Caption = Now()
Set RECORD1 = Nothing <
相关问答：
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not ......
现在我想根据treeview上每个节点的权限，没有权限的节点不能被选中，而且成灰色，怎么实现，在线等。。。
这个？。。。
貌似没法。
试试能不能改某些node的颜色，记录下上次的nodeclick里的node。
下次点击的如� ......
现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
form1中有text1-8， 和command1
text8中为程序代码（生成窗体为form2（已做好））
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题
......
