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参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
把已有数据（数据大于20行）的RS(recordset)的第10行数据与第11行数据做加法后，删除第11行的数据，然后把后面的数据向前移。
RS的话修改数据是会更新数据库，现在的问题是RS里的已有数据是用SQL语句分类统计出来的 ......
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
dim a as string,b as string，c as string
a="工程编号,单位工程名称,分部工程编号"
b="单位工程名称"
c="单位"
怎么才能判断出a字符串中存在b字符串，而不存在c字符串
看看i ......
