Crystal Reports: скрипт на VBS для экспорта репорт

[akula]

Помогите чайнику, плиз...

Crystal Reports 10.0
Есть туча репортов, нужно для всех сделать "Verify database" и пересохранить чтобы прописать новые параметры для коннекта к базе. Как бы это автоматизировать?

Нашел вот -

Ссылка скрыта от гостей

.
Ну и написал скрипт на VBS
===================================
Dim CrystalReport1
Set CrystalReport1 = CreateObject("Crystal.CrystalReport")

With CrystalReport1

.ReportFileName = "D:\Old\Account1.rpt"
.Connect = "DSN=BLA-BLA-BLA;UID=BLA-BLA-BLA;PWD=BLA-BLA-BLA"
.Destination = crptToFile
.PrintFileType = crptCrystal
.PrintFileName = "D:\New\Account1.rpt"
.Action = 1

End With
===================================
Выдает ошибку:
Line: 11
Char: 1
Error: Unable to load report
Code: 800A502D
Source: CrystalReport

Что я неправильно делаю? Как побороть?

Спасибо.