vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Brandneu! sevEingabe v3.0 - Das Eingabecontrol der Superlative!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Windows API
Re: GetAttr und jeweilige Rückgabewerte 
Autor: BAStler
Datum: 25.07.07 16:03
Hallo Zardoz,

danke für die Antwort, aber entweder mache ich etwas falsch oder es geht so nicht. 
   sFolderPath = "C:\Temp"
   Attrib = GetAttr(sFolderPath)
  ' da steht  dann in Attrib 20 drin (16 für Directory + 4 für System)
  Select Case Attrib
  Case Attrib And vbReadOnly
    Check1(0) = 1
  Case Attrib And vbDirectory
    Check1(1) = 1
  Case vbHidden
    Check1(3) = 1
  Case Attrib And vbSystem
    ' hier läuft er aber drüber
    Check1(4) = 1
  End Select
oder müßte es dann nicht besser so aussehen?
   sFolderPath = "C:\Temp"
   Attrib = GetAttr(sFolderPath)
  ' da steht  dann in Attrib 20 drin (16 für Directory + 4 für System)
  Select Case Attrib
  Case vbReadOnly
    Check1(0) = 1
  Case vbDirectory
    Check1(1) = 1
  Case vbHidden
    Check1(3) = 1
  Case vbSystem
    Check1(4) = 1
  Case vbDirectory and vbSystem
    Check1(4) = 1
  End Select
Also alle Kombinationen einzeln und auch miteinander vorkommend.

Gruß BAStler
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
GetAttr und jeweilige Rückgabewerte1.222BAStler25.07.07 09:33
Re: GetAttr und jeweilige Rückgabewerte690Zardoz25.07.07 11:47
Re: GetAttr und jeweilige Rückgabewerte686BAStler25.07.07 16:03
Re: GetAttr und jeweilige Rückgabewerte686ModeratorMartoeng25.07.07 16:53

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle 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.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel