……
……
rs.Open "insert into …… from ……", cn, adOpenDynamic, adLockOptimistic
rs.Open "delete from …… where ……", cn, adOpenDynamic, adLockOptimistic
rs.Open "insert into …… From …… ", cn, adOpenDynamic, adLockOptimistic
rs.Open "delete from …… where ……", cn, adOpenDynamic, adLockOptimistic
rs.Open "update …… set …… ", cn, adOpenDynamic, adLockOptimistic
……
……
……
rs.Open "insert into …… from ……", cn, adOpenDynamic, adLockOptimistic
rs.Open "delete from …… where ……", cn, adOpenDynamic, adLockOptimistic
rs.Open "insert into …… From …… ", cn, adOpenDynamic, adLockOptimistic
rs.Open "delete from …… where ……", cn, adOpenDynamic, adLockOptimistic
rs.Open "update …… set …… ", cn, adOpenDynamic, adLockOptimistic
……
……
Open 的期待结果是 SQL 命令返回一个结果集
所以对于 Open 只能使用 SELECT 命令
像 INSERT DELETE UPDATE 等是不返回结果集的
只能使用 EXECUTE 命令
sql server 自动判断
"insert into ...(空格) " & _
"insert into ...(空格) " & _
"delete from ...(空格) " & _
"update set ...(空格) "
中間某句出錯時捕捉不到,當然效率比一句句執行要高得多。
1、在SQL的数据库中添加一个存储过程
2、在VB的数据环境中的属性中连接到SQL的数据库
3、在VB的数据环境中添加一个新command,改变其属性为该存储过程
4、在VB中调用该过程