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

exe2008 2002-06-24 11:32:28
用了ado老是出现 “invalid variant type conversion” 错误,求教。
...全文
272 12 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
m_leaner 2002-06-24
  • 打赏
  • 举报
回复
如果户号是数字那么
adoquery1.SQL.Add('select * from T养表费清单 where 户号>2000 order by 户号');
exe2008 2002-06-24
  • 打赏
  • 举报
回复
不行啊,问题在:
Application.Run;{单步执行问题出在这里,不知道为什么??)
m_leaner 2002-06-24
  • 打赏
  • 举报
回复
BitBtn1Click执行了吗?如果你的“户号”是字符,那么这里是没有问题的,好象在你的form1.create的时候发生的错误,你有数据绑定吗?请检查!或是在query的事件里写了代码?你出现的错误是数据转换错误
xxzxwl 2002-06-24
  • 打赏
  • 举报
回复
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
adoquery1.SQL.Clear ;
adoquery1.SQL.Add('select * from T养表费清单 where 户号>'+'2000'+' order by 户号');
adoquery1.Open ;
dbgrid1.Refresh;
end;
bamboo_flute 2002-06-24
  • 打赏
  • 举报
回复
adotable用没有用固定字段?
如果用了,就将固定字段del
双击adotable就可以看到,固定字段的属性!
exe2008 2002-06-24
  • 打赏
  • 举报
回复
我把码贴出来:

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.
hey_you 2002-06-24
  • 打赏
  • 举报
回复
可能跟NULL值有关,你取数据的时候最好直接用FieldByName.AsXXXX函数直接作转换,它们能够处理NUll,AsString把Null处理为空字符串,AsInteger处理为0
czzw 2002-06-24
  • 打赏
  • 举报
回复
我想你大概是碰到空值了。
这点delphi处理得很不好而且一旦出现程序就执行不下去了。
xyxx 2002-06-24
  • 打赏
  • 举报
回复
你单步执行看看在哪里错了。
exe2008 2002-06-24
  • 打赏
  • 举报
回复
我没有用变量,直接用空间的
My_first 2002-06-24
  • 打赏
  • 举报
回复
你的数据类型不对.

我遇到过这问题

你单步执行看看在哪里错了。
xyxx 2002-06-24
  • 打赏
  • 举报
回复
你写数据时数据类型不对

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧