Dim strSql As String = "select * from News order by Data Desc;"

        Dim cmd As New SqlDataAdapter(strSql, con)

        ''la classe DataSet consente di creare dei contenitori da legare in modo diretto ai controlli dinamici di ASP.Net
        Dim ds As New DataSet

        cmd.Fill(ds, 0, 5000, "News")

        Me.CloseConnection()

        ''binding del dataset sul controllo server Repeater di ASP.Net
        AreaRipetuta.DataSource = ds
        AreaRipetuta.DataBind()