LogPath="c:\LogFiles\logs" Папка для логов, измените путь на удобный.
Set v7_double = CreateObject("V77.Application") Здесь надо указывать объект V77 в зависимости от Вашей версии 1С http://www.sinor.ru/~my1c/knowhow/ini_ole.html
result = v7_double.Initialize(v7_double.RMTrade, "/Dc:\Путь\ /NИмяПользователя /PПароль","NO_SPLASH_SHOW")
Есс-но, путь надо заменить на Ваш, пользователь должен иметь соответствующие права.
set doc2=V7.EvalExpr("Последовательность.ОсновнаяПоследовательность.ПолучитьДокумент()")
-Указать имя Вашей последовательности
В строке
if count>250 then : 250 - количество проведенных документов на подключение. После этого база отключается и подключается заново. Для ДБФ необязательно, для SQL2005 лишне.
Хохма в том, что при единственном подключении у меня переподключение не срабатывало - (если кто объяснит, буду рад). Поэтому фоном держу пустой объект, присоединенный к базе.
Установка значений констант закомментирована, оставлена для примера.