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.238
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

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.