我有一个BDE做的程序,可因为BDE不支持SQL中的nvarchar的数据类型,所以,要转到ADO,可是,小弟我不会使用ADO,怎么办呢?后来听说有个CSDN的地方,那里都是高手。所以,就来请教各位。麻烦各位能告诉我,怎么使用ADO的详细方法!小生我在这里谢谢各位了!

解决方案 »

  1.   

    基本上没有区别。
    把Table换为ADOTable,Query换为ADOQuery.
    需要注意的事项:
    确定所有的ADOQuery、ADOTable、ADOStoredProc等都联接了ADOConnection 对smalldatetime、int、float等类型的参数的赋值必须是合法的值,不能赋空字符串。例如:Else Parameters.ParamValues['@cm_birtdate'] := '';这句删除掉或者把赋的值改为Null即可
    所有的ADOQuery、ADOStoredProc的Parameters中,所有的Parameter的ValueType不能是Unassigned
      

  2.   

    在BDE中,query语句的用法是:query.close;/query.sql.clear;/query.sql.add();/query.open.
    可是在ADO中呢?用什么语句来写呢?请详细高之!谢谢了!最好能写个例子出来!
      

  3.   

    不是告诉你了吗?没有什么区别!
    ADOQuery.Close;
    ADOQuery.SQL.Clear;
    ADOQuery.SQL.Add();
    ADOQuery.Open;
      

  4.   

    我也刚刚做了一个程序的转化的问题,,就是bde 转为ado的
    有事联系我!28974959
    [email protected]
      

  5.   

    我是用了,ADOConnection1,adoquery,dbgrid,datasource四个组件,可是不能显示,查询语句如下:连接方法仿照的BDE
    procedure TForm1.Button1Click(Sender: TObject);
    var str:string;
    begin
    str:='select * from 目标明细表A1';
    adoquery1.Close;
    adoquery1.SQL.Clear;
    adoquery1.SQL.Add(str);
    adoquery1.Open;
    end;
      

  6.   

    一般来说需要ADOConnection,ADOQuery,DataSource,再就是DBGrid等组件了,大致如下:      ADOConnectionFMSDB1.Connected := False;
          ADOConnectionFMSDB1.ConnectionString := '';
          ADOConnectionFMSDB1.ConnectionString := s_IniFile.ReadString('Options','FMSDB1','');
          ADOConnectionFMSDB1.Connected := True;
          s_ADOQuery := TADOQuery.Create(Self);
          s_ADOQuery.Connection := frmMain.ADOConnectionFMSDB1;
          s_ADOQuery.Close;
          s_ADOQuery.SQL.Clear;
          s_ADOQuery.SQL.Text := 'update pub9007 set parameter_Value='+QuotedStr(Trim(frmSet.edtAmt.Text))+
                                 ',re_='+QuotedStr(Trim(frmSet.cboCur.Text))+
                                 ',modify_user='+QuotedStr(g_User_ID)+
                                 ',modify_date='+QuotedStr(DateTimeToStr(now))+
                                 ',modify_Office='+QuotedStr(g_Office_Code)+
                                 ' where System_Code =''DOC'''+
                                 ' and Parameter_Type=''CHARGE'''+
                                 ' and Parameter_Name=''DOC''';
          s_ADOQuery.ExecSQL;
      

  7.   

    adoquery,datasource,dbgrid,设置adoquery的ConnectionString属性和datasource的Dataset属性,dbgrid再连接datasource
      

  8.   

    Delphi的帮助放在那里,为什么不看呢?里面就有例子!