none
SaveAs-Dialog unterbinden RRS feed

  • Frage

  • Hallo,

    ich habe ein ActionsPane mit Pflichtfeldern, die ausgefüllt werden müssen. Wenn nicht alle ausgefüllt sind, soll der Speicherdialog unterbunden werden. Ich habe bereits diesen Code:

     Private Sub ThisDocument_BeforeSave(sender As Object, e As SaveEventArgs) Handles Me.BeforeSave
    
            If DV_Titel = "" OrElse DV_Dokumentationstyp = "" OrElse DV_System = "" OrElse DV_Prozess1 = "" OrElse DV_Bereich1 = "" OrElse DV_Standort1 = "" OrElse DV_VName = "" OrElse DV_Bearbeitungsdatum = "" OrElse DV_Gueltigkeitsdatum = "" Then
    
                MessageBox.Show("Alle Pflichtfelder müssen ausgefüllt werden!")
    
            End If
    
        End Sub
    

    Bei Google wurde ich nicht wirklich fündig. Vielleicht weiß ja jemand eine Methode.

    Danke im Vorraus,

    Alice

    Dienstag, 16. August 2016 14:16

Antworten