2,498
社区成员
发帖
与我相关
我的任务
分享请问delphi地控制台程序（console application）里怎样访问sql数据库？
我在里用BDE和ADO都试过了，还是不能访问。怎样才能解决这个问题？请高手指教！
...全文
请发表友善的回复…
发表回复
cougar87 2002-07-15
- 打赏
- 举报
consle application 下好像不能用createoleobject函数吧。。
我反正试了不行，这个错误和在dlls里调用createoleobject出现的错误一样。
那位要是知道原因可否告诉我一下。oicq：1993823
我反正试了不行，这个错误和在dlls里调用createoleobject出现的错误一样。
那位要是知道原因可否告诉我一下。oicq：1993823
xiaoxingchi 2002-07-11
- 打赏
- 举报
好像是不能访问的吧？
如果试出来了，给我发Email:csdn@huyou.com
如果试出来了，给我发Email:csdn@huyou.com
North_beggar 2002-07-11
- 打赏
- 举报
利用CreateOleObject()创建ADO原生对象，如下：
1.connection:=CreateOleObject('ADODB.Connection');
connection.Open(connectionString);
2.recordset:=CreateOleObject('ADODB.Recordset');
recordset.activeConnection:=connection;
recordset.Open('Select * from Table',connection,adOpenStatic,
adLockOptimistic,adCmdText);
3.Operate your dataset.
4.recordset.Update;
Over.
1.connection:=CreateOleObject('ADODB.Connection');
connection.Open(connectionString);
2.recordset:=CreateOleObject('ADODB.Recordset');
recordset.activeConnection:=connection;
recordset.Open('Select * from Table',connection,adOpenStatic,
adLockOptimistic,adCmdText);
3.Operate your dataset.
4.recordset.Update;
Over.
huangbin277 2002-07-11
- 打赏
- 举报
up
lx_king 2002-07-11
- 打赏
- 举报
应该可以吧
var
Qry : TQuery;
being
Qry:=TQuery.Create(Application.owner);
......
Qry.Free;
end;
var
Qry : TQuery;
being
Qry:=TQuery.Create(Application.owner);
......
Qry.Free;
end;
oyqy 2002-07-11
- 打赏
- 举报
up
HHBB 2002-07-10
- 打赏
- 举报
建立数据模块。
