Ошибка выполнения Microsoft VBScript

Формулировка задачи:

День добрый, есть код:

Option Explicit
Dim g_sSelectedID
Dim g_oSystemOptions
Dim g_oContext
Dim g_nMaxListRows
Sub DefaultListPage_OnLoad( oSender, oEventArgs )
Dim oContext
Set oContext = New ApplicationContext
Set g_oSystemOptions = X_GetObjectFromServer("SystemOptions", oContext.SystemOptionsID, Null)
g_nMaxListRows = g_oSystemOptions.selectSingleNode("MaxListRows").nodeTypedValue
g_sSelectedID = oSender.QueryString.GetValue("SELECTEDID","")
CreateHotKeysDescriptionForList
End Sub
............

При вызове показывает ошибку:

Ошибка выполнения Microsoft VBScript: Переменная не определена: 'ApplicationContext'

и закрывается с ошибкой. Подскажите куда смотреть, т.к. на VBScript не пишу, возможность уточнить у разработчика нет, думаю на БД, но возможно проблема в некорректной работе сервера приложений, в частности IIS?
Спасибо

Решение задачи: «Ошибка выполнения Microsoft VBScript»

textual
                            Листинг программы 
                        
                            ApplicationContext