再加一句:它报告的错误为:Invalid variant type conversion我按确定后,仍然可以继续执行,并且之后的添加记录都可以做。WHY?
解决方案 »
- 如何缩短TSocketConnection 连接时间
- 在向从表添加新数据时出错:键列信息不足或不正确,更新影响到多行(非一般错误)
- 100分拉 高手来 桌面扩展问题
- 我不会DELPHI,我只希望高手教我把程序结果显示出来。。。
- 请问从库里读出若干个路由器连接关系,如何画出拓扑图?
- 问个关于ADOConnection控件的问题,关于帐号密码的!谢
- Word 问题请教高人.
- 谁帮我看一下这段代码,是关于文件存储的
- 关于sql的菜问题送分了
- 知道了窗体的句柄,如何刷新窗体,或是设置窗体的高度??
- Delphi菜鸟的简单问题:Delphi是不是能生成 单一运行程序。
- shellexecute或者winexec问题 在线等!
TelForm.AdoTable1.ConnectionString:=Constring;
TelForm.ADOTable1.TableName:='Tel';
TelForm.ADOTable1.Active:=true;
即可显示表里的内容!
ADOTable1.Append;
ADOTable1.FieldValues['id'] := 5;
ADOTable1.FieldValues['name'] := Edit1.Text;
ADOTable1.Edit;
ADOTable1.Post;
ADOTable1.close;
老样子,在 ADOTable1.Active := True;这句话上报错.
begin
ADOTable1.open;
ADOTable1.Append;
ADOTable1.FieldValues['id'] := 5;
ADOTable1.FieldValues['name'] := Edit1.Text;
ADOTable1.Edit;
ADOTable1.Post;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
ADOTable1.Active:=false;
AdoTable1.ConnectionString:=Constring;
ADOTable1.TableName:='link';
ADOTable1.Active:=true;end;end.
请你在执行上面的Sql语句时检查表是否为空,如为空会显示错误
SQL语句检查后,返回1条记录.
该记录是存在的.
但ADOTable为什么会报错呢?
ADOTable1.FieldValues['name'] := Edit1.Text;
改为
ADOTable1.FieldByName('name').AsString := Edit1.text;
试试
我不知道啊!怎么弄?
另外,你所说的错误应该是类型匹配问题。你把SQL语句拿到查询分析器里运行一下,看看是什么错误?