我用TDataSetProvider、TADOQuery写了一个服务。设置如下:
ADOQuery1连接一Access数据库
TDataSetProvider.DataSet := ADOQuery1
TDataSetProvider.ResolveToDataSet := True客户端:
用DCOMConnection连接服务器端
ClientDataSet1的ProviderName为DataSetProvider1
其已经连接成功,但现在我想在客户端写SQL语句,或向服务器端的ADOQuery控件中传递参数应如何完成!解决即刻送分! 谢谢各位支持!

解决方案 »

  1.   

    sql="select * from tablename"
    ClientDataSet1.CommandText=sql
      

  2.   

    sql := 'select * from table1';
    ClientDataSet1.CommandText := sql;
    ClientDataSet1.Open;
      

  3.   

    按照
    sql := 'select * from table1';
    ClientDataSet1.CommandText := sql;
    ClientDataSet1.Open;
    执行后, 出现如下错误提示,是为什么?CommandText changes are not allowed.
      

  4.   

    服务器的provider 的option 中的poAllowcommandText设为True
      

  5.   

    服务器的provider 的option 中的poAllowcommandText设为Trueclientdataset1.close;
    sql := 'select * from table1';
    clientdataset1.commandtext:='';
    ClientDataSet1.CommandText := sql;
    ClientDataSet1.Open;
      

  6.   

    provider.option.AllowcommandText:=True;
      

  7.   

    ClientDataSet1.Close;/////////////////////////加这句
    sql := 'select * from table1';
    ClientDataSet1.CommandText := sql;
    ClientDataSet1.Open;