62,257
社区成员
发帖
与我相关
我的任务
分享
Public Function AjaxPage(currentpage As Integer, pagesize As Integer, sortfield As String, sortorder As String, model As Model.Article, procname As String) As DataSet
Try
Dim param As SqlParameter()
param = {
New SqlParameter("@currentpage", SqlDbType.SmallInt),
New SqlParameter("@pagesize", SqlDbType.SmallInt),
New SqlParameter("@sortfield", SqlDbType.VarChar, 64),
New SqlParameter("@sortorder", SqlDbType.VarChar, 8),
New SqlParameter("@auditresults", SqlDbType.TinyInt),
New SqlParameter("@searchkey", SqlDbType.VarChar, 32)
}
param(0).Value = Convert.ToInt16(currentpage)
param(1).Value = Convert.ToInt16(pagesize)
param(2).Value = sortfield
param(3).Value = sortorder
param(4).Value = Convert.ToInt16(model.AuditResults)
param(5).Value = StringPlus.ClearChar(model.SearchKey)
Dim ds As DataSet = DbHelperSql.RunProcToDataSet(procname, param)
If DbHelperSql.JudjeDataset(ds) Then
Return ds
Else
Return Nothing
End If
Catch ex As Exception
Throw
End Try
End Function