< %@ importación de nombres = "system.data.sqlclient" %>
< %@ importación de nombres = "system.data" %>
<script runat = "servidor">
Dim Connorthwind como sqlconnection
Dim strsql como cadena
Dim strelect como cadena
dim intstartindex como entero
Dim IntendIndex como entero
Dim intrecordcount como entero
Dim CMDSQL como sqlcommand
subpage_load
btnfirst.text = "首页"
btnprev.text = "上一页"
btnnext.text = "下一页"
btnlast.text = "末页"
ConnorthWind = new SQLConnection ("Server = 192.168.4.1; uid = sa; pwd = 111111; base de datos = yourdbname")
Si no es IsPostback, entonces
BindDataGrid
final si
final
sub bindataGrid
Dim CMDSELECT como sqlcommand
Dim dtrRecordCount como sqldatarader
intendIndex = dgrdproducts.pagesize
cmdselect = new SqlCommand ("Newspaged", Connorthwind)
cmdselect.commandType = commandType.StoredProcedure
cmdselect.parameters.add ("@PageIndex", intstartindex)
cmdselect.parameters.add ("@pagesize", intendIndex)
ConnorthWind.open ()
dtrRecordCount = cmdselect.executereader ()
mientras dtrRecordCount.read ()
intecordCount = dtrRecordCount (0)
terminar mientras
dgrdproducts.virtualItemCount = (intrecordCount / dgrdproducts.pagesize)
dtrrecordCount.nextresult ()
dgrdproducts.dataSource = dtrRecordCount
dgrdproducts.databind ()
ConnorthWind.Close ()
final
sub dgrdproducts_pageIndexchanged (s como objeto, e como dataGridPageChangedEventargs)
intstartIndex = E.NewPageIndex
dgrdproducts.CurrentPageIndex = E.NewPageIndex
BindDataGrid
final
Sub PagerButtonClick (remitente de Byval como objeto, Byval E como EventArgs)
dim arg como string = sencer.commandargument
Seleccionar Caso Arg
Caso "Siguiente"
if (dgrdproducts.currentPageIndex <(dgrdproducts.pageCount - 1)) Entonces
dgrdproducts.CurrentPageIndex += 1
final si
Caso "anterior"
if (dgrdproducts.currentPageIndex> 0) entonces
dgrdproducts.CurrentPageIndex -= 1
final si
Caso "Último"
dgrdproducts.currentPageIndex = (dgrdproducts.pageCount - 1)
caso
'número de página
DGRDProducts.CurrentPageIndex = System.Convert.Toint32 (Arg)
final seleccionar
intstartindex = dgrdproducts.currentPageIndex
BindDataGrid
final
sub dgrdproducts_editcommand (s como objeto, e como dataGridCommandeventargs)
dgrdproducts.edititemindex = e.item.Itemindex
intstartindex = dgrdproducts.currentPageIndex
BindDataGrid
final
sub dgrdproducts_updateCommand (s como objeto, e como dataGridCommandeventargs)
Dim InteTarticleId como entero
Dim txttopic como cuadro de texto
Dim txteditor como cuadro de texto
Dim strtopic como cadena
Dim streditor como cadena
intarticleID = dgrdproducts.datakeys (e.item.itemindex)
txttopic = e.item.cells (1) .controls (0)
txteditor = e.item.cells (2) .controls (0)
strtopic = txttopic.Text
streditor = txteditor.text
strsql = "actualizar tb_article set [correo electrónico protegido]," _
& "[Correo electrónico protegido] Donde [correo electrónico protegido]"
cmdsql = new SqlCommand (STRSQL, ConnorthWind)
cmdsql.parameters.add ("@topic", strtopic)
cmdsql.parameters.add ("@Editor", streditor)
cmdsql.parameters.add ("@articleid", intarticleID)
ConnorthWind.open ()
cmdsql.executenQuery ()
ConnorthWind.Close ()
dgrdproducts.edititemindex = -1
BindDataGrid
final
sub dgrdproducts_cancelcommand (s como objeto, e como dataGridCommandeventargs)
dgrdproducts.edititemindex = -1
BindDataGrid
final
</script>
<html>
<HEAD> <title> dataGridCustompage.aspx </title> </head>
<Body>
<form de runat = "servidor">
<ASP: DataGrid runat = "servidor"
id = "dgrdproducts"
ONEDITCOMMAND = "DGRDPRODUCTS_EDITCOMMAND"
onupdateCommand = "dgrdproducts_updateCommand"
OnCancelCommand = "DGRDProducts_CancelCommand"
datakeyfield = "a_articleid"
autogenerateColumns = "falso"
showHeader = "verdadero"
tetermepaging = "verdadero"
permitirse
Headerstyle-BackColor = "Salmon"
PageSize = "10"
onpageIndexchanged = "dgrdproducts_pageIndexchanged"
PagerStyle-Mode = "NumericPages"
alternaTiMStyle-BackColor = "#eeaaee"
font-size = "10pt"
font-name = "Verdana"
CellSpacing = "0"
CellPadding = "3"
GridLines = "Ambos"
borderwidth = "1"
bordercolor = "negro"
Pagerstyle-Horizontalalign = "Right">
<TermentheratingItemStyle backColor = "#eeeeee"> </alternaTiMstyle>
<CoLoLums>
<ASP: BoundColumn
Headtext = "序列号"
dataField = "Artículoid"
readonly = "true" />
<ASP: BoundColumn
Headtext = "标题"
dataField = "Topic" />
<ASP: BoundColumn
Headtext = "编辑者"
dataField = "Editor" />
<ASP: EditCommandColumn
EditText = "¡Editar!"
UPDATATETEXT = "¡Actualizar!"
cancelText = "¡Cancelar!" />
<ASP: Hyperlinkcolumn
Headtext = "编辑"
DataNavigateUrlfield = "Artículoid"
DataNavigateUrlFormatString = "Detalles.aspx? Id = {0}"
text = "编辑"/>
</columnas>
</ASP: DataGrid>
<ASP: LinkButton ID = "BTNFirst" runat = "Server" font-name = "verdana" font-size = "8pt" Foutecolor = "Navy" CommandarGument = "0"> </asp: LinkButton> & nbsp;
<ASP: LinkButton ID = "BTNPREV" Runat = "Server" Font-Name = "Verdana" font-size = "8PT" FUNCOLOR = "Navy" CommandarGument = "Prev"> </asp: LinkButton> & nbsp;
<ASP: LinkButton ID = "BTNNEXT" Runat = "Server" Font-Name = "Verdana" font-size = "8pt" ForeColor = "Navy" CommandarGument = "Next"> </Asp: LinkButton> & nbsp;
<ASP: LinkButton ID = "Btnlast" runat = "Server" font-name = "Verdana" font-size = "8pt" Foutecolor = "Navy" CommandarGument = "Last"> </Asp: LinkButton>
</form>
</html>
下面是存储过程 ：
Crear procedimiento de periódico
(
@PageIndex int,
@Pagesize int
)
como
comenzar
declarar @PagelowerBound int
declarar @PageUpperBound int
declarar @rowstoreturn int
- Primero configure la cuenta de Row
set @rowstoreturn = @pagesize * (@PageIndex + 1)
Establecer RowCount @RowStoreTurn
- Establezca los límites de la página
establecer @PagelowerBound = @Pagesize * @PageIndex
establecer @pageupperBound = @pagelowerBound + @pagesize + 1
- Cree una tabla TEMP para almacenar los resultados de selección
Crear tabla #pageIndex
(
Indexid int identidad (1, 1) no nulo,
ArtemId int,
)
- Insertar en la tabla temperatura
Insertar en #PageIndex (ArtemId)
seleccionar
Artículoidio
de
nombre de table
ordenar
Artículo de descripción
- RETENCIÓN TOTAL DE RETROBA
Seleccione Count (ArtArtId) de Tablename
- Devuelve resultados pagados
seleccionar
O.ARTICLEID, O.TOPIC, editor
de
Tablename O,
#PageIndex PageIndex
dónde
o.articleID = pageIndex.articleID y
pageIndex.Indexid> @PagelowerBound y
pageIndex.Indexid <@PageUpperBound
ordenar
pageIndex.Indexid
fin