这句代码
t.DataTable.Find("系统单号 = '" & arg(n, 1) & "' and 商品编码 = '" & arg(n, 24) & "'")
和这句代码
t2.DataTable.Find("系统单号 = '" & arg2(n, 1) & "'")
删除后,测试。
然后参考这种方式导入数据