MS_04.01
This commit is contained in:
@@ -7,7 +7,7 @@ Public Class ClassLicence
|
||||
_lizenzManager = New ClassLicenseManager("#DigitalData35452!#", "")
|
||||
Dim sql As String = String.Format("SELECT LICENSE_PMO FROM TBDD_CLIENT WHERE GUID = {0}", CLIENT_ID)
|
||||
|
||||
Dim lic As String = ClassDatabase.Execute_Scalar(sql, True)
|
||||
Dim lic As String = ClassDatabase.Execute_Scalar(sql, False)
|
||||
If lic = "" Then
|
||||
LICENSE_COUNT = 0
|
||||
LICENSE_DATE = "1900-01-01"
|
||||
@@ -45,10 +45,10 @@ Public Class ClassLicence
|
||||
LICENSE_SAP_Connect = False
|
||||
End Try
|
||||
Try
|
||||
LICENSE_SITE = CBool(split(4))
|
||||
LICENSE_SITE_PROXY = CBool(split(4))
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Could not read License for LICENSE_SAP_Connect: " & ex.Message, False)
|
||||
LICENSE_SITE = False
|
||||
ClassLogger.Add(">> Could not read License for LICENSE_SITE_Proxy: " & ex.Message, False)
|
||||
LICENSE_SITE_PROXY = False
|
||||
End Try
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in licensemanager:")
|
||||
|
||||
Reference in New Issue
Block a user