MS PARTY_MODULES = 1

This commit is contained in:
SchreiberM 2024-04-24 08:07:27 +02:00
parent fd694b2cee
commit 3f40b9449b

View File

@ -48,7 +48,7 @@ Public Class Service
Throw New ApplicationException("Database connection could not be established!")
End If
Dim oKey = Database.GetScalarValue("SELECT LICENSE FROM TBDD_3RD_PARTY_MODULES WHERE NAME = 'GDPICTURE'")
Dim oKey = Database.GetScalarValue("SELECT LICENSE FROM TBDD_3RD_PARTY_MODULES WHERE NAME = 'GDPICTURE' and ACTIVE = 1")
If String.IsNullOrWhiteSpace(oKey) Then
Throw New ApplicationException("GDPicture License could not be loaded!")