以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 引用多值字段 符合条件的行 运行不了  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=136193)
--  作者：dxjwlf
--  发布时间：2019/6/9 20:19:00
--  [求助] 引用多值字段 符合条件的行 运行不了
多值字段 星期一、星期二、 星期三、星期四、星期五、星期六

如果今天星期日，而星期一 有订单。则从客户表中提取多值字段符合条件的行 加到订单表中

Dim z =  Format(Date.Today.AddDays(1),"dddd")
Dim Filter As String ="约定送货日 like \'%" & z & "%\'"
For Each cms As String() In DataTables("客户表").SQLGetValues("客户名称|客户地址|收货人|联系电话|所属乡镇",filter,"所属乡镇")
    Dim dr As DataRow= DataTables("订单").AddNew
    dr("客户名称")= cms(0)
    dr("客户地址")= cms(1)
    dr("收货人")= cms(2)
    dr("联系电话")= cms(3)
    dr("所属乡镇")= cms(4)
    DataTables("订单").save
Next
--  作者：有点甜
--  发布时间：2019/6/10 9:18:00
--  

 

代码应该没问题的，请做一个实例发上来测试。

 

 
--  作者：dxjwlf
--  发布时间：2019/6/10 20:37:00
--  
找到原因了，，客户表测试 没有保存，后来又删掉了临时数据。。浪费时间呀