Script control

[Antonariy]

Добавляю в эту весчь свой объект, который имеет процедуру Add(rs as Object). В скрипте извлекаю рекордсет и передаю в Add. Возникает ошибка несоответствия типов. Можно ли как-нибудь ее побороть не приводя процедуру к виду Add(rs as Variant)?

[Antonariy]

И еще, это происходит в vbscript, в javascript все в порядке.

[GSerg]

Скобки при вызове не убрал?

[Antonariy]

Наверное, если бы была проблема со скобками, то возникла бы синтаксическая ошибка?

[alibek]

Попробуй все-же убрать.

[Antonariy]

Собственно их и не было. Ставить тоже пробовал, если уж на то пошло.

[alibek]

Может версии ADO разные используются, в твоей процедуре и в скрипте? Я бы <connection>.Version проверил.

[S397]

vbscript не поддерживает передачу аргументов по ссылке,
Add(ByVal rs as Object) будет работать

[Antonariy]

S397 проверю, но уже сделал variant

[Antonariy]

Еще вопрос. Почему в vbs не работает on error goto errlabel, а только on error resume next? Что делать?

[S397]

Оператор GOTO отсутствует в спецификации языка.

[S397]

Код: Выделить всё

On Error Resume Next
Do
   <... операторы содержащие ошибку ...>
   If Err.Number <> 0 Then Exit Do
   <...>
   Exit Do
Loop While True
If Err.Number <> 0 Then
   msgbox Err.Description
End If
On Error GoTo 0