Имеем
Adaptive Server Enterprise/12.5.0.3/EBF 11443 ESD#4/P/RS6000/AIX 4.3.3/rel12503/1939/32-bit/FBO/Sun Sep 21 00:54:50 2003

ASP. ADO + Sybase ODBC Driver 4.10.00.60

Помогите вывести сообщение об ошибке из СП. Просто задрался уже. Ничего в своем коде не вижу криминального.

СП имеет упрощенно

set nocount on
...
if some_condition
begin
select @err_code = 99999
select @err_msg = 'bla bla bla'
end

raiserror @err_code @err_msg -- <--------- this is last line in sp


В SQL Advantage выводится

Server Message: Number 99999, Severity 16
Server 'SYBASEN20', Procedure 'insert_phone', Line 87:
bla bla bla
(return status = 0)


ASP код тоже туп до безобразия


Function GetErrorMessage(objConn)
Dim s
If ConnObj.Errors.Count > 0 Then
For Each objErr in ConnObj
If objErr.Number <> 0 Then
s = s + objErr.Description
End If
Next
End If

GetErrorMessage = s

End Function

on error resume next
....
Conn.Execute(sql)
Response.Write(GetErrorMessage(Conn))


И нифига не выводится!!!
Несколько смущает return status = 0. Но в теории... это вроде не проблема...

На стороне ASP если убрать resume, то страничка как положено показывает все ошибки и месаги.
Можно конечно работать с VBScript Err, но хотелось бы реально понять в чем проблема.

Да, в ASP пропущена строчка

GetErrorMessage = s

т.е. я не забыл вернуть результат...

Спасибо за совет!
Но, это вроде не мой случай.

Впрочем, я таки нашел в чем проблема. Сраный VB, несмотря на option explicit, не отругался на переменную. Так что дело было в простой опечатке.
Пока все не вымочил и не написал построчно... :-(