Index: BL/Prod/ImageLinkImport/BlumImagesVoorAdminImporteerder.cls.xml
===================================================================
diff -u -r68448 -r74862
--- BL/Prod/ImageLinkImport/BlumImagesVoorAdminImporteerder.cls.xml	(.../BlumImagesVoorAdminImporteerder.cls.xml)	(revision 68448)
+++ BL/Prod/ImageLinkImport/BlumImagesVoorAdminImporteerder.cls.xml	(.../BlumImagesVoorAdminImporteerder.cls.xml)	(revision 74862)
@@ -82,8 +82,7 @@
 
 <Method name="GeefDetailFeedback">
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	Quit ##class(TECH.StringUtils).Replace(##class(TECH.StringUtils).Replace(..DetailFeedback, "Er wordt geen imageLink gekoppeld aan product 'ProductId'.", "", ), "Import ImagesVoorBlumProducten : Bestand","file")
+<Implementation><![CDATA[	Quit ##class(TECH.StringUtils).Replace(##class(TECH.StringUtils).Replace(..DetailFeedback, "Er wordt geen imageLink gekoppeld aan product 'ProductId'.", "", ), "Import ImagesVoorBlumProducten : Bestand","file")
 ]]></Implementation>
 </Method>
 
@@ -221,9 +220,10 @@
 	#dim BestandExtensie As %String = ##class(TECH.File).GeefExtensie(BestandVolledigeNaam)
 	#dim BestandLocatie As %String = ##class(TECH.File).GetDirectory(BestandVolledigeNaam)
 	
+	#dim RootPath as %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
 	#dim ImageSubdir As %String = $$$UCase(##class(TECH.File).NormalizeDirectory(BestandLocatie))
-	If ImageSubdir [ "NOTES01\IMAGES\" {
-		Set ImageSubdir = $Piece(ImageSubdir, "NOTES01\IMAGES\", 2)
+	If ImageSubdir [ $$$UCase(RootPath) {
+		Set ImageSubdir = $Piece(ImageSubdir, RootPath _"\", 2)
 	}
 	If $Extract(ImageSubdir,*)="\" {
 		Set ImageSubdir = $Extract(ImageSubdir, 1, *-1)