欢迎您:游客!请先
登录
或
注册
风格
恢复默认设置
|
展区
文件集浏览
图片集浏览
Flash浏览
音乐集浏览
电影集浏览
|
搜索
Foxtable(狐表)
→
用户栏目
→
专家坐堂
→ [求助] 引用多值字段 符合条件的行 运行不了
新的主题
投票帖
小字报
下一主题 >>
<< 上一主题
共有
1920
人关注过本帖
平板
打印
复制链接
主题:[求助] 引用多值字段 符合条件的行 运行不了
dxjwlf
小
大
1楼
|
信息
|
搜索
|
邮箱
|
主页
|
UC
加好友
发短信
等级:童狐
帖子:
261
积分:2195
威望:0
精华:0
注册:
2015/5/15 14:51:00
[求助] 引用多值字段 符合条件的行 运行不了
Post By: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
下一主题 >>
<< 上一主题
RSS2.0
|
Xhtml无图版
|
Xslt无图版
Copyright © 2000 - 2018
foxtable
.com
Tel: 4000-810-820 粤ICP备11091905号
Powered By
Dvbbs
Version 8.3.0
页面执行时间 0.03320 秒, 5 次数据查询