Private Function GetDeliveryDelayDays() As DataTable Dim AppHelper As New RemoteObjects.RemoteApplication Dim retval As DataTable = Nothing Try retval = AppHelper.GetDeliveryDelayDays() Catch ex As Exception MsgBox(ex.Message) Finally AppHelper = Nothing End Try Return retval End Function
Public Function GetDeliveryDelayDays() As DataSet Dim ds As DataSet = Nothing Dim Applications As New DAL.Applications Try ds = Applications.GetDeliveryDelayDays() Catch ex As Exception HandleException(ex) Finally Applications = Nothing End Try Return ds End Function
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)