http://www.yy42.net/blog/?p=93&cpage=1#comment-894

此博客详细介绍了信息技术领域的最新发展情况,探讨了从编程语言到开发工具的各种话题。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

解释下列代码Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim TJStr As String = Request.QueryString("serch") Dim Dr As DataSet Dim Sql As String Dim SqlObj As New basesql Dim PDSource As New PagedDataSource If Trim(TJStr) <> "" Then Sql = "select uid,uname,jzarea,('face/'+face) as face,regtime,lastlogin,logintimes,(select count(*) from wpinfo where userid=uid) as hps,(select count(*) from requireinfo where userid=uid) as xqs from userinfo where uname like '%" & Trim(TJStr) & "%' order by hps desc" Else Sql = "select uid,uname,jzarea,('face/'+face) as face,regtime,lastlogin,logintimes,(select count(*) from wpinfo where userid=uid) as hps,(select count(*) from requireinfo where userid=uid) as xqs from userinfo order by hps desc" End If Dr = SqlObj.ExecuteDataSet(Sql) PDSource.DataSource = Dr.Tables(0).DefaultView PDSource.AllowPaging = True PDSource.PageSize = 4 Dim CurrPage As Integer If Request.QueryString("page") <> "" Then CurrPage = CInt(Request.QueryString("page")) Else CurrPage = 1 End If PDSource.CurrentPageIndex = CurrPage - 1 Repeater1.DataSource = PDSource Repeater1.DataBind() SumNum.Text = Dr.Tables(0).Rows.Count CPage.Text = PDSource.CurrentPageIndex + 1 SumPage.Text = PDSource.PageCount fpage.NavigateUrl = Request.CurrentExecutionFilePath & "?page=1" epage.NavigateUrl = Request.CurrentExecutionFilePath & "?page=" & PDSource.PageCount npage.NavigateUrl = Request.CurrentExecutionFilePath & "?page=" & CurrPage + 1 ppage.NavigateUrl = Request.CurrentExecutionFilePath & "?page=" & CurrPage - 1 If PDSource.IsFirstPage Then fpage.Enabled = False ppage.Enabled = False End If If PDSource.IsLastPage Then epage.Enabled = False npage.Enabled = False End If
03-14
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值