Externe MSG Datei schreibgeschützt öffnen
Hallo ich öffne per Klich in Access eine MSG Datei, diese ist dann aber editierbar und kann verändert werden.
In diesem Fall soll diese nur als Vorschau geöffnet werden und darf nicht editierbar sein
im Moment rufe ich diese wie folgt auf
In diesem Fall soll diese nur als Vorschau geöffnet werden und darf nicht editierbar sein
im Moment rufe ich diese wie folgt auf
Private Sub Betreff_Click()
EMailID = Me!ID
End Sub
Private Sub Betreff_DblClick(Cancel As Integer)
Dim path As String
path = GetIniString("Smtp", "Gesendete Mails", "") & "\"
path = path & Me!ID & ".msg"
If Dir(path) <> "" Then
Set WshShell = CreateObject("WScript.Shell")
rc = WshShell.Run(path, 1, True)
Else
End If
End Sub
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 262784
Url: https://administrator.de/forum/externe-msg-datei-schreibgeschuetzt-oeffnen-262784.html
Ausgedruckt am: 07.04.2025 um 08:04 Uhr
2 Kommentare
Neuester Kommentar

Geht so nicht, du könntest höchstens der MSG-Datei das Readonly-Flag verpassen ...
http://ss64.com/access/setattr.html
Gruß jodel32
http://ss64.com/access/setattr.html
Gruß jodel32