关于ADO连接数据库的问题

Question

原来我是搞VB的,VB程序中用ADO连接数据库可以直接用代码连,现在我学DELPHI,我想知道不通过ADO控件,在代码中直接实现连接查询该怎么实现.
比如说一个身份验证功能,要连接到远程SQL服务器查证用户和密码.我该怎么"连接","查询"望,各位赐教.谢谢.

Answer 1

联接数据库，不用ado也得用其他数据库连接组件吧

Answer 2

uses comobj
//要伸明comobj  下面为连接代码:var
  adoc,ador:variant;
begin
  adoc:=createoleobject('adodb.connection');
  adoc.open('Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=customer;Data Source=BERN');
  ador:=createoleobject('adodb.recordset');
  ador.activeconnection:=adoc;
  ador.CursorType:=ctDynamic;
  ador.open('select * from t_customer',adoc);   
end;

Answer 3

跟vb使用差不多，都需要ADOCOnnect ADOQuery ADOTable等组件，连接数据库通过那个ConnectionString属性，
打开看看，对话框都和VB时一样，连接方法都一样。只是注意使用Delphi语法就行了。
查询就使用那个ADOQuery吧。vb时你一定使用过。

Answer 4

uses   comobj 
//要伸明comobj     下面为连接代码: var 
    adoc,ador:variant; 
begin 
    adoc:=createoleobject('adodb.connection'); 
    adoc.open('Provider=SQLOLEDB.1;Persist   Security   Info=False;User   ID=sa;Initial   Catalog=customer;Data   Source=BERN'); 
    ador:=createoleobject('adodb.recordset'); 
    ador.activeconnection:=adoc; 
    ador.CursorType:=ctDynamic; 
    ador.open('select   *   from   t_customer',adoc);       
end;仙女:  
  :)
  不好意思,我不知道你这要申明COMOBJ是什么意思,这是个自己写的函数吗?所以引用前要在USES里先申明?是这个意思吗?

Answer 5

我照着仙女小妹说的做了,
1.在USES里加入了引用"COMOBJ"
2.在一个事件里定义了ADOC,ADOR为VARIANT
3.但在代码里输到adoc:=createoleobject('adodb.时就报错
4.报错信息是Unable to invoke code completion due to errors in source code这是为什么呀???:(((,我怎么这么笨呀.

Answer 6

楼上的,我也知道就是创建个ADO对象,但我不会呀.郁闷.

Answer 7

to ncfreetime ---
不好意思,创建了ado对象,当然要加入db和adodb;