在需求明细表,如果是录入组,希望之加载技术支持邮箱等于登录的用户账号的行。怎么加载为空啊。请看看代码哪里有问题。
Dim druser As DataRow = DataTables("技术支持信息表").SqlFind("name = '" & user.name & "'")
If User.Name.Trim() = "liujiyong@bdcom.com.cn" Then
DataTables("需求明细表").LoadFilter = ""
Else
Select Case user.Group
Case "录入"
If druser.Isnull("新负责人邮箱") Then
DataTables("需求明细表").LoadFilter = "技术支持邮箱 = '" & User.Name.trim() & "' or 流程 = '" & user.Group & "'"
Else
DataTables("需求明细表").LoadFilter = "技术支持邮箱 = '" & User.Name.trim() & "' or 技术支持邮箱 in ('" & druser("新负责人邮箱").Trim().Replace(",", "','") & "') " 'or 流程 = '" & user.Group & "'"
End If
Case "审核"
DataTables("需求明细表").LoadFilter = "流程 = '" & user.Group & "'"
End Select
End If
DataTables("需求明细表").Load()