Subversion Repositories DevTools

Rev

Rev 2 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2 Rev 4555
Line 178... Line 178...
178 
	End Sub
 178 
	End Sub
179 
	'-----------------------------------------------------------------------------------------------------------------
 179 
	'-----------------------------------------------------------------------------------------------------------------
180 
	Private Sub Class_Terminate()
 180 
	Private Sub Class_Terminate()
181 
		'// Perform action on object disposal. e.g. Set myObj = Nothing
 181 
		'// Perform action on object disposal. e.g. Set myObj = Nothing
182 
		If NOT bIsDisplayed AND NOT IsNull(sMsgSummary) Then
 182 
		If NOT bIsDisplayed AND NOT IsNull(sMsgSummary) Then
183 
			Response.write ( sMsgSummary & "<br>" & sMsgDetails )
 183 
			Response.write ( sMsgSummary & "<br>Class_Terminate:" & sMsgDetails )
184 
		End If
 184 
		End If
185 
	End Sub
 185 
	End Sub
186 
	'-----------------------------------------------------------------------------------------------------------------
 186 
	'-----------------------------------------------------------------------------------------------------------------
187 
End Class
 187 
End Class
188 
%>
 188 
%>
189 

            189