//edit;将它去了,再试试
post;//运行到这里出错。如果不行,找ADO的补丁包安装
post;//运行到这里出错。如果不行,找ADO的补丁包安装
解决方案 »
- 关于treeview选中节点的问题
- datamodule.notify_datachange我怎么找不到有此属性
- stringgrid内容消失的问题
- 急!!!!!!!·2
- 请问各位大虾如何从零开始学习语言!!(三根鸡毛帖)
- 请问关于teechart pro6 for delphi6 的安装问题???
- 我想在工作之外为其他公司做软件,多学点东西顺便赚些外快,谁能给点经验、途径、项目、收费标准等等,
- delphi 7如何获得cpu 核数
- 关于读取SQL返回的汇总数据,知道的请举手!
- 不好意思问一下:涵数声明的问题。
- 不小心在paradox数据库中把date型的数据定义成了alpha型,在比较时出了问题,求助
- 动态建表的问题
post;//运行到这里出错
MDAC已升级到2.7了,D6也是SP2了。
with ADOTable1 do
begin
close;
TableName := certtmp;
open;
append;
for i:=0 to fieldcount-1 do
begin
fields[i].Value:=ADODataset1.fields[i].Value;
end;
edit;
post;//运行到这里出错。
end;
begin
close;
sql.clear;
sql.add('create table certtmp....')
ExecSQL
end;
with ADODataset2 do//导出数据
begin
close;
commandtext:='select * from certtmp';
open;
edit;
append;
for i:=0 to fieldcount-1 do
begin
fields[i].Value:=ADODataset1.fields[i].Value;
end;
post;
close;
end;
fields[i].Value:=ADODataset1.fields[i].Value;0D
改为:
fields[i].AsVariant:=ADODataset1.fields[i].AsVariant;
否则ADODataset1.fields[i]的值为空时要出错。
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
或者你们如果要把ACCESS转成DBF是怎样做的(不用BDE)。
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]