Advanced Search

Código ejemplo para mostrar información en un Repeater desde BD

/ Published in: VB.NET
Save to your folder(s)

Expand | Embed | Plain Text

Copy this code and paste it in your HTML 
  1. Dim adaptadorNoticias As New DSContenidosTableAdapters.NoticiasTableAdapter
  2.         Dim noticias As New DSContenidos.NoticiasDataTable
  3.         Dim conversion As New ContenidosWeb
  4.         Dim tablaDatos As New DataTable("Articulos")
  5.         Dim datos As New DataSet()
  6.         Dim fila As DataRow
  7.  
  8.         ' Inicializo la estructura que mostrará las noticias en las páginas
  9.         tablaDatos.Columns.Add(New DataColumn("Fecha"))
  10.         tablaDatos.Columns.Add(New DataColumn("Titulo"))
  11.         tablaDatos.Columns.Add(New DataColumn("Id"))
  12.         datos.Tables.Add(tablaDatos)
  13.  
  14.         ' Obtengo las noticias a incluir en el tablón de anuncios
  15.         noticias = adaptadorNoticias.ListadoNoticiasPorSeccion(205)
  16.  
  17.         ' Las incluyo en el DataSet
  18.         For i As Integer = 0 To noticias.Count - 1
  19.             fila = datos.Tables("Articulos").NewRow
  20.             fila("Id") = noticias.Item(i).id
  21.             fila("Titulo") = conversion.ConversionAHTML(noticias.Item(i).Titulo)
  22.             fila("Fecha") = noticias.Item(i).FechaPublicacion.Day & "/" & noticias.Item(i).FechaPublicacion.Month & "/" & _
  23.                 noticias.Item(i).FechaPublicacion.Year
  24.             datos.Tables("Articulos").Rows.Add(fila)
  25.         Next
  26.  
  27.         ' Vinculo el DataSet con el objeto Repeater de la página
  28.         Repeticion.DataSource = tablaDatos
  29.         Me.DataBind()
  30.  
  31.         adaptadorNoticias.Dispose()

Report this snippet


Comments

RSS Icon Subscribe to comments

You need to login to post a comment.