【结贴】excel导入问题**

tyl123

var
   iMsg,Sheet_Name:string;

begin

    ExcelToTable1.DataSource := dsbSALE_RECORDS_INPUT_DTS;
    ExcelToTable1.FileName := 'C:\Documents and Settings\Administrator\桌面\tmp002.xls';
    ExcelToTable1.StartRow := 2;
    ExcelToTable1.EndRow := 10;
    Sheet_Name := 'SQL Results';
    //ExcelToTable1.FieldMap.Add('');
    ExcelToTable1.FieldMap.Add('DataSetSALE_RECORDS_INPUT_DTS.QUERY_KEY= SQL Results(2,2) ');
    IF ExcelToTable1.Execute(iMsg) THEN
       jsdialogs.ShowMsg('导入成功！','');



这里有什么问题吗？？？
为什么他到IF了，就跳出来了？？？？？？？

tyl123

SQL Results是sheet名

loworth

(-->[   )-->]
    ExcelToTable1.FieldMap.Add('DataSetSALE_RECORDS_INPUT_DTS.QUERY_KEY= SQL Results[2,2] ');

tyl123

[ ]这个也试过了，还是不执行

zfang

加上一句 ExcelToTable1.FieldMap.Clear;看看。

zfang

另外，在IF ExcelToTable1.Execute(iMsg) THEN这句之前加上这一句
if Business.Forms.ExcelFieldMapFunc.ShowFieldMapEditor(ExcelToTable1) then
看看对应关系是否正确

tyl123

这个要怎么看啊？？？

zfang

贴图出来看看吧。
另外看一下iMsg值是什么。

tyl123

iMsg我不知道要用什么，就随便弄了个，我不知道这个是干嘛用的

zfang

iMsg是记录错误信息的。