用VB 如何批量执行SQL语句呀？
如下面的一段代码：
CREATE TABLE tblCreditLimit (
Limit DOUBLE)
INSERT INTO tblCreditLimit
VALUES (100)
ALTER TABLE tblCustomers
ADD COLUMN CustomerLimit DOUBLE
ALTER TABLE tblCustomers
ADD CONSTRAINT LimitRule
CHECK (CustomerLimit <= (SELECT Limit
FROM tblCreditLimit))
UPDATE TABLE tblCustomers
SET CustomerLimit = 200
WHERE CustomerID = 1
谢谢
问题点数：20、回复次数：7Top
1 楼hank212（IT民工）回复于 2006-05-02 15:11:48 得分 0
可以一句一句地执行啊．
Top
2 楼wwh999（印钞机V2.0...开发中....）回复于 2006-05-03 17:21:50 得分 0
[VB] 执行SQL脚本文件(.sql)的两种方法
1.
----------------------------------------------------------------------------------------------------------
Public Sub ExecuteSQLScriptFile(cn as ADODB.Connection,sqlFile As String)
Dim strSql As String, strTmp As String
Open sqlFile For Input As #1
strSql = ""
Do While Not EOF(1)
Line Input #1, strTmp
If UCase$(strTmp) = "GO" Then
cn.Execute strSql
strSql = ""
Else
strSql = strSql & strTmp & vbCrLf
End If
Loop
If strSql <> "" Then cn.Execute strSql
Close #1
End Sub
2.
----------------------------------------------------------------------------------------------------------
Public Sub ExecuteSQLScriptFile(cn as ADODB.Connection,sqlFile As String)
Dim sql as string
sql="master.dbo.xp_cmdshell ' osql -U username -P password -i " & sqlFile
cn.execute sql
End Sub
Top
3 楼fishmans（金脚指）回复于 2006-05-03 19:45:54 得分 0
多个语句建议用事务~~
Top
4 楼ChinaConner（风化）回复于 2006-05-09 09:22:37 得分 0
使用；号吧需要一起执行的语句连成一段COMMAND。然后一起执行。Top
5 楼yuvotesyg518（青出于蓝）回复于 2006-05-09 09:28:27 得分 0
把你的多条语句写成一个存储过程不就行了。
Top
6 楼Freshmen007_Bug（）回复于 2006-05-09 17:41:48 得分 0
把SQL语句都放到一个数组中，
然后使用Command对象执行即可（Command.Execute）。Top
7 楼Freshmen007_Bug（）回复于 2006-05-09 17:42:29 得分 0
当然，要对数组中的每一个元素的数据执行一次。Top
