SQL Server 2005+TADOQueryについて

ラーク 2008-01-16 21:03:32 No: 29327

いつもお世話になっています。

現在、D7ProのADOコンポーネントを使用してSQLServer2005へ接続するアプリケーションを構築しているのですが、ADO内部から例外が返される現象が発生しており困っています。

【状況】
SQLServerにて、次のようなテーブルを構築
テーブル名:tblA
No: int
日時A: Datetime
日時B: Datetime
日付Aには「2008/01/16」といった日付だけのデータを、
日付Bには「2008/01/16 12:00:00」といった日付＋時刻が入ったデータを格納。

Delphi7にて、TADOConnectionでSQL Native Clientドライバを使用してSQLServerに接続した上で、次のコードを実行。

Q := TADOQuery.Create(self);
Q.Connection := ADOConnection1;
Q.SQL.Add('SELECT NO,日付A,日付B FROM テーブルA');
Q.SQL.Add('ORDER BY 日付A');
Q.Open;
try
  while not Q.EOF do begin
    （ここで色々と処理）
    Q.Next;    ←ここで例外が発生する
  end;
finally
  Q.Active := False;
  Q.Free;
end;

上記コードの「Q.Next」を実行した時点で「バリアントタイプが不正です」というエラーが時々発生するといった格好です。

何か心当たりがありましたらご教授頂きたいと思います。
よろしくお願いします。