AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- cambios en dispose

Browse Source
This commit is contained in:
rrene
2021-09-22 11:05:09 -07:00
parent d287f481a8
commit 7d49ea4257
3 changed files with 23 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
App_Code/ClsGPS.vb
View File

@@ -5695,18 +5695,19 @@ Public Class ClsGPS
If Not disposedValue Then
If disposing Then
' TODO: Liberar otro estado (objetos administrados).
If Not Data Is Nothing Then Data.Dispose()
If Not Data Is Nothing Then Data.Dispose() : Data = Nothing
If Not Dataset Is Nothing Then
Dataset.Clear()
Dataset.Dispose()
Dataset = Nothing
End If
If Not DtPosiciones Is Nothing Then DtPosiciones.Dispose()
If Not SqlAdapter Is Nothing Then SqlAdapter.Dispose()
If Not SqlCommand Is Nothing Then SqlCommand.Dispose()
If Not SqlTransacc Is Nothing Then SqlTransacc.Dispose()
If Not DtPosiciones Is Nothing Then DtPosiciones.Dispose() : DtPosiciones = Nothing
If Not SqlAdapter Is Nothing Then SqlAdapter.Dispose() : SqlAdapter = Nothing
If Not SqlCommand Is Nothing Then SqlCommand.Dispose() : SqlCommand = Nothing
If Not SqlTransacc Is Nothing Then SqlTransacc.Dispose() : SqlTransacc = Nothing
If SqlConexion.State <> ConnectionState.Closed Then SqlConexion.Close()
If Not SqlConexion Is Nothing Then SqlConexion.Dispose()
If Not SqlConexion Is Nothing Then SqlConexion.Dispose() : SqlConexion = Nothing
End If
' TODO: Liberar su propio estado (objetos no administrados).

18
App_Code/ClsSisNotificaciones.vb
View File

@@ -2066,19 +2066,19 @@ Public Class ClsSisNotificaciones
If disposing Then
' TODO: Liberar otro estado (objetos administrados).
SqlConexion.Close()
SqlConexion.Dispose()
SqlConexion.Dispose() : SqlConexion = Nothing
If Not DataSet Is Nothing Then
DataSet.Clear()
DataSet.Dispose()
DataSet.Dispose() : DataSet = Nothing
End If
If Not Data Is Nothing Then Data.Dispose()
If Not DTNotificacionesGPS Is Nothing Then DTNotificacionesGPS.Dispose()
If Not DTNotificacionesERP Is Nothing Then DTNotificacionesERP.Dispose()
If Not DTNotificacionesArmadas Is Nothing Then DTNotificacionesArmadas.Dispose()
If Not DTReportesProgramados Is Nothing Then DTReportesProgramados.Dispose()
If Not Data Is Nothing Then Data.Dispose() : Data = Nothing
If Not DTNotificacionesGPS Is Nothing Then DTNotificacionesGPS.Dispose() : DTNotificacionesGPS = Nothing
If Not DTNotificacionesERP Is Nothing Then DTNotificacionesERP.Dispose() : DTNotificacionesERP = Nothing
If Not DTNotificacionesArmadas Is Nothing Then DTNotificacionesArmadas.Dispose() : DTNotificacionesArmadas = Nothing
If Not DTReportesProgramados Is Nothing Then DTReportesProgramados.Dispose() : DTNotificacionesGPS = Nothing
NotificacionesBitacora = ""
If Not SqlAdapter Is Nothing Then SqlAdapter.Dispose()
If Not SqlCommand Is Nothing Then SqlCommand.Dispose()
If Not SqlAdapter Is Nothing Then SqlAdapter.Dispose() : SqlAdapter = Nothing
If Not SqlCommand Is Nothing Then SqlCommand.Dispose() : SqlCommand = Nothing
End If
' TODO: Liberar su propio estado (objetos no administrados).

12
App_Code/ClsVentas.vb
View File

@@ -5257,13 +5257,13 @@ Public Class ClsVentas
If Not Me.disposedValue Then
If disposing Then
' TODO: dispose managed state (managed objects).
If Not Data Is Nothing Then Data.Dispose()
If Not Dataset Is Nothing Then Dataset.Dispose()
If Not SqlAdapter Is Nothing Then SqlAdapter.Dispose()
If Not SqlCommand Is Nothing Then SqlCommand.Dispose()
If Not SqlTransacc Is Nothing Then SqlTransacc.Dispose()
If Not Data Is Nothing Then Data.Dispose() : Data = Nothing
If Not Dataset Is Nothing Then Dataset.Dispose() : Dataset = Nothing
If Not SqlAdapter Is Nothing Then SqlAdapter.Dispose() : SqlAdapter = Nothing
If Not SqlCommand Is Nothing Then SqlCommand.Dispose() : SqlCommand = Nothing
If Not SqlTransacc Is Nothing Then SqlTransacc.Dispose() : SqlTransacc = Nothing
If SqlConexion.State <> ConnectionState.Closed Then SqlConexion.Close()
If Not SqlConexion Is Nothing Then SqlConexion.Dispose()
If Not SqlConexion Is Nothing Then SqlConexion.Dispose() : SqlConexion = Nothing
End If
' TODO: free unmanaged resources (unmanaged objects) and override Finalize() below.