急啊~~~ado问题

for  iTemp :=0 to ListBox1.Items.Count -1 do
      begin
        adoRetriveTable.Active := false ;
        adoRetriveTable.TableName := ListBox1.Items.Strings[iTemp];
        adoRetriveTable.Active := true ;
        adoRetriveTable.LoadFromFile(ExtractFilePath(Paramstr(0))+'RetriveData\'+FileListBox1.Items.Strings[iTemp]);//此处出问题
        adoRetriveTable.Edit;
        adoRetriveTable.Post;
      end;
  end;就是这一段

你跟踪调试一下～～看看这个
ExtractFilePath(Paramstr(0))+'RetriveData\'+FileListBox1.Items.Strings[iTemp]
是不是你要的那个路径下的文件～～

re:tikkypeng(千两狂死郎)　
我跟踪过了，没有问题
问题出现在loadfromfile这一句上，完了完了
今天最后一天
搞不定就s翘翘了各位高手help me啊

可能是这儿错了
adoRetriveTable.TableName := ListBox1.Items.Strings[iTemp];
你看看ListBox1.Items.Strings[iTemp]的值是一个合法的表名吗？

adoRetriveTable.TableName := ListBox1.Items.Strings[iTemp];
返回的是正确的表名zhhc(zhhc)你说的不设表名是什么意思？
我试着用adodataset来完成，
第一次loadfromfile没有出错，但是post不进去，
第二次就出错，说什么表名无法被找到

这样试试
for  iTemp :=0 to ListBox1.Items.Count -1 do
      begin
        adoRetriveTable.LoadFromFile(ExtractFilePath(Paramstr(0))+'RetriveData\'+FileListBox1.Items.Strings[iTemp]);//此处出问题
        adoRetriveTable.Edit;
        adoRetriveTable.Post;
      end;
  end;

adoretrivetable需要通过listbox来读取目标表，因此，在loadfromfile之前必须开关表，更换表名

那你的目的是想用LoadFromFile来调表的数据吧不过这个方法好像是不行的，在LoadFromFile成功以后，你可以看看它的tablename属性，
会发现变成文件名了。

我已经在这之前通过如下处理
  for iTemp := 0 to FileListBox1.Items.Count-1 do
    begin
        iSpoint:=pos('.',FileListBox1.Items.Strings[iTemp]);
        sTableName := FileListBox1.Items.Strings[iTemp];
        delete(sTableName,iSPoint,length(sTablename));
        ListBox1.Items.Add(sTableName);
    end;
全部都是表名了

我觉得你的目的是要把原有数据放到新表中，
但是用LoadFromFile好像不行

我的目的是用xmlfile通过mail传递数据但是我估计是方法的bug,我用系列都不行艾

你可以试试用两个table一个用loadfromfile取数据，然后把数据复制到新表中去。

现在不是数据能否读进来的问题
而是没有办法使用loadfromfile方法顺序读取目标表[表名和数量都是随着数据变化情况变化]

你用loadfromfile可以取得表结构和数据，
然后根据这样来创建新表，应该可以吧。

这样做是没有问题
现在是卡在无法通过for循环listbox读取打开表，第一个没有问题，第二个就出现错误

这样不行？只能打开第一个表？
for  iTemp :=0 to ListBox1.Items.Count -1 do
      begin
        adoRetriveTable.LoadFromFile(ExtractFilePath(Paramstr(0))+'RetriveData\'+FileListBox1.Items.Strings[iTemp]);//此处出问题
      end;
  end;

可以，没有什么问题现在是在用for循环通过listbox读取tablename时，在第二次出现错误，
运到了

zhhc(zhhc)　回复于2001-8-31 11:37:53
这样不行？只能打开第一个表？
for  iTemp :=0 to ListBox1.Items.Count -1 do
      begin
        adoRetriveTable.LoadFromFile(ExtractFilePath(Paramstr(0))+'RetriveData\'+FileListBox1.Items.Strings[iTemp]);//此处出问题
      end;
  end;

只能对一个表操作，改变tablename时必须open和close，第二次open时就出错了

你好像还是只用了一个表吧，
我的意思是在设一个表如adoTable1吧
for  iTemp :=0 to ListBox1.Items.Count -1 do
      begin
        adoRetriveTable.LoadFromFile(ExtractFilePath(Paramstr(0))+'RetriveData\'+FileListBox1.Items.Strings[iTemp]);//此处出问题
        //在此以adoRetriveTable的结构和数据来创建adoTable1

      end;
  end;

re:bubble()　回复于2001-8-31 12:29:28
用Trim函数试试
Trim函数是用来对字符串操作的
我这里用不上

还是不行
第一次loadfromfile可以通过adotable或者adodataset访问到数据
但是第二次loadfromfile时就出现table无法被找到的错误

调试易

急啊~~~ado问题

解决方案 »