***** 简单问题，请大家帮助，谢谢 ！

Question

Set curDB = CurrentDb
    Set newTable = curDB.CreateTableDef(strTableName)
    newTable.Connect = "Text;DSN=txt出货检品;FMT=Fixed;HDR=NO;IMEX=2;" & "DATABASE=" &   strDatabase
    newTable.SourceTableName = strTextName
    On Error Resume Next
    curDB.TableDefs.Delete newTable.Name
    On Error GoTo 0
    curDB.TableDefs.Append newTable
    Set newTable = Nothing这段程序是在access2000模块里面写的，当我执行倒curDB.TableDefs.Append newTable时就出错
错误信息：运行时错误：'3625' 文本文件规范‘txt出货检品’不存在。不能使用规范导入、导出或连接。txt出货检品 我在ODBC数据源里已经设置了，不知道是  txt出货检品文件的格式不对还是 newTable.SourceTableName = strTextName   的strTextName是“d_kb01kp.dat“的原因？

Answer 1

谢谢各位的捧场。
那位高手帮我分析一下 "Text;DSN=txt出货检品;FMT=Fixed;HDR=NO;IMEX=2;" & "DATABASE=" &   strDatabase 里面的参数设置的对吗？或者需要什么基本条件？多谢指教

Answer 2

没有试验，估计是你创建的表本身结构有问题
先检查下这步：Set newTable = curDB.CreateTableDef(strTableName)
还有，把错误处理先引掉，再跟踪一下，找到错误的根源处，我感觉在curDB.TableDefs.Delete newTable.Name就会出错的