VB & SQL 的，问了很多人都没结果

Question

1.
dim as strSQL1,strSQL2,strSQL3,strSQL14.....
str=str1 &  ";" & str2 ......
cn.execute str2.
cn.begintrans
cn.execute StrSQL1
cn.execute StrSQL2
cn.execute StrSQL3
cn.cominttrancs

Answer 1

你可以将复合语句写在过程中，然后调用过程即可
cn.execute('exec yourprocedure') 

Answer 2

  还有一个问题
Cn as rdoConnection
Cn.Execute ("if object_id('testcre2') is not null drop table testcre2") --(1)
Cn.Execute ("create table testcre2 ( i int not null,k int not null)")  --(2)
本来我是没有 testcre2表的，现在第一句没通过，如果把第一句注释掉，第二句通过了，
为什么第一句错了？他报错：无效sql语句，期待"delete","insert","update"，"select",
"procedure" 到底什么意思？不支持第一句的语法？我用的是vb6专业英文版 

Answer 3

将复合语句写在过程中，然后调用过程即可
例如一个过程是：
sub Pro_a (  )
.......
end sub
过程里面，就直接这样写？不行的。该怎么写。if object_id('table_name') is not null
begin 
............
end那么 cn.execute(  ),这里括号里格式是怎么样的。我找不到说明啊！
帮帮忙，各位大哥!