If File.Exists(File.DirDefaultExternal, "140414.txt") = False Then
txt = WortMappe.Get("Anl1") & CRLF & CRLF & WortMappe.Get("Anl2")
File.WriteString(File.DirDefaultExternal, "140414.txt", "Version 140414" &CRLF &"www.watchkido.de")
Msgbox2(txt, WortMappe.Get("Anl0"),WortMappe.Get("weiter"), "", "", Null)
Else
End If