Index: ActiviteitenOpvolging/ProductiePitching/mappers/EmployeesDatabaseMapper.vb =================================================================== diff -u -r1759 -r1763 --- ActiviteitenOpvolging/ProductiePitching/mappers/EmployeesDatabaseMapper.vb (.../EmployeesDatabaseMapper.vb) (revision 1759) +++ ActiviteitenOpvolging/ProductiePitching/mappers/EmployeesDatabaseMapper.vb (.../EmployeesDatabaseMapper.vb) (revision 1763) @@ -1,4 +1,5 @@ Imports System.Data.SqlClient +Imports ProductiePitching.configs Imports ProductiePitching.ServiceAgents Imports ProductiePitching.ServiceAgents.Implementations @@ -13,11 +14,6 @@ _activiteitPerBatchServiceAgent = New ActiviteitPerBatchServiceAgent End Sub - ''' - ''' Execution of a query into a data reader. - ''' - ''' The query - ''' The SQL data reader Private Function ExecuteIntoDataSet() As DataSet Try @@ -90,9 +86,9 @@ Dim employee As New Employee With employee .PersonelNumber = ExtractItemFromDataReader(Of Integer)(dataReader, "PersNr", True) - .Picture = ExtractItemFromDataReader(Of String)(dataReader, "Foto", True, String.Empty) .FirstName = ExtractItemFromDataReader(Of String)(dataReader, "Voornaam", False, String.Empty) .LastName = ExtractItemFromDataReader(Of String)(dataReader, "Achternaam", False, String.Empty) + .Picture = ConfigsLoader.EmployeePhotoPath + .LastName + " " + .FirstName + ".jpg" .Initials = ExtractItemFromDataReader(Of String)(dataReader, "Initialen", True) End With