SQL.Add('INSERT INTO MIDTABLE2(部门描述,销售)');
    SQL.Add('VALUES(:Class,:xs)');
    ParamByName('Class').AsString := '部门';
    ParamByName('xse').AsFloat := czdate;
    ExecSql;在query中可以这样用,在adoquery中呢?谢谢

解决方案 »

  1.   


    SQL.Add('INSERT INTO MIDTABLE2(部门描述,销售)');
        SQL.Add(' VALUES(:Class,:xs)');
        Parameters.ParambyName('Class').AsString := '部门';
        Parameters.ParambyName('xse').AsFloat := czdate;
        ExecSql;
      

  2.   

    ADOquery.Parameters.ParamByName('Class').Value:='部门';
    ADOquery.Parameters.ParamByName('xs').Value:=czdate;
      

  3.   

    ParamByName前加上Parameters就是了
      

  4.   

    SQL.Add('INSERT INTO MIDTABLE2(部门描述,销售)');
        SQL.Add(' VALUES(:Class,:xs)');
        Parameters.ParambyName('Class').Value:= '部门';
        Parameters.ParambyName('xse').Value:= czdate;
        ExecSql;
      

  5.   

    参数名后是.Value,而不是.String......
      

  6.   

    1.ParamByName前加上Parameters.
    2.AdoQuery的ParamByName后面只有.VALUE...没有Query的.ASSTRING,ASINTEGER之分
      

  7.   

    Parameters.ParamValues['xxx'] := 'xxx';
      

  8.   

    ADO中是
    Parameters.ParambyName('aa').Value :=
      

  9.   

    with adoquery1 do
      begin
        SQL.Add('INSERT INTO MIDTABLE2(部门描述,销售)');
        SQL.Add(' VALUES(:Class,:xs)');
        Parameters.ParambyName('Class').AsString := '部门';
        Parameters.ParambyName('xse').AsFloat := czdate;
        ExecSql;
      end;
      

  10.   

    ADOquery.Parameters.ParamByName('Class').Value:='部门';
    ADOquery.Parameters.ParamByName('xs').Value:=czdate;
      

  11.   

    ADO中使用的是Parameters.ParamByName('').Value这个属性
    以上的代码为:SQL.Add('INSERT INTO MIDTABLE2 (部门描述,销售)');
        SQL.Add(' VALUES (:Class,:xs)');
        ADOQuery1.Parameters.ParamByName('Class').Value := '部门';
        ADOQuery1.Parameters.ParamByName('xse').Value := czdate;
        try    ExecSql;
      

  12.   

    SQL.Add('INSERT INTO MIDTABLE2 (部门描述,销售)');
        SQL.Add(' VALUES (:Class,:xs)');
        ADOQuery1.Parameters.ParamByName('Class').Value := '部门';
        ADOQuery1.Parameters.ParamByName('xse').Value := czdate;
        try
          Prepared;
          ExecSql;
          ShowMessage('成功');
        except
          on e: Exception do
          begin
            ShowMessage('出错');
          end;
        end;
      

  13.   

    兄弟,Parameters.ParamByName('')只能和.Value配合使用