Visual Basic.NET - AYUDA URGENTE POR FAVOR

   
Vista:

AYUDA URGENTE POR FAVOR

Publicado por Miguel (3 intervenciones) el 11/05/2011 19:42:37
TENGO ESTA RUTINA PERO ME DEVUELVE ERROR AL ASIGNAR EL DATA TABLE EL RESULTADO DEL DATA SET


Str_CadConVar = ConfigurationManager.ConnectionStrings(Cbo_Cliente .SelectedValue.ToString.Trim).ConnectionString

Dim dResultados As DataSet = cls_SQL.LlamaProcedimientoDataSetReporte(Str_CadCo nVar, "EXEC WEB_Obt_Cobertura_Total", tmpError)

Dim dt As DataTable = dResultados.Tables(0)

EL PROCEDIMIENTO QUE INVOCA PARA LA CARGA DEL DATA SET ES EL SIGUIENTE

Public Function LlamaProcedimientoDataSetReporte(ByVal StrCon As String, ByVal Procedimiento As String, ByRef StrErr As String) As DataSet
Dim Cm As New SqlCommand
Dim da As SqlDataAdapter
Dim ds As New DataSet
Try
Cm.Connection = New SqlConnection(StrCon)
Cm.CommandType = CommandType.StoredProcedure
Cm.CommandText = Procedimiento
Cm.CommandTimeout = 0
da = New SqlDataAdapter(Cm)
da.Fill(ds)
Cm.Parameters.Clear()
Cm.Connection.Close()
Cm.Dispose()
Cm = Nothing
Catch ex As SqlException
StrErr = "Ha ocurrido el siguiente error: " + ex.Message
ds = Nothing
End Try
Return ds
End Function

EL STORED PROCEDURE "EXEC WEB_Obt_Cobertura_Total"
ME DEVUELVE MULTI TABLAS SON 10

ME SALE EL SIGUIENTE ERROR
Referencia a objeto no establecida como instancia de un objeto.
Descripción: Excepción no controlada al ejecutar la solicitud Web actual. Revise el seguimiento de la pila para obtener más información acerca del error y dónde se originó en el código.

Detalles de la excepción: System.NullReferenceException: Referencia a objeto no establecida como instancia de un objeto.

Error de código fuente:


Línea 134: Dim dResultados As DataSet = cls_SQL.LlamaProcedimientoDataSetReporte(Str_CadCo nVar, "EXEC WEB_Obt_Cobertura_Total", tmpError)
Línea 135:
Línea 136: Dim dt As DataTable = dResultados.Tables(0)
Línea 137:
Línea 138: sFile = Server.MapPath(Request.ApplicationPath) & "Telmex\Reportes\Reporte_Cobertura_" & Cbo_Cliente.SelectedValue.ToString.Trim & "_" & FormtatoFecha(DateTime.Now) & ".xls"


Archivo de origen: C:\Inetpub\wwwroot\CobiWeb\Telmex\Consulta_Deuda.a spx.vb Línea: 136

Seguimiento de la pila:


[NullReferenceException: Referencia a objeto no establecida como instancia de un objeto.]
Consulta_Deuda.CreaReporteExcel() in C:\Inetpub\wwwroot\CobiWeb\Telmex\Consulta_Deuda.a spx.vb:136
Consulta_Deuda.btnCobertura_Click(Object sender, EventArgs e) in C:\Inetpub\wwwroot\CobiWeb\Telmex\Consulta_Deuda.a spx.vb:118
System.Web.UI.WebControls.Button.OnClick(EventArgs e) +111
System.Web.UI.WebControls.Button.RaisePostBackEven t(String eventArgument) +110
System.Web.UI.WebControls.Button.System.Web.UI.IPo stBackEventHandler.RaisePostBackEvent(String eventArgument) +10
System.Web.UI.Page.RaisePostBackEvent(IPostBackEve ntHandler sourceControl, String eventArgument) +13
System.Web.UI.Page.RaisePostBackEvent(NameValueCol lection postData) +36
System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint) +1565
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de FRANCISCO

AYUDA URGENTE POR FAVOR

Publicado por FRANCISCO (162 intervenciones) el 12/05/2011 14:54:08
prueba a poner new delante de la declaracion
Dim dResultados As new DataSet
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar