Foros del Web » Programando para Internet » ASP Clásico »

La aplicación utiliza un valor de tipo no válido para la operación actual

Estas en el tema de La aplicación utiliza un valor de tipo no válido para la operación actual en el foro de ASP Clásico en Foros del Web. Hola! les escribo por un error que me da cuando grabo datos desde mi pagina asp. Son dos listas llenadas con un xml desde la ...
  #1 (permalink)  
Antiguo 30/07/2008, 10:17
 
Fecha de Ingreso: febrero-2008
Mensajes: 111
Antigüedad: 16 años, 3 meses
Puntos: 1
La aplicación utiliza un valor de tipo no válido para la operación actual

Hola!
les escribo por un error que me da cuando grabo datos desde mi pagina asp.
Son dos listas llenadas con un xml desde la base de datos e inexplicablemente me da ese error aún cuando verifico que todos los datos están correctos. Depuré la componente y trae todos los datos correctamente hasta una línea que dice: "La aplicación utiliza un valor de tipo no válido para la operación actual" .
les dejo ambos códigos... el de la componente y el asp.

gracias.
Código HTML:
COMPONENTE:
       ByVal descTabla As String, ByVal prefijo As String, _
       ByVal idBase As String) As String
    
    Dim objBODataManager As BO_DataManager.StoreProcCommand
    Dim objParams As Scripting.Dictionary
    Dim objOps As Scripting.Dictionary
    Dim objOutParams As Scripting.Dictionary
    Dim strXML As String
    
    Dim strLog As String
    
 On Error GoTo Handler_Error
    
    Set objBODataManager = New BO_DataManager.StoreProcCommand
    
    Set objParams = New Scripting.Dictionary
    
    Set objOps = New Scripting.Dictionary
    
    Set objOutParams = New Scripting.Dictionary
    
    objParams.Add "@nombreTabla", nombreTabla
    objParams.Add "@descTabla", descTabla
    objParams.Add "@prefijo", prefijo
    objParams.Add "@idBase", idBase

        
    objOps.Add "return_outputparams", "1"
    
    strXML = objBODataManager.ExecStoreProcCommand(StrConDoc, "sp_ModificarTabla", _
                objParams, objOps, objOutParams)

    
    ModificarTabla = objOutParams("@retorno")
    
    Set objBODataManager = Nothing
    Set objParams = Nothing
    Set objOps = Nothing
    Set objOutParams = Nothing
    
    Exit Function
    
Handler_Error:
        
        Dim IngError
        Dim ObjError As Errores.clsError
        Dim strDescripcion
            'Destrucción de objetos y otros.
        Set objBODataManager = Nothing
        Set objParams = Nothing
        Set objOps = Nothing
        Set objOutParams = Nothing
      
      
        IngError = Err.Number
        
        'Set ObjError = CreateObject("Errores.clsError")
        Set ObjError = New Errores.clsError
        
        strDescripcion = ObjError.Reportar_ErrorPerfil(GetObjectContext, IngError, Err.Description, gNomProyecto, gNOMCLASE, "ModificarTabla")
        Set ObjError = Nothing
        Err.Raise IngError, Err.Source, strDescripcion
End Function
Código HTML:
ASP:
'---------------------------------------------------------------------------------
'Método que guarda los parámtros ingresados por página en la base de datos
'---------------------------------------------------------------------------------
function modifica(p_tabla,p_desc,p_prefijo,p_base)
dim p
Response.Write "p_tabla:"&p_tabla&"<br>"
Response.Write "p_desc:"&p_desc&"<br>"
Response.Write "p_prefijo:"&p_prefijo&"<br>"
Response.Write "p_base:"&p_base&"<br>"
'Response.End 

set objNegDoc2= server.CreateObject("DocumentacionAFC.clsDocTablas")
'Response.end
'------------------------------------------------------------------------------------------------------------------------
'PROBLEMA: "La aplicación utiliza un valor de tipo no válido para la operación actual"
'------------------------------------------------------------------------------------------------------------------------
 set objRec2= objNegDoc2.ModificarTabla(Trim(cstr(p_tabla)),Trim(cstr(p_desc)),Trim(cstr(p_prefijo)),trim(cstr(p_base)))
 'EN ESTA LÍNEA DA EL ERROR...
set objRec1=objNegDoc2.ConsultarTab(p_tabla)
'------------------------------------------------------------------------------------------------------------------------
'------------------------------------------------------------------------------------------------------------------------
set objNegDoc2= nothing

p="AgregarTabla.asp?strAccion=inicio" 
Response.Write "pagina:"&p&"<br>"
Response.End

Response.Redirect p
'strAccion="inicio"
end function
  #2 (permalink)  
Antiguo 30/07/2008, 11:31
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98
Respuesta: La aplicación utiliza un valor de tipo no válido para la operación actual

El problema ocurre en alguna parte en el método ConsultarTab(p_tabla), primero que nada asegúrate que el valor envíado es el correcto y despues con VB depura esa dll, realmente el problema está en tu componente, te diría más cosas pero no veo ese método.

Saludos
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #3 (permalink)  
Antiguo 30/07/2008, 12:40
 
Fecha de Ingreso: febrero-2008
Mensajes: 111
Antigüedad: 16 años, 3 meses
Puntos: 1
Respuesta: La aplicación utiliza un valor de tipo no válido para la operación actual

Mmm... el error da en la línea de arriba del método ConsultarTab por eso no inlcui la componente, pero de todas maneras volvere a revisar y depurar la dll...

gracias
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 12:07.