关于VB中嵌入SQL的问题

[cerelly]

各位大虾：
小弟在Sql7.0的Qeury Analyzer中用如下的语句建了一个数据库
CREATE DATABASE Acase
ON
( NAME = 'Acase',
FILENAME = 'c:\Mssql7\data\Acase_data.mdf',
SIZE = 25,
MAXSIZE = 30,
FILEGROWTH = 5 )
LOG ON
( NAME = 'Acase_log',
FILENAME = 'c:\Mssql7\data\Acase_log.ldf',
SIZE = 10MB,
MAXSIZE = 80MB,
FILEGROWTH = 5MB )
Go

这个语句的执行是成功的，但是我在VB6.0中就不能调试成功了；-/
下面是我的VB Code:
Set conn = CreateObject("ADODB.CONNECTION")
conn.Open "Provider=SQLOLEDB;Data Source=" & "" & ServerName & "" & ";uid=sa;pwd=" & "" & ServerPasswd & "" & ";database=master"
StrSql = "CREATE DATABASE 'Acase'" & _
vbCr & "ON" & _
vbCr & "(NAME = 'Acase'," & _
vbCr & "FILENAME = 'c:\Mssql7\data\Acase_data.mdf',SIZE =25,MAXSIZE= 30,FILEGROWTH = 5 )" & _
vbCr & "LOG ON" & _
vbCr & "(NAME = 'Acase_log'," & _
vbCr & "FILENAME = 'c:\Mssql7\data\Acase_log.ldf'," & _
vbCr & "SIZE = 10MB, MAXSIZE = 80MB, FILEGROWTH = 15MB)"
MsgBox StrSql
conn.Execute StrSql

每次编译的错误号是“-2147217900”
错误信息是：“Line1:Incorrect syntax near 'Acase'”

[cerelly]

谢谢你：）！

[The_east_key]

请到http://www.etechbase.net/advsearch.php，将你这个问题输入到检索框，然后选择准确匹配查询，应该可以帮助你解决这个问题的。

[xiaow]

将StrSql = "CREATE DATABASE 'Acase'" & _
改为StrSql = "CREATE DATABASE Acase" & _
错在多了两个单引号。