ADO问题(100分)

  • 主题发起人 主题发起人 nuke
  • 开始时间 开始时间
N

nuke

Unregistered / Unconfirmed
GUEST, unregistred user!
ADO连接一个数据库,如果数据库不存在,则自动新建数据库MyDB以及数据库表MyTable
默认数据库为Access

请问该如何实现呢?
:)
最好有源代码。

谢谢。

 
先搜索数据库,如不在用sql语句创建吧!
 
建库和建表SQL语句有了,如何通过ADO组建执行它呢?
我试了,总是失败

谁能给出可行的代码,全部分送上
 
你得先用ADOConnection1连接到数据库所以的服务器(如SQL server,先指定一个缺省数据库),
之后用ADOQuery执行你的sql 语句,
 
to yakuba :
可以给一个例程么?
我对ADO还不怎么了解,自己搞不定的说

多谢
:)
 
ACCESS 我就不知了,ADO的所以操作都是建军立的连接对象(ADOConnect)之上的,所以必
须要先建立连接,给点参考,不知是否有用:

如果是sql server 只要先将 ADOconnect 连接到 server 上,就可以调用 sql语句的
create database 来建了,
 
你在建立窗口的时候,首先用一个adoquery连接一下数据库,
用一个try.....Except
如果可以连接,
那么使一个BOOLEAN变量保存为一个真,如果是错误的,那么把这个变量变为假。
然后如果是错误的,就使用adoquery建立数据库和数据表。
是不是我这么理解的?
 
you can create a acess datebase on you computer fisrt.
then you can compile it in you exe file .
then when you run the exe file ,use streamtofile create a acess file
then create ado connectstring dynamic then a datebase be created
you can modifid this datebase as you want

this method called 样本 datebase
 
用ADOConnection连接一下
//试着连接数据库
Try
ADOConnection.Connect:=true
except
//建库,建表
end;不就行了!

建库参见:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=493448
建表与之类似,也可用SQL脚本
 
to 杜宝:
俺忍不住要打抱不平了,----连接都没有建立成功,怎么建库呀?你不是哄傻孩子吗?
我倒同意lucksc的建议 :)
 
aceess is a database based on file ,that is mean a database is a file ,
so the ADO connection must know the file name,when the file not exist,
ADO connection is imposibble to be created,or create a acess database file
by ado ,you must create youself
 
to yakuba:
老兄,我用的是ADOX,不是ADO,它和ADO是否连接没有关系,拜托你看仔细一点.
 
自己转贴一下:

ADOX的Catalog就有此功能的:
Const
ADS='Provider=ms..... Data Source=你的文件名.....';//就是你的连接字符串了
var
Catalog:TADOXCatalog;//根据你的ADOX名称定相关类名
...
Catalog:=TADOXCatalog.Create;
try
CataLog.Create(DS);//就可以建表了!
//这时再ADO再连接就没有问题了,可以用SQL建表了。但也可以:
//再建立TADOXTable对象,建表,
ADOXTable1:=ADOXTable1.Create;
ADOXTable1.Name:='yourname';
ADOXTabel.ParentCatalog:=CataLog;
//用与表一样的方法建立TADOXColumn对象
Col:=coColumn.Create;
with Col do
begin
ParentCatalog:=Catalog;
Name:=
Type_:=
end;
....
ADoxTable1.Columns.Append(Col,0,0);
....
Catalog.Tables.Append(Table);
就可以了!
相关的讨论请看我上面的贴子
http://www.delphibbs.com/delphibbs/dispq.asp?lid=493448
 
接受答案了.
 
后退
顶部