以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  选择性合并求助  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=65788)

--  作者:卖糕的
--  发布时间:2015/3/23 11:03:00
--  选择性合并求助

我想做的是在合并数据的时候,在指定的数据文件时效_制程.xls表里只合并比时效MO里最大制令单号大的数据

用下面的代码如附件报错。制令单号是字符类型,代码报错我想应该是字符类型无法比较大小,我试着将MAX(制令单号)的数据

代入下面的MAX,合并的数据就是正确的,大家帮忙看看应该怎么改,谢谢了!

Dim max As String
max = DataTables("时效MO").Compute("max(制令单号)")
Dim mg As New Merger
mg.SourcePath = "\\\\172.16.2.64\\物流\\数据库\\狐表数据\\时效_制程.xls" \'指定数据文件
mg.SourceTableName = "sheet1$" \'指定要导入的表
mg.Filter = "[制令单号] > \'max\'"
mg.DataTableName ="时效MO" \'导入后的表名
mg.Format = "Excel" \'指定导入格式
mg.Merge()


--  作者:Bin
--  发布时间:2015/3/23 11:06:00
--  
自己编码合并,随意控制,随意控制转换类型判断