Delphi6中创建数据库错误,请大家帮忙

                            
Delphi6+SQLServer2000+Ado+Odbc,程序如下:   
  cn:='Provider=MSDASQL.1;Persist   Security   Info=False;Data   Source=MyDsn;Initial   Catalog=master';  
  sql:='select   *   from   sysdatabases   where   name='+''''+'MyDB'+'''';  
  Adoqry.ConnectionString:=cn;  
  Adoqry.Close;  
  Adoqry.SQL.Clear;  
  try  
      Adoqry.SQL.Add(sql);  
      Adoqry.Open;  
  except  
      begin  
          application.MessageBox('连接数据库失败,请检查ODBC数据源!','连接失败',mb_ok+mb_iconstop);  
          application.Terminate;  
      end;  
  end;  
  if   Adoqry.Eof   then  
  begin  
      sql:='CREATE   DATABASE   MyDB';  
      Adoqry.Close;  
      Adoqry.SQL.Clear;  
      Adoqry.SQL.Add(sql);  
      Adoqry.ExecSQL;  
  end;  
  当运行到最后的Adoqry.ExecSQL时发生错误。Adoquery控件是不是只能建表不能建库?请问该如何建库?

查看回复