Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 未能批量动态增加列


  共有4440人关注过本帖树形打印复制链接

主题：[求助] 未能批量动态增加列
帅哥哟，离线，有人找我吗？
Darcylau
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		[求助] 未能批量动态增加列  发帖心情 Post By：2018/3/13 22:31:00 [显示全部帖子]

老师，你好！
我们需要在原有的产品表中批量增加114个数据列，想用动态修改表结构来实现。

我们在新打开的表中测试，按帮助动态修改表结构，在命令窗口复制代码并执行，但是显示错误。


此主题相关图片如下：qq图片20180313222815.png
按此在新窗口浏览图片

[此贴子已经被作者于2018/3/13 22:32:08编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/27 22:39:00 [显示全部帖子]

老师，你好！
我们需要在原有的产品表中批量增加个数据列，想用动态修改表结构来实现。

我们在新打开的表中测试，按帮助动态修改表结构，在命令窗口复制代码并执行，但是显示错误。


此主题相关图片如下：qq图片20180327223506.png
按此在新窗口浏览图片

我在查看表结构对话框中手动添加数据列，显示同样的错误。
 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/28 12:48:00 [显示全部帖子]

老师，您好！
二楼时已经修复了MDAC的（0x80040E3E）, 之后动态批量增加列没有问题。

但今天同样批量增加列时出现错误是（0x80004005），我按您的提示，修改成功了regsvr32 Softpub.dll和regsvr32 Wintrust.dll， 但是regsvr32 Initpki.dll 修复不了，弹出错误提示：

图片点击可在新窗口打开查看此主题相关图片如下：qq图片2.png
图片点击可在新窗口打开查看
批量或者手动增加列时，依然提示错误。
 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/28 14:09:00 [显示全部帖子]

老师，你好！
手动增加列可以，新建项目批量增加列也可以。
只是原来的项目批量增加列不可以。很蹊跷。
 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/28 17:50:00 [显示全部帖子]

老师，执行了您的代码，显示同样的错误。我的代码如下：

Dim Builder As New ADOXBuilder '批量增加生产单表中的型材数据列

Builder.Open() '打开ADOXBuilder

With Builder.Tables("生产单")

    .AddColumn("SGLG",ADOXType.String,7)'增加上轨拉杆编号

    .AddColumn("SGLGm",ADOXType.String,10)'增加上轨拉杆名称

    .AddColumn("SGLGt",ADOXType.Text)'增加上轨拉杆截面图  

    .AddColumn("SGLGx",ADOXType.String,2)'增加上轨拉杆形状

    .AddColumn("SGLGi",ADOXType.Byte)'增加上轨拉杆数量

    .AddColumn("SGLG2",ADOXType.String,7)'增加上轨拉杆2编号

    .AddColumn("SGLG2m",ADOXType.String,10)'增加上轨拉杆2名称

    .AddColumn("SGLG2t",ADOXType.Text)'增加上轨拉杆2截面图

    .AddColumn("SGLG2x",ADOXType.String,2)'增加上轨拉杆2形状

    .AddColumn("SGLG2i",ADOXType.Byte)'增加上轨拉杆2数量

    .AddColumn("XGLG",ADOXType.String,7)'增加下轨地梁编号

    .AddColumn("XGLGm",ADOXType.String,10)'增加下轨地梁名称

    .AddColumn("XGLGt",ADOXType.Text)'增加下轨地梁截面图

    .AddColumn("XGLGx",ADOXType.String,2)'增加下轨地梁形状

    .AddColumn("XGLGi",ADOXType.Byte)'增加下轨地梁数量

    .AddColumn("XGLG2",ADOXType.String,7)'增加下轨地梁2编号

    .AddColumn("XGLG2m",ADOXType.String,10)'增加下轨地梁2名称

    .AddColumn("XGLG2t",ADOXType.Text)'增加下轨地梁2截面图    

    .AddColumn("XGLG2x",ADOXType.String,2)'增加下轨地梁2形状

    .AddColumn("XGLG2i",ADOXType.Byte)'增加下轨地梁数量

    .AddColumn("QSQL",ADOXType.String,7)'增加前锁墙料编号

    .AddColumn("QSQLm",ADOXType.String,10)'增加前锁墙料名称

    .AddColumn("QSQLt",ADOXType.Text)'增加前锁墙料截面图

    .AddColumn("QSQLx",ADOXType.String,2)'增加前锁墙料形状

    .AddColumn("QSQLi",ADOXType.Byte)'增加前锁墙料数量

    .AddColumn("QSQL2",ADOXType.String,7)'增加前锁墙料2编号

    .AddColumn("QSQL2m",ADOXType.String,10)'增加前锁墙料2名称

    .AddColumn("QSQL2t",ADOXType.Text)'增加前锁墙料2截面图

    .AddColumn("QSQL2x",ADOXType.String,2)'增加前锁墙料2形状

    .AddColumn("QSQL2i",ADOXType.Byte)'增加前锁墙料2数量

    .AddColumn("CSQL",ADOXType.String,7)'增加侧锁墙料编号

    .AddColumn("CSQLm",ADOXType.String,10)'增加侧锁墙料名称

    .AddColumn("CSQLt",ADOXType.Text)'增加侧锁墙料截面图

    .AddColumn("CSQLx",ADOXType.String,2)'增加侧锁墙料形状

    .AddColumn("CSQLi",ADOXType.Byte)'增加侧锁墙料数量

    .AddColumn("TL",ADOXType.String,7)'增加套料编号

    .AddColumn("TLm",ADOXType.String,10)'增加套料名称

    .AddColumn("TLt",ADOXType.Text)'增加套料截面图

    .AddColumn("TLx",ADOXType.String,2)'增加套料形状

    .AddColumn("TLi",ADOXType.Byte)'增加套料数量

    .AddColumn("TL2",ADOXType.String,7)'增加套料2编号

    .AddColumn("TL2m",ADOXType.String,10)'增加套料2名称

    .AddColumn("TL2t",ADOXType.Text)'增加套料2截面图

    .AddColumn("TL2x",ADOXType.String,2)'增加套料2形状

    .AddColumn("TL2i",ADOXType.Byte)'增加套料2数量

End With

Builder.Close()'关闭ADOXBuilder
 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/28 23:19:00 [显示全部帖子]

老师，您好！
我的不是外部数据源。
您的代码测试后，依然报错。
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:客户订单系统 新总价_201803282313.zip



老师，我是否可以项目和代码发给您，请您查查报错的原因，并且帮我在生产单表中批量增加128个数据列，好吗？谢谢您！
 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/28 23:23:00 [显示全部帖子]

老师，您好！
请查代码
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:订单管理系统 编程记录 - 副本.rar
 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/29 9:38:00 [显示全部帖子]

老师，您好！
可以了，请问表达式列可以批量添加吗？

 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/30 15:24:00 [显示全部帖子]

老师，您好！
我们要增加同一项目的另外一个表的数据列78个，批量只增加了39个，然后手动增加一个列，也报错。 难道是达到了一个表允许列数的上限？(这个表有253列) 请问一个表的列数上限是多少呢？
我测试了您14楼的代码，同样报错。 但是在同一项目下的其他表测试您14楼的代码，没有问题。项目也压缩了好几次。
 回到顶部
帅哥哟，离线，有人找我吗？
Darcylau
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：55 积分：439 威望：0 精华：0 注册：2017/6/5 21:39:00 		  发帖心情 Post By：2018/3/30 16:05:00 [显示全部帖子]

老师，您好！
我们的淋浴房是定制产品，所有的玻璃、型材、胶条的尺寸都随着产品外尺寸的变化而变化。而且每个淋浴房型号的玻璃、型材、胶条数量、名称、编号、截面图，形状都不同，尺寸关联的参数也都不同。例如我们有的型号，玻璃有8块、型材有14根、胶条有9根、配件有19种，前三项都设计到不同参数的计算。所以需要这么多列。

请问如何使用SQL Server数据源呢？
谢谢！
 回到顶部
总数 12 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05371 秒, 7 次数据查询