powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Бэкап с помощью WSH. Как обработать событие?
1 сообщений из 1, страница 1 из 1
Бэкап с помощью WSH. Как обработать событие?
    #33675026
Fire83
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здравствуйте!

Необходимо написать WSH - скрипт на VB скрипт для создания бэкапа базы MS SQL 2000.
Вопросы:
1) Как отловить код ошибки? Err.Number если я его проверяю даже в случае если нет коннекта всегда 0.
2) Необходимо обработать события. Ниже написанный код выдаёт EXCEPTION_ACCESS_VIOLATION. Если обработчики убрать и убрать префикс "_B" в методе создания объекта, то всё ОК. Что не правильно?

Код такой:
'Установка соединения с сервером
Set oSQLServer = WScript.CreateObject("SQLDMO.SQLServer")
oSQLServer.HostName = ServerName
oSQLServer.Login = Login
oSQLServer.Password = Pass
oSQLServer.LoginSecure = IsTrustedConnect
oSQLServer.LoginTimeOut = cLoginTimeOut
oSQLServer.Connect

'Заданиe свойств backup
Set oBackup = WScript.CreateObject("SQLDMO.Backup","B_")
oBackup.Action = 0 'Полный бэкап базы
oBackup.Database = DBName
oBackup.Initialize = True
oBackup.Files = DbName & "_" & Date & "_" & Hour(Time) & "%" & Minute(Time) & ".bak"
oBackup.BackupSetName = DbName & Date & " " & Time
oBackup.BackupSetDescription = DBName & " от " & Date & " " & Time

'Делаем backup
oBackup.SQLBackup oSQLServer

'Обработчик событий
Sub B_Complete( Message )
WScript.Echo "Готово!"
End Sub

Sub B_PercentComplete( Message, Percent)
WScript.Echo "попали в обработчик"
End Sub

Sub B_NextMedia( Message )
WScript.Echo "попали в обработчик"
End Sub
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Бэкап с помощью WSH. Как обработать событие?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]