VBScript/ASP clásico - ¿Cómo averiguar si una propiedad existe en un objeto sin emitir un error

Question

Código de ejemplo:

Dim myObject 
Set myObject = JSON.parse(someJsonResponseFromTheServer)  

myFunction(myObject.someProperty) 

El problema:

Cuando el código similar a este es ejecutado en mi aplicación, arroja un error 500 desde el servidor con un mensaje similar a "Objeto no admite la propiedad o el método 'alguna propiedad'. Lo que me gustaría hacer para resolver este problema es algo como esto:

Sin embargo, si agrego el condicional, arroja el mismo error en la línea con el condicional en lugar de la línea con la llamada al método.

Mi Pregunta:

En ASP clásico, ¿Cómo se detecta si existe una propiedad dentro de un objeto sin lanzar un error?

Answer 1

Uno de los beneficios de la ASP clásico es que le permite ejecutar VBScript y JScript en la misma página - por lo tanto puedes usar el poder de ambos.

En primer lugar, añadir este bloque de código JScript a su .asp archivo existente:

<script language="JScript" runat="server"> 
function CheckProperty(obj, propName) { 
    return (typeof obj[propName] != "undefined"); 
} 
</script> 

Y suponiendo VBScript es el idioma por defecto en la página, se le puede llamar desde el código VBScript siguiente manera:

Dim myObject 
Set myObject = JSON.parse(someJsonResponseFromTheServer)  
If CheckProperty(myObject, "someProperty") Then 
    myFunction(myObject.someProperty) 
End If 

Lo probó con un objeto de clase genérico y funciona bien: el JScript se compila antes de poder acceder al VBScript.

Answer 2

Lamentablemente, esto generalmente significa una declaración de 'error'.

Private Function TestProperty() 
    Dim Success 
    Success = False 

    On Error Resume Next 
     ' set for property here 
     Success = (Err.Number = 0) 
    On Error Goto 0 
    TestProperty = Success 
Exit Function 

Answer 3

En el supuesto de que va a incluir algún archivo runat = "server" js que le proporciona el analizador JSON a continuación JSON.parse va a devolver un objeto Javascript.

Si la suposición es correcta, entonces el siguiente se debe trabajar;

If myObject.hasOwnProperty("someProperty") Then 
    myFunction(myObject.someProperty) 
End If