cmd.CommandText = "Select Count(*) From {表1} where 登录人='" & e.Cookies("username") & "'"
Dim Count As Integer = cmd.ExecuteScalar() '获取总的行数
cmd.CommandText = "Select * From (Select Row_Number() Over(Order by 靠离日期 desc) As [NO.],[_Identify],英文船名,航次,IMO号,检查类别,泊位,靠离日期,靠离时段 From 表1 where 登录人='" & e.Cookies("username") & "') As a "
cmd.CommandText = cmd.CommandText & " Where [NO.]>= " & StartRow & " And [NO.] <= " & EndRow