jj_01_02_16

This commit is contained in:
JenneJ
2016-02-01 15:41:28 +01:00
parent 6f416f75a0
commit 666c9d039f
14 changed files with 3114 additions and 2202 deletions

View File

@@ -148,7 +148,7 @@
''' <param name="Id">ControlID</param>
''' <param name="formid">Current Form ID</param>
''' <returns>Control Name</returns>
Public Function GetName_for_ControlID(Id As Integer, formid As Integer) As String
Public Function Get_Name_for_ControlID(Id As Integer, formid As Integer) As String
Try
Dim SQL = "SELECT NAME FROM TBPMO_CONTROL WHERE FORM_ID = " & formid & " AND GUID = " & Id
Dim Name = ClassDatabase.Execute_Scalar(SQL)