
加好友 发短信
等级:童狐
帖子:227
积分:2826
威望:0
精华:0
注册:2008/9/1 15:41:00
|
手工编码填充问题 Post By:2010/2/28 22:56:00 [显示全部帖子]
我想将表A中编码为a1,同时名称包含“城中”的记录复制到表B中,下面这样行不通,应该怎么样写代码呢?
For Each dr1 As DataRow In DataTables("表A").Select("[编码]=a1 and [名称].contains 城中") Dim dr2 As DataRow = DataTables("表B").AddNew() For Each dc As DataCol in DataTables("表A").DataCols dr2(dc.Name) = dr1(dc.name) Next Next
|
|