ник: snipe
вот так
GLB_CONNECTION.Execute " DELETE A1.* " _
& " FROM (SELECT TOP 1 TABLO_TBL.*, CDate(Mid(TABLO_TBL.[ID],1,10) " & "' '" & " Mid(TABLO_TBL.[ID],11)) AS Viragenie1 " _
& " From TABLO_TBL " _
& " ORDER BY CDate(Mid(TABLO_TBL.[ID],1,10) " & "' '" & " Mid(TABLO_TBL.[ID],11))) AS A1; "