Rubrik: Dateisystem · Dateien lesen/schreiben | VB-Versionen: VB4, VB5, VB6 | 14.03.01 |
Speichern nur auf einem bestimmten Laufwerk Hier wird gezeigt, wie man das Speichern einer Datei/eines Dokuments auf ein bestimmtes Laufwerk beschränkt. | ||
Autor: Heinz Prelle | Bewertung: | Views: 13.249 |
www.visual-basic5.de | System: Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Unser heutiger Tipp richtet sich eher an VB-Einsteiger und Neulinge. Hier wird gezeigt, wie man das Speichern einer Datei/eines Dokuments auf ein bestimmtes Laufwerk beschränkt.
' benötigt wird das MS-CommonControl Private Sub Command1_Click() Dim Filename As String ' Speichern unter... - Dialog On Local Error Resume Next With CommonDialog1 .CancelError = True Do .Action = 2 ' Prüfen, ob "Abbrechen" If Err <> 0 Then Filename = "": Exit Do End If ' nur Laufwerk A zulassen If UCase$(Left$(.Filename, 1)) <> "A" Then MsgBox "Geben Sie den Dateinamen ein und legen " + _ "Sie als Laufwerk A: fest.", vbInformation, _ "Hinweis..." Else Filename = .Filename Exit Do End If DoEvents Loop End With ' Dokument speichern If Filename <> "" Then ... End If End Sub