-- 跨表引用
Select Case e.DataCol.Name
Case "SPDM"
Dim dr As DataRow = e.DataRow
Dim pr As DataRow
If dr.IsNull("SPDM") Then
dr("DCTP") = Nothing
Else
Dim filter As String
filter = "SPDM = \'" & dr("SPDM") & "\'"
pr = DataTables("SPTPB").Find(filter)
If pr IsNot Nothing Then
dr("DCTP") = pr("pic_name") & ".jpg"
End If
End If
End Select
这段代码原来还好好的,不知道怎么了,忽然没有效果了,代码也没有动过,就是读取不了了,几张相同获取的表都失效了