Q&A

  • 제발 이소스좀 봐주세요 뭐가 틀렸져
procedure TfrmOpen.btnViewReportClick(Sender: TObject);
var
   strQuery : string;
   startDate, endDate : TDateTime;
begin

   strQuery := 'Select * From weight' + #13 +
               'Where DateTime > :pStartDateTime' and DateTime < :pEndDateTime';

   startDate := StrToDateTime(datetostr(dtpStartDate.Date)+ ' '+ cbStartTime.Text + ':00:00');
   EndDate := StrToDateTime(datetostr(dtpEndDate.Date)+ ' '+ cbEndTime.Text + ':00:00');
   with dm.adoQuery do begin
      sql.Clear;
      sql.Text := strQuery;
      Parameters.ParamByName('pStartDateTime').Value := startDate;
      Parameters.ParamByName('pEndDateTime').Value := endDate;
   end;

위 소스가 'pStartDateTime' /'pEndDateTime' 파라미터를 찾을수 없다고 나오네여
제발 좀 갈켜주세요
6  COMMENTS
  • Profile
    ㉳㉥ㅗ㉣ㅐ㉧ㅛ 2004.07.12 23:10



    sql.Add( strQuery );

    라구 한번 해보시면...



  • Profile
    나그네 2004.07.13 02:37
    procedure TfrmOpen.btnViewReportClick(Sender: TObject);
    var
       startDate, endDate : TDateTime;
    begin
       startDate := StrToDateTime(datetostr(dtpStartDate.Date)+ ' '+ cbStartTime.Text + ':00:00');
       EndDate   := StrToDateTime(datetostr(dtpEndDate.Date)+ ' '+ cbEndTime.Text + ':00:00');
       with dm.adoQuery do begin
          Close;
          sql.Clear;
          Sql.Add('Select * From weight ');
          Sql.Add('Where DateTime > :S0 and DateTime < :S1' );
          Parameters[0].Value := startDate;
          Parameters[1].Value := endDate;
          Open;
       end;
    end;



  • Profile
    김준연 2004.07.13 00:15
    sql.Add( strQuery ); 이거 써두 똑같은 메세지가 나오네영
  • Profile
    강지훈 2004.07.13 00:19

    and 문 앞에 콤마(')가 빠졌네요..^^
    그래서 파람값을 인식하지 못했나 싶습니다.
  • Profile
    김준연 2004.07.13 00:56
  • Profile
    ㉳㉥ㅗ㉣ㅐ㉧ㅛ 2004.07.13 19:35



    그러시면


    SQL.Add( 'insert into a values ( ''' + edit1.Text + ''', ''' + edit2.Text + ''' )' );

    이런식으로 해보시죠