Dim queryString As String = "SELECT TOP " + newsCount + " cn.id, cn.name, cn.content, cn.rubric_id, cn.date, MONTH(cn.date) AS currentMonth, YEAR(cn.date) AS currentYear FROM cms_sitenews AS csn, cms_news AS cn " + _
        "   WHERE csn.news_id = cn.id AND cn.is_published=1 AND csn.site_id=" + siteId + " AND DATEDIFF(Month, cn.date, GETDATE())<6 " + _
        "   ORDER BY newid()"

            Dim queryString As String = "SELECT TOP " + maxUsingNewsCount + " cn.id, cn.name, cn.date, cn.content, cn.rubric_id, MONTH(cn.date) AS currentMonth, YEAR(cn.date) AS currentYear FROM cms_sitenews as csn, cms_news as cn WHERE csn.site_id='" + siteID + "' AND cn.is_published='1' AND csn.news_id=cn.id ORDER BY cn.date DESC, cn.id DESC"

        Dim filterExpression As String = " DATEDIFF(Month, date, GETDATE())<6 "
        FullPagesDataDS.Tables("cms_news").Select(filterExpression, " newid() ")

Cannot find column newid()