解决方案 »

  1.   

    procedure TForm2.FormCreate(Sender: TObject);
    begin
      ADOConnection1.ConnectionString := 'Provider=SQLNCLI.1;Password=8DontNo;Persist Security Info=True;' +
                'User ID=sa;Initial Catalog=master;Data Source=omcs-dev-server\jira';  ADOQuery1.SQL.Text := 'if not exists(select 1 from dbo.sysdatabases where Name=''aaa'') '+
                            '  Create Database aaa ';
      ADOQuery1.ExecSQL;
    end;
      

  2.   

    .
    请问‘Data Source=omcs-dev-server\jira’是什么意思呀,是创建数据源吗?它是怎样与数据库aaa建立联系的呀?
      

  3.   

    你是不是odbc用的太多了,用ado就可以直接连接了。不用建立数据源。代码参考2\3楼
      

  4.   

    omcs-dev-server\jira这是sql server服务器。
    创建数据库成功后,把数据库指向 aaa
     ADOConnection1.ConnectionString := 'Provider=SQLNCLI.1;Password=8DontNo;Persist Security Info=True;' +
                'User ID=sa;Initial Catalog=aaa;Data Source=omcs-dev-server\jira';
     
      

  5.   

    用第三方控件也行,比如我用的UniDAC