Crashed with Outlook 2019, not earlier?

I have a 32-bit VB6 application that uses Outlook Redemption to send out e-mails. This program has worked fine up to Outlook 2016, but some of my customers are losing the ability to e-mail through my program when they either upgrade to 2019 or get auto-updated on their Office 365 subscription.

A simplified version of my code:

Private Sub cmdSendMessage_Click()
        Dim objSession As RDOSession
        Dim objOutbox As RDOFolder
        Dim objMessage As RDOMail
        Dim objRecipient As RDORecipient
        Dim strBody As String

100     On Error GoTo ErrorHandler

101     Set objSession = New RDOSession
102     objSession.Logon , , False, False

103     Set objOutbox = objSession.GetDefaultFolder(olFolderOutbox)
104     Set objMessage = objOutbox.Items.Add

105     Set objRecipient = objMessage.Recipients.Add(txtAddressTo.Text)
106     objRecipient.Resolve

107     strBody = "This is a test message--sent using Outlook Redemption." & vbNewLine & vbNewLine & _
            "Sent: " & Now & vbNewLine & _
            "Sent from Computer: " & GetThisComputerName

109     With objMessage
110         .Subject = "Test Message - Outlook Redemption"
111         .Body = strBody

112         .Send
113     End With 'objMessage

114     objSession.Logoff

115     MsgBox "Message sent.", vbOKOnly + vbInformation


ExitRoutine:
201    Set objRecipient = Nothing
202    Set objMessage = Nothing
203    Set objOutbox = Nothing
204    Set objSession = Nothing

210    Exit Sub

ErrorHandler:
    MsgBox "Error " & Err.Number & vbNewLine & vbNewLine & Err.Description & vbNewLine & vbNewLine & _
        "Line " & Erl, vbOKOnly + vbCritical, "Error in Execution"
    Resume ExitRoutine

End Sub

I tried the program with the code above on a customer's machine running Outlook 2019 MSO (16.0.12527.20260) 32-bit with Windows 10, 1909 (18363.535) 64-bit and 32-bit Outlook Redemption 5.18. The program immediately crashes without an error message when I click the button to send this e-mail.

Does Outlook Redemption work at all with VB6 and the newer versions of Outlook? If so, what do I need to change in my application to make it work?

Two errors appeared in the Application Event Log:

Faulting application name: RedemptionMail.exe, version: 1.0.0.0, time stamp: 0x5b995b5e
Faulting module name: RPCRT4.dll, version: 10.0.18362.476, time stamp: 0x7acb686b
Exception code: 0xc0000005
Fault offset: 0x000461c6
Faulting process id: 0x1660
Faulting application start time: 0x01d60931c9abef20
Faulting application path: \\???\RedemptionMail.exe
Faulting module path: C:\WINDOWS\System32\RPCRT4.dll
Report Id: 916c7e74-a3dd-440c-8759-23806d654b9d
Faulting package full name: 
Faulting package-relative application ID: 

and

Fault bucket 1285058706613227027, type 1
Event Name: APPCRASH
Response: Not available
Cab Id: 0

Problem signature:
P1: RedemptionMail.exe
P2: 1.0.0.0
P3: 5b995b5e
P4: RPCRT4.dll
P5: 10.0.18362.476
P6: 7acb686b
P7: c0000005
P8: 000461c6
P9: 
P10: 

Attached files:
\\?\C:\ProgramData\Microsoft\Windows\WER\Temp\WERDE85.tmp.mdmp
\\?\C:\ProgramData\Microsoft\Windows\WER\Temp\WERDEE4.tmp.WERInternalMetadata.xml
\\?\C:\ProgramData\Microsoft\Windows\WER\Temp\WERDEF4.tmp.xml
\\?\C:\ProgramData\Microsoft\Windows\WER\Temp\WERDF04.tmp.csv
\\?\C:\ProgramData\Microsoft\Windows\WER\Temp\WERDF24.tmp.txt

These files may be available here:
\\?\C:\ProgramData\Microsoft\Windows\WER\ReportArchive\AppCrash_RedemptionMail.e_684bbff35d28781a9319f7f96316e4566e7d38f_ae0321e2_6f232be0-f6dd-46d3-bdbf-4f81e08f6760

Analysis symbol: 
Rechecking for solution: 0
Report Id: 916c7e74-a3dd-440c-8759-23806d654b9d
Report Status: 268435456
Hashed bucket: ca938f3d4eba0c8bd1d57215cb344e13
Cab Guid: 0