动态创建sqlserver数据库 ( 积分: 100 )

  • 主题发起人 主题发起人 lvxiaohong702
  • 开始时间 开始时间
L

lvxiaohong702

Unregistered / Unconfirmed
GUEST, unregistred user!
象 cat := createoleObject('ADOX.Catalog');
cat.create('Provide=Microsoft.Jet.OLEDB.4.0;DataSource='+DBName);
能创建ACCESS数据库
那有类似的方法 能动态创建SQLSERVER数据库吗???
 
SQL DMO组件来创建,或直接连接SQL Server服务器,用SQL 语句创建
 
create database
 
在delphi里写代码完成这个功能
不是通过sqlserver直接来执行sql语句
 
自己顶下.......[red][/red]
 
連接server用create database
 
with Tadoconnection.Create(nil) do
begin
close;
LoginPrompt:=false;
ConnectionTimeout:=0;
CommandTimeout:=0;
ConnectionString:=strDconn;
try
Execute('drop database aaa');
except
on e:exception do
begin
if pos('正在使用',e.Message)>0 then
begin
Dialogs.showmessage('数据库正被其他应用打开,请先关闭其他应用后再试。');
bStop:=true;
exit;
end;
end;
end;

try
Execute('create database aaa');
except
Dialogs.showmessage('建立数据库失败');
end;
 
http://www.delphibbs.com/keylife/iblog_show.asp?xid=25101
 
创建后,问题是数据库文件放哪儿??最好要指定位置呀!!
 
多人接受答案了。
 
有不同方法的 可以继续啊
 
没人继续发言了?[:)]
 

Similar threads

后退
顶部