老师,
以下黄色的请帮忙指正,谢谢。
If e.DataCol.Name = "WKNumber" Then
Dim cmd As new SQLCommand
Dim dt As DataTable
cmd.CommandText = "Se lect * From {ICMO} Where FBillNo = '" & e.DataRow ("生产任务单号") & "'"
cmd.C
dt = cmd.ExecuteReader(True)
Dim fdr As DataRow In dt.DateRows
fdr("FHeadSelfJ0195") = e.DataRow("WKNumber")
dt.Save()
End If