querydef导入到tabledef出问题，资料不变，还是以前删掉的querydef资料

withnoproof

因为连接服务器，无法传例子，只能简单说明一下
首先说明，A，B资料格式都是一样的，只是内容不同，querydef，tabledef都是新建的
先从服务器导入资料到querydef，再从querydef导入到tabledef，没错
删掉querydef，tabledef，关掉连接
再从服务器导入资料B到querydef,再从querydef导入到tabledef,这个时候问题就出现了，导入tabledef的资料居然还是A，按道理应该是B才对
崩溃了，试过很多遍都不对，不知道什么原因，尤其是在从服务器导入资料之前，我还从本地导入过TXT档，都没错
那位大哥知道或遇到过这种情况，麻烦给分析分析，到底是什么原因，谢谢。

withnoproof

都没人碰到这种情况啊？难不成是灵异事件，可我试了两台电脑都不行
再附上代码，大家看看有没有什么问题
with database
  strQRY = "tmpQuery"
    Set AccQRY = .CreateQueryDef(strQRY)
    With AccQRY
        .Connect = "ODBC;DSN=FP;Driver={" & OrVer.Caption & "};DBQ=FP;UID=" & ComboBox1.Text & ";PWD=" & ComboBox1.Text
        .Name = strQRY
'        .Sql = "select PART_NUMBER,MODEL_NAME from ITEM_MASTER where ITEM_GROUP='HALB' and ITEM_TYPE='X' and PHANTOM='Y'"
    End With
    AccQRY.Fields.Refresh
   
    Set AccTAB = .CreateTableDef("MODEL")
    With AccTAB
        For i = 0 To AccDB.QueryDefs(strQRY).Fields.Count - 1
          Let IntSize = AccDB.QueryDefs(strQRY).Fields(i).Properties("SIZE")
          Let IntName = AccDB.QueryDefs(strQRY).Fields(i).Properties("NAME")
          Let intType = AccDB.QueryDefs(strQRY).Fields(i).Properties("TYPE")
          .Fields.Append .CreateField(IntName, intType, IntSize)
        Next
    End With
   
    .TableDefs.Append AccTAB
   
    .Execute "INSERT INTO MODEL SELECT * FROM [" & strQRY & "]", dbAppendOnly
end with

withnoproof

等待我的有缘人