怎样用ado 创建 SQLserver 数据库(50分)

本人在主创口添加了个ADOQuery控件用于创建数据库,调试通不过.代码如下.
str:='D:/Program Files/Microsoft SQL Server/MSSQL/Data/DBASE.mdf';
if adoquery1.active then
adoquery1.active:=False;
adoquery1.sql.clear;
adoquery1.sql.add('CREATE DATABASE DBASE on (NAME=DBASE-dat, FILENAME='+str+'size=5,maxsize=unlimited,filegrowth=5)');
adoquery1.execsql;

str :=
'CREATE DATABASE DBASE ON PRIMARY
(NAME = DBASE_Data, FILENAME = 'c://DBASE.mdf', SIZE = 5MB, MAXSIZE = unlimited, FILEGROWTH = 5%)
LOG ON (NAME = DBASE_Log, FILENAME = 'c://DBASE.ldf', SIZE = 1MB, MAXSIZE = unlimited, FILEGROWTH = 10%)'

连接到master数据库上

with adoquery do
begin
close;
sql.clear;
sql.add('Create Database Ddase on');
sql.add('(Name=DBASE_DATA, FILENAME="D:/Program Files/Microsoft SQL Server/MSSQL/Data/DBASE.mdf",SIZE = 1MB, MAXSIZE = unlimited, FILEGROWTH = 10%)');
Execsql;
end;

多人接受答案了。