- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求代码，为每个客户增加指定日期的行。 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52749)
-- 发布时间：2014/6/22 12:06:00
-- 求代码，为每个客户增加指定日期的行。
想为表中每个客户增加一条记录，日期为：2014年3月31日。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目2.table |
-- 发布时间：2014/6/22 14:18:00
--
代码如下
Dim d As Date = new Date(2014, 3, 31)
For Each n As String In DataTables("日薪月溢交易明细表").GetValues("客户姓名")
Dim ndr As DataRow = DataTables("日薪月溢交易明细表").AddNew
ndr("客户姓名") = n
ndr("日期") = d
Next
-- 发布时间：2014/6/22 15:05:00
--
成了，非常感谢！