自动产生数据库的表，大家都会；若连数据库都没有，有没有办法产生？

Question

好象ADO可以做，具体的我不记得了。Sorry

Answer 1

动动脑子，SQL能不能有办法！

Answer 2

Dao的DbEngineer有个方法
function CreateDatabase(const Name, Locale: WideString; Option: OleVariant): Database; safecall;
  

Answer 3

我把我的方法提供给大家，绝对没问题，问题只有一个：创建的数据库是Access2000格式，要用Access2000才可以打开，代码如下：
uses ComObj;
//...省略
procedure TForm7.BitBtn1Click(Sender: TObject);
var
  CreateAccess:OleVariant;
begin
  CreateAccess:=CreateOleObject('ADOX.Catalog');
  CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Aceco.mdb');
end;在C:\下创建Aceco，可惜是Access2000格式！

Answer 4

ADO 有没有办法？！
如果通过OLe调用OFFICE的ACCESS
就没实际应用价值了，因为发布时不可能把OFFICE
系统发布到对方或要求对方一定装OFFICE.

Answer 5

空的数据库再变成资源打包到.EXE,可惜
ACCESS97空库有60K，用TBackupFile控
件能压到6K,再打包，不过TBackupFile
控件也占用80K;
 

Answer 6

使用ACCESS97数据库类型，
在ODBC 设定数据源时，若无数据库时，
可以“新建“一个无表的空数据库，
难道设计SQL语句时，就未想到须“自动创建”一空数据库?!
看似“简单”的“小”事，却难倒众高手,
真是“巧妇难为无米之饮”乎？“钻牛角尖”乎?

Answer 7

SQLserver中有 CREATE DATABASE...创建数据库
DROP DATABASE...删除数据库
等SQL语句，是否可以？

Answer 8

建议您访问www.etechbase.net/tech,里面有很多资料，也许可以解决您的问题。
访问http://168.168.18.11:81/etechbase/advsearch.php将您的问题输入查询内容框，选择不同的精确程度，即可以找到你所需要的答案。效果还是可以的。

Answer 9

各位，可以，看我的代码：
uses DAO97;procedure TForm7.BitBtn4Click(Sender: TObject);
var
 Engine:DBEngine;
begin
Engine:=CoDBEngine.Create;
Engine.CreateDatabase('c:\NewAccess.mdb',';LANGID=0x0804;CP=936;COUNTRY=0;',dbEncrypt);
end;

Answer 10

通用方法：一条SQL语句搞定：
CREATE DATABASE YourNewDataBaseNameBTW:
再一条SQL可以USE它：
USE YourNewDataBaseName