Wish [ABMaterial] just suggestions

peacemaker

Expert
Licensed User
Longtime User
Hi, All

I have found that for "mailto:" links better to update the code of the subs in ABShared module:
B4X:
Public Sub NavigateToPageNewTab(ws As WebSocket, PageId As String, TargetUrl As String, OpenInNewTab As Boolean) 'ignore
    Dim testTargetUrl As String = TargetUrl
    If Not(testTargetUrl.ToLowerCase.EndsWith(".htm") Or testTargetUrl.ToLowerCase.EndsWith(".html") Or testTargetUrl.ToLowerCase.EndsWith("/") Or testTargetUrl.ToLowerCase.StartsWith("mailto:")) Then  'added mailto:
        TargetUrl = TargetUrl & "/"
    End If
...

Else the wrong email cannot be sent on the mobile devices, as no edit possible at a letter template.
NOTE all subs "NavigateToPage...".
 
Last edited:

peacemaker

Expert
Licensed User
Longtime User
2) Pages class files at WebSocket_Connected:
B4X:
    If session.IsInitialized Then
        If session.IsNew Then
            session.Invalidate
            ABMShared.NavigateToPage(ws, "", "./")
            Return
        End If
        
        others.ABM.UpdateFromCache(Me, ABMShared.CachedPages, ABMPageId, ws)
    End If
    
    'to avoid error log about non-created session

3) ABMShared: without timeformat - error at Sub RedirectOutput under Windows OS:
B4X:
Sub GetDateAndTime As String
    DateTime.DateFormat = "yyyy-MM-dd"
    DateTime.TimeFormat = "HH-mm-ss"    'IMPORTANT ! ":" is forbidden in Windows file names, 
    Return DateTime.Date(DateTime.Now) & " " & DateTime.Time(DateTime.Now)
End Sub
 
Top