用了ado老是出现 “invalid variant type conversion” 错误，求教。

[exe2008]

用了ado老是出现 “invalid variant type conversion” 错误，求教。

[xyxx]

你写数据时数据类型不对

[My_first]

你的数据类型不对.

我遇到过这问题

你单步执行看看在哪里错了。

[exe2008]

我没有用变量，直接用空间的

[xyxx]

你单步执行看看在哪里错了。

[czzw]

我想你大概是碰到空值了。
这点delphi处理得很不好而且一旦出现程序就执行不下去了。

[hey_you]

可能跟NULL值有关，你取数据的时候最好直接用FieldByName.AsXXXX函数直接作转换，它们能够处理NUll，AsString把Null处理为空字符串，AsInteger处理为0

[exe2008]

我把码贴出来：

program Project1;

uses
Forms,
Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);

Application.Run;{单步执行问题出在这里，不知道为什么？？）

end.



unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, DB, ADODB, StdCtrls, Buttons;

type
TForm1 = class(TForm)
ADOConnection1: TADOConnection;
ADOTable1: TADOTable;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
ADOQuery1: TADOQuery;
DataSource2: TDataSource;
BitBtn1: TBitBtn;
procedure BitBtn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
adoquery1.SQL.Clear ;
adoquery1.SQL.Add('select * from T养表费清单 where 户号>''2000'' order by 户号');
adoquery1.Open ;
dbgrid1.Refresh;
end;

end.

[bamboo_flute]

adotable用没有用固定字段？
如果用了，就将固定字段del
双击adotable就可以看到，固定字段的属性！

[xxzxwl]

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
adoquery1.SQL.Clear ;
adoquery1.SQL.Add('select * from T养表费清单 where 户号>'+'2000'+' order by 户号');
adoquery1.Open ;
dbgrid1.Refresh;
end;

[m_leaner]

BitBtn1Click执行了吗？如果你的“户号”是字符，那么这里是没有问题的，好象在你的form1.create的时候发生的错误，你有数据绑定吗？请检查！或是在query的事件里写了代码？你出现的错误是数据转换错误

[exe2008]

不行啊，问题在：
Application.Run;{单步执行问题出在这里，不知道为什么？？）

[m_leaner]

如果户号是数字那么
adoquery1.SQL.Add('select * from T养表费清单 where 户号>2000 order by 户号');