#Region "GetAccountDetail - Return Information about all Accounts" Public Function GetAccountDetail(ByVal cat As String) As DataSet Dim localDSOutput As DataSet Dim ParamsStoredProcedure As String = "GetAccountByCat" Try Dim localOutPutServer As New DataServer(PrivateConnectionString) localOutPutServer.BuildParameter( _ "@AccCat", cat, DataServer.SQLDataType.SQLChar, , ParameterDirection.Input) localDSOutput = localOutPutServer.returnDataSet(ParamsStoredProcedure) Return localDSOutput Catch ExceptionObject As Exception 'LogException(ExceptionObject) Finally End Try End Function
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)