首先DATABASE控件:
Params.Clear;
Params.Add('DATABASE NAME=master');
Params.Add('SERVER NAME='+szServerName);
//Params.Add('USER NAME=sa');
Params.Add('USER NAME='+ szCZYName);
Params.Add('PASSWORD='+szPassword);
执行SQL语句:
SQL.Clear;
SQL.add('CREATE DATABASE '+szNewDBName);
SQL.Add('ON ( NAME = '+szNewDBName+'_dat,');
SQL.Add('FILENAME = "'+szPath+'\'+szNewDBName+'.mdf",');
SQL.Add('SIZE = '+IntToStr(iNewDBSpace));
if Formmain.CheckBoxZDRL.Checked then
SQL.Add(', MAXSIZE = '+IntToStr(iNewDBSpace*5))
else SQL.Add(', MAXSIZE = UNLIMITED');
SQL.Add(', FILEGROWTH = 5 )');
SQL.Add('LOG ON (NAME = "'+szNewDBName+'_log",');
SQL.Add('FILENAME = "'+szPath+'\'+szNewDBName+'.ldf",');
SQL.Add('SIZE = '+IntToStr(20));
SQL.Add(', MAXSIZE = '+IntToStr(50));
SQL.Add(', FILEGROWTH = 5 )');
然后DATABASE控件:
Params.Add('DATABASE NAME='+szNewDBName);
Params.Add('SERVER NAME='+szServerName);
Params.Add('USER NAME='+ szCZYName);
Params.Add('PASSWORD='+szPassword);
然后执行SQL语句:
SQL.Clear;
SQL.add('CREATE TABLE ');
……………………
Params.Clear;
Params.Add('DATABASE NAME=master');
Params.Add('SERVER NAME='+szServerName);
//Params.Add('USER NAME=sa');
Params.Add('USER NAME='+ szCZYName);
Params.Add('PASSWORD='+szPassword);
执行SQL语句:
SQL.Clear;
SQL.add('CREATE DATABASE '+szNewDBName);
SQL.Add('ON ( NAME = '+szNewDBName+'_dat,');
SQL.Add('FILENAME = "'+szPath+'\'+szNewDBName+'.mdf",');
SQL.Add('SIZE = '+IntToStr(iNewDBSpace));
if Formmain.CheckBoxZDRL.Checked then
SQL.Add(', MAXSIZE = '+IntToStr(iNewDBSpace*5))
else SQL.Add(', MAXSIZE = UNLIMITED');
SQL.Add(', FILEGROWTH = 5 )');
SQL.Add('LOG ON (NAME = "'+szNewDBName+'_log",');
SQL.Add('FILENAME = "'+szPath+'\'+szNewDBName+'.ldf",');
SQL.Add('SIZE = '+IntToStr(20));
SQL.Add(', MAXSIZE = '+IntToStr(50));
SQL.Add(', FILEGROWTH = 5 )');
然后DATABASE控件:
Params.Add('DATABASE NAME='+szNewDBName);
Params.Add('SERVER NAME='+szServerName);
Params.Add('USER NAME='+ szCZYName);
Params.Add('PASSWORD='+szPassword);
然后执行SQL语句:
SQL.Clear;
SQL.add('CREATE TABLE ');
……………………
2、在DELPHI中调用BCP或ISQL执行这个SQL;
3、将数据(已被导出为文件)用BCP命令分别导入相应的表中。