语法上没有问题，逻辑上有致命的问题，每循环一次就加载一次
TEST3不卡死才怪
Dim cmd As new SQLCommand
cmd.C
Dim dt As DataTable
cmd.CommandText = "Se lect * From {TEST3}"
dt = cmd.ExecuteReader()
Dim fdr As DataRow
dim drs as list(of datarow) = DataTables("TEST2").SQLSe lect("[FEntrySelfZ0142] is null")
For Each dr1aa As DataRow In drs
fdr = dt.find("FInterID ='" & dr1aa("FInterID") & "'")
If fdr Isnot Nothing Then
dr1aa("FEntrySelfZ0142") = fdr("FItemID")
End If
Next
DataTables("TEST2").SQLupdate(drs)
加好友 
发短信
Post By：2020/7/10 9:26:00 [显示全部帖子]
