标题：外部数据源的问题

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目7.rar

 
此主题相关图片如下：未命名.jpg

生产清单明细表的窗口中“生产单”按钮

帮忙看下是什么原因，在窗口的table中用fill语句，早上还好的，下午不知道是不是数据重定向的问题，就出现这样的错误了。

这是代码
dim jt as string
jt=user.extendedvalues("机台")
Tables("生产清单打印_table1").Fill("Select [日期],[客户],[颜色],[颜色编号],[幅宽],[克重],[数量米],[重量],[卷长],[生产要求],[生产时间],[生产数量],[机台],[转速],[完工],[生产进度] From {订单管理} where 生产进度 <> '已完工' and 生产进度 <> '已取消'  and 生产进度 <> '未生产' and 机台='" & jt & "' ",true)

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:wanjing.rar

这是数据表，

此主题相关图片如下：未命名.jpg

这是改了代码后，出现的错误。

你说的是外部数据数据源，可你没有指定啊。

 ？没指定 什么意思？
我用外部数据源不行，然后重定向 也不行

Tables("生产清单打印_table1").Fill("Select [日期],[客户],[颜色],[颜色编号],[幅宽],[克重],[数量米],[重量],[卷长],[生产要求],[生产时间],[生产数量],[机台],[转速],[完工],[生产进度] From {订单管理} where 生产进度 <> '已完工' and 生产进度 <> '已取消'  and 生产进度 <> '未生产' and 机台='" & jt & "' ","外部数据源连接名称",true)

没有什么别的可能，要么是表名错了，要么是数据源错了。

 真是被外部数据源搞晕了
现在已经连接了外部数据源，应该已经对了，代码也改过来了
Tables("生产清单打印_table1").Fill("Select [日期],[客户],[颜色],[颜色编号],[幅宽],[克重],[数量米],[重量],[卷长],[生产要求],[生产时间],[生产数量],[机 台],[转速],[完工],[生产进度] From {订单管理} where 生产进度 <> '已完工' and 生产进度 <> '已取消'  and 生产进度 <> '未生产' and 机台='" & jt & "' ","wanjing",true)

但是还是弹出错误窗口说是没有主键列，我试着加入[_identify],还是没有用

真的急了。。。。

看看你的外部数据原的 订单管理 表中有没有主键的列？ 有的话就不应该出错啊～ 

 没有  该怎么设主键列？

在access里设了_identify为主键，不过还是跟原来一样

在数据源中设置主键 ！   再说你是内部表定向到外部数据源的呀，应该定向后，应该带有主键啊？ 
帮助中的：：：：：

3、内部表定向到外部数据源
在菜单中单击下面的按钮，会生成一个Access文件，默认包括所有的内部数据表，你可以直接定向到这个Access文件；如果需要定向到一个SQL SERVER数据源，那么只需导入这个Access文件后再开始定向即可。

此功能生成的Access文件，_Identify列的值是重新从1开始排列的，所以_Identify列的值和原始数据可能不同。