你好像用的VB的语法,如果你用的是delphi的话,这样改:
1、在单元文件的Uses 中加入 DB,ADODB;
2、将你上面的代码改成:
 Var
   Adoc:TADOConnection;
   Ador:TADOQuery;
begin
  Adoc:=TADOConnection.Create(Form1);  //创建组件实例
  adoc.ConnectionString:='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=develop;Data Source=(Local)';
  //上面访问的是本地(Local)SQL数据库服务器,数据库名叫develop,用户名为sa
  adoc.Open;  //打开连接
  ador:=TadoQuery.Create(form1); //创建组件实例
  ador.Connection:=adoc; //表明用adoc连接数据库
  ador.SQL.Add('select * from ABC');
  ador.Open;  //执行查询
  ador.Recordset.MoveFirst;  //访问第一条数据
  ...end;

解决方案 »

  1.   

    简单的写几句
    adoc:=createoleobject('adodb.connection');
    adoc.open('........');
    ador:=createoleobject('adodb.recordset');
    ador.activeconnection:=adoc;
    ador.open('select * from table',adoc,adopenstatic,adlockoptimistic,adcmdtext);
    大概就这么回事
      

  2.   

    可我一到:ador.activeconnection:=adoc;这句就出错啊!!!
    提示为:应用程序使用的参数或类型不正确...
      

  3.   

    搂住应该先:ador.activeconnection:=adoc;
     然后ador.execute('select ....');
      

  4.   

    把你的变量的定义改成
    Adoc:TADOConnection;
    Ador:TADORecordset;要引用ADODB  单元
    不知我上面的定义对不对很久没用了,
    你自已去看一下VCL 里的定义是什么
      

  5.   

    可是 ador.activeconnection:=adoc; 放到哪都有这样的错误提示啊!!