Dim xdoc As New XmlDataSource()
xdoc.DataFile = "http://"
xdoc.XPath = "rss/channel/item"

Dim expression1 As XPathExpression = XPathExpression.Compile("//*position()   <= 3]")

DataList_rssTop.DataSource = expression1
DataList_rssTop.DataBind()