This commit is contained in:
2023-10-11 09:38:06 +02:00
parent df3e01b921
commit 603ee5a1fc
2 changed files with 9 additions and 10 deletions

View File

@@ -19,7 +19,7 @@ Public Class HistoryModel
oSql += " (@ENVELOPE_ID "
oSql += " ,@USER_REFERENCE "
oSql += " ,@ACTION_TYPE "
oSql += " ,@ACTION_DESCRIPTION) "
oSql += " ,@ACTION_DESCRIPTION "
oSql += " ,@ACTION_DATE) "
Dim oCommand As New SqlCommand(oSql)
@@ -27,7 +27,7 @@ Public Class HistoryModel
oCommand.Parameters.Add("USER_REFERENCE", SqlDbType.NVarChar).Value = pHistory.UserReference
oCommand.Parameters.Add("ACTION_TYPE", SqlDbType.NVarChar).Value = pHistory
oCommand.Parameters.Add("ACTION_DESCRIPTION", SqlDbType.NVarChar).Value = pHistory.ActionDescription
oCommand.Parameters.Add("ACTION_DATE", SqlDbType.DateTime).Value = pHistory
oCommand.Parameters.Add("ACTION_DATE", SqlDbType.DateTime).Value = Now()
If Database.ExecuteNonQuery(oCommand) Then
Return True