版主,请测试下以下代码多长时间
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
dim s1 as string =e.DataRow("板/PVLAN")
dim s2 as string =e.DataRow("端口/CVLAN")
e.DataRow("LOID") = Nothing
e.DataRow("PON口") = Nothing
e.DataRow("ONUID") = Nothing
For Each dtn As String In Connections("泉州").GetTableNames
cmd.CommandText = "SELECT * From {" & dtn & "} where [PVLAN] = " & s1 & " And [CVLAN] = " & s2
dt = cmd.ExecuteReader
If dt.DataRows.Count > 0 Then
e.DataRow("LOID") = dt.DataRows(0)("LOID")
e.DataRow("PON口") = dt.DataRows(0)("PON口")
e.DataRow("ONUID") = dt.DataRows(0)("ONUID")
exit for
End If
Next