Помогите найти ошибку в SQL коде. - VB

Формулировка задачи:

Доброе утро,
Есть код.

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
'dim sh As Worksheet

cstrBase As String = "Путь\2012.06"
strFileName = "062012B1.DBF"
With cn
    .Provider = "Microsoft.Jet.OLEDB.4.0"
    .ConnectionString = "Data Source=" & cstrBase & ";Extended Properties=dBase IV"
    .Open
 
    Set rs = .Execute("SELECT * FROM " & strFileName)
End With

Есть Таблица Tempdata
Запускаю всё из Access
Проблемы:
1. Есть ли другой способ получить данные из strFileName, т.к. этот код на одной машине работает, а на другой зависает намертво.
2. Как можно изменить запрос ("SELECT * FROM " & strFileName) чтобы он сразу закрыжал нужные данные в таблицу Tempdata
Спасибо

Решение задачи: «Помогите найти ошибку в SQL коде.»

textual
                            Листинг программы 
                        
                            select nr_c from tempdata where ((nr_c="1" or nr_c="2" or ... (100-200 счетов) or nr_c="201"));