| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2003/6/9 9:59:07 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 我想在数据库中捕捉错的数据如 不可为空的为空了用下面的代码 try ADOTable_MDB.Close; ADOTable_MDB.TableName := 'std'; ADOTable_MDB.Open; Table_DB.Close; Table_DB.TableName := 'std'; Table_DB.Open; ProgressBar.Max := Table_DB.RecordCount; ProgressBar.Min := 0; Table_DB.First; Table_DB.MoveBy(1907); ADOTable_MDB.Append; while not Table_DB.Eof do begin for i := 0 to ADOTable_MDB.FieldCount - 1 do begin ADOTable_MDB.Fields[i].Value := Table_DB.Fields[i].Value; ProgressBar.Position := ProgressBar.Position + 1; end; try ADOTable_MDB.Post; except on E: exception do ListBox_ErrorList.Items.Add(Table_DB.FieldByName('No').AsString); end; Table_DB.Next; end; except Application.MessageBox('std表错！', '警告', 0); Exit; end; 我的第1907条记录有错误 为什么捕捉完这个错误后 以后的记录写入也出错呀 高手帮我看看错在哪里 好吗？？？  ---------------------------------------------- 我我,我是一只菜鸟,菜菜菜菜菜菜,菜菜菜菜菜菜菜菜菜菜菜菜~~~~~~~~~  |
|||||
| 作者： |
|
2003/6/9 10:07:00 | ||||
| 1楼： | 奇怪的是捕捉完这个错误后下一条记录没错 再下一条记录写入就出错 出错为：ADOTable_MDB not in insert or edit mode  ---------------------------------------------- 我我,我是一只菜鸟,菜菜菜菜菜菜,菜菜菜菜菜菜菜菜菜菜菜菜~~~~~~~~~
|
|||||
| 作者： |
|
2003/6/9 10:11:14 | ||||
| 2楼： | 以上代码是想把一个表table_DB中的对的记录写到另一个表adotable_MDB中如果有错就把id写到listbox中 高手有没有这方面的例子呀？？？ ---------------------------------------------- 我我,我是一只菜鸟,菜菜菜菜菜菜,菜菜菜菜菜菜菜菜菜菜菜菜~~~~~~~~~
|
|||||
| 作者： |
|
2003/6/9 11:04:45 | ||||
| 3楼： | 呃 发帖多了 把自己帖子给拉下来了  ---------------------------------------------- 我我,我是一只菜鸟,菜菜菜菜菜菜,菜菜菜菜菜菜菜菜菜菜菜菜~~~~~~~~~
|
|||||
| 信息 |
| 登陆以后才能回复 |
