起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 215|回复: 12

【结贴】ExcelToTable1报错**

[复制链接]
发表于 2008-11-14 12:53:28 | 显示全部楼层 |阅读模式
如衅

14-2.jpg

11.81 KB, 下载次数: 107

回复

使用道具 举报

发表于 2008-11-14 13:11:39 | 显示全部楼层
楼主,怎么做的?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-11-14 13:15:03 | 显示全部楼层
var
  lstr,errstr: String;
begin
  if OpenDialog1.Execute then
  begin
    lstr := OpenDialog1.FileName;
    ExcelToTable1.FileName := lStr;
    ExcelFieldMapFunc.ShowFieldMapEditor(ExcelToTable1);
    ExcelToTable1.Execute(lstr);
    datasetbroker1.DataSet.ApplyUpdates;
    if ErrStr <> '' then
      dialogs.ShowMessage(ErrStr);
  end;
end;
回复 支持 反对

使用道具 举报

发表于 2008-11-14 13:31:58 | 显示全部楼层
1楼的错误是执行那句的时候报出来的?
另贴出字段与Excel单元格之间的映射关系。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-11-14 13:46:02 | 显示全部楼层
ExcelToTable1.Execute(lstr);
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-11-14 13:46:36 | 显示全部楼层
回复 支持 反对

使用道具 举报

发表于 2008-11-14 13:56:13 | 显示全部楼层
楼主,我给你一个例子,你导入一下,然后看看吧。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-11-14 13:58:33 | 显示全部楼层
好的
回复 支持 反对

使用道具 举报

发表于 2008-11-14 14:00:14 | 显示全部楼层
例子:用附件中的那个test.xls
1

exceltotable.part1.rar

1.39 MB, 下载次数: 124

回复 支持 反对

使用道具 举报

发表于 2008-11-14 14:00:35 | 显示全部楼层
2

exceltotable.part2.rar

1.39 MB, 下载次数: 69

回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-27 12:40 , Processed in 0.041585 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表