Ошибка Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another

    Private Sub fStatistic(ThisPage As string)
            Dim CNN as OleDb.OleDbConnection 
            Dim sCNN as string, sSQL as String 
            Dim rsStat as ADODB.Recordset 
            Dim UID as Long
                                    
stop
            sCNN=mdMain.CNNstrReg 
            CNN = New OleDbConnection (sCNN)    
            if Request.Cookies.Count <> 0 then
                UID = Request.Cookies('Registration')('UserID')
                Response.Cookies('Registration').expires=Convert.ToDateTime('January 1, 2005') 
            else
                UID = 0
            end if
 
            if UID <> 53 AND UID <> 174 then
                try
                        CNN.Open()
                        HttpContext.Current.Trace.Write('Соединение: ''' & sCNN & ''' - открыто') 
                catch sx as OleDb.OleDbException 
                        HttpContext.Current.Trace.Warn('Соединение не открыто: ' & sx.message)
                        Exit Sub 
                end try
                sSQL = 'SELECT * From Statistic WHERE PageName='' & ThisPage & '''
                try
                    rsStat = New ADODB.Recordset 
                    rsStat.Open(sSQL, CNN)