再请教一句代码:见下面标识为红色的一句,但报错编辑错误:datarow不是ControlEventArgs成员? 不知为何?
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim sCols() As String = {"客户代码", "客户名称", "姓名", "职位", "移动电话"}
Dim dCols() As String = {"客户代码", "客户名称", "姓名", "职位", "移动电话"}
cmd.C
cmd.CommandText = "SELECT 客户代码,客户名称,姓名,职位,移动电话 From {联系人信息} WHERE 移动电话 IS NOt NULL And 客户代码 In (Select 客户代码 From {客户信息} Where " & Filter & ")"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.DataRows
Dim nr As DataRow = DataTables("短信列队").AddNew()
e.DataRow("列队日期") = Date.Today()
' e.DataRow("添加人") = User.Name
For i As Integer =0 To sCols.Length -1
nr(dCols(i)) = dr(sCols(i))
Next
Next
End If