Foxtable(狐表)用户栏目专家坐堂 → 移动开发表格数据筛选


  共有3029人关注过本帖树形打印复制链接

主题:移动开发表格数据筛选

帅哥哟,离线,有人找我吗?
一笑
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:808 积分:6213 威望:0 精华:0 注册:2014/3/23 23:02:00
移动开发表格数据筛选  发帖心情 Post By:2021/2/18 11:09:00 [只看该作者]

以下代码无法正确筛选出数据,求解,谢谢!

Dim u As String = e.Cookies("username")
Dim UserName1 As String
UserName1 = DecryptText(u,"123","123")
Dim cmd As New SQLCommand
cmd.C '记得设置数据源名称
cmd.CommandText = "SelecXX Count(*) From {工作单}"
Dim Count As Integer = cmd.ExecuteScalar() '获取总的行数
Dim Pages As Integer = Math.Ceiling(Count/PageRows) '计算出总页数
cmd.CommandText = "Selec * From (SelecXX Row_Number() Over(Order by 完成时间) As [NO.],[_Identify],责任单位,完成时间,工作内容,责任人, From 工作单) As a "
cmd.CommandText = cmd.CommandText & "  Where [NO.]>= " & StartRow & " And [NO.] <= " & EndRow & "And 责任人= '" & Username1 & "'"


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/18 11:17:00 [只看该作者]

cmd.CommandText = "SelecXX Count(*) From {工作单} And 责任人= '" & Username1 & "'"
Dim Count As Integer = cmd.ExecuteScalar() '获取总的行数
Dim Pages As Integer = Math.Ceiling(Count/PageRows) '计算出总页数
cmd.CommandText = "Selec * From (SelecXX Row_Number() Over(Order by 完成时间) As [NO.],[_Identify],责任单位,完成时间,工作内容,责任人 From 工作单 where 责任人= '" & Username1 & "') As a "
cmd.CommandText = cmd.CommandText & "  Where [NO.]>= " & StartRow & " And [NO.] <= " & EndRow

 回到顶部