Оптимизировать VBScript

Есть VBScript который производит загрузку данных из файла в базу данных (MS SQL Server). Скрипт с точки зрения логики работает корректно. Проблема в том, что он работает очень медленно из-за того, что данные вставляются по одной строке. Нужно его оптимизировать так, чтобы он считывал данные из файла в память и вставлял в базу раз в 1000 строк. Скрипт в аттачмете. Выбранному исполнителю при необходимости вышлю пример загружаемого файла и базу.

Пожалуйста, присылайте оценку по срокам и деньгам.