Seitenhistorie

...

Code in WinIBW2 (Makro/VBScript)Sub

Sub DMAretro()
    Call Retro("DMA","","")Geschichte()
'************************************************    
    On error resume next
    Dim GeschichtePhrase
    ' GeschichtePhrase = ":z Geschichte" & vbcr - Leerzeile entfernt ->
    'GeschichtePhrase = ":z Geschichte"    'alte Form bis 2007-01-24
    GeschichtePhrase = ":z Geschichte "    'neue Form ab 2007-01-24, Blank ergänzt
    GeschichtePhrase = Application.LatinToPica(GeschichtePhrase)
    Application.ActiveWindow.Title.InsertText GeschichtePhrase
    
End Sub

Code in WinIBW3 (Javascript)

...