Button AccessCode manuell versenden
This commit is contained in:
@@ -216,6 +216,7 @@ Public Class frmMain
|
||||
RibbonPageEnvelopeActions.Enabled = True
|
||||
Select Case XtraTabControlMain.SelectedTabPageIndex
|
||||
Case 1
|
||||
RibbonPageGroupReceiver.Visible = False
|
||||
btnEditEnvelope.Enabled = False
|
||||
btnDeleteEnvelope.Enabled = False
|
||||
btnContactReceiver.Enabled = False
|
||||
@@ -226,6 +227,7 @@ Public Class frmMain
|
||||
bbtnitm2Faktor.Enabled = False
|
||||
LoadEnvelopeData()
|
||||
Case 0
|
||||
RibbonPageGroupReceiver.Visible = True
|
||||
btnEditEnvelope.Enabled = True
|
||||
btnDeleteEnvelope.Enabled = True
|
||||
btnContactReceiver.Enabled = True
|
||||
@@ -864,7 +866,7 @@ Public Class frmMain
|
||||
For Each oReceiver As Receiver In Receivers
|
||||
If oReceiver.EmailAddress = selReceiver.EmailAddress Then
|
||||
If oController.ActionService.ManuallySendAccessCode(oEnvelope, oReceiver) = True Then
|
||||
Dim oMsg = Resources.Envelope.Invitation_successfully_resend.Replace("@Mail", oReceiver.EmailAddress)
|
||||
Dim oMsg = Resources.Envelope.AccessCode_successfully_send.Replace("@Mail", oReceiver.EmailAddress)
|
||||
MsgBox(oMsg, MsgBoxStyle.Information, Text)
|
||||
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user