Datei ein bestimmtes Attribut geben

Sprache: VB

Diese Funktion gibt einer Datei ein bestimmtes Dateiattribut.

''' <summary>
''' Diese Funktion gibt einer Datei ein bestimmtes Dateiattribut.
''' </summary>
''' <param name="FileName">Die Datei der das Attribut gegeben werden soll</param>
''' <param name="NewAttribute">Das Attribut was gesetzt werden soll</param>
Public Sub SetAttribute(ByVal FileName As String, ByVal NewAttribute As FileAttribute)
    Dim Attr As FileAttributes
    Attr = File.GetAttributes(FileName)
    File.SetAttributes(FileName, Attr Or NewAttribute)
End Sub

''' <summary>
''' Diese Funktion gibt einer Datei ein bestimmtes Dateiattribut.
''' </summary>
''' <param name="FileName">Die Datei der das Attribut gegeben werden soll</param>
''' <param name="NewAttribute">Das Attribut was gesetzt werden soll</param>
Public Sub SetAttribute(ByVal FileName As String, ByVal NewAttribute As FileAttribute)
    Dim Attr As FileAttributes
    Attr = File.GetAttributes(FileName)
    File.SetAttributes(FileName, Attr Or NewAttribute)
End Sub

Abgelegt unter Attribut Datei

Alte URL: /snippet/datei-ein-bestimmtes-attribut-geben/548