How to get directory Info(readonly or not...) knowing the full Path???

[Ms.net]

Thanks

[Herfried K. Wagner [MVP]]

Hello,

"Ms.net" <Re**********@IhateSpam.fuck> schrieb:
[Nothing]

DirectoryInfo.Attributes

HTH,
Herfried K. Wagner
--
MVP · VB Classic, VB .NET
http://www.mvps.org/dotnet

[Ms.net]

I know the path of my directory.
Now i want to check its attributes.
But there is no function( i do not find) ,which will take path of directory
and return directoryinfo :-(

[Armin Zingler]

"Ms.net" <Re**********@IhateSpam.fuck> schrieb

I know the path of my directory.
Now i want to check its attributes.
But there is no function( i do not find) ,which will take path of
directory and return directoryinfo :-(

dim di as new system.io.directoryinfo(yourpath)
msgbox di.attributes
--
Armin

[Herfried K. Wagner [MVP]]

Hello,

"Ms.net" <Re**********@IhateSpam.fuck> schrieb:

I know the path of my directory.
Now i want to check its attributes.
But there is no function( i do not find) ,which will take path of directory and return directoryinfo :-(

\\\
Imports System.IO
..
..
..
Dim di As New DirectoryInfo("C:\.......")
....
///

HTH,
Herfried K. Wagner
--
MVP · VB Classic, VB .NET
http://www.mvps.org/dotnet

[Ms.net]

Thanks you to all... :-))

"Herfried K. Wagner [MVP]" <hi*******@m.activevb.de> wrote in message
news:Oq**************@TK2MSFTNGP10.phx.gbl...

Hello,

"Ms.net" <Re**********@IhateSpam.fuck> schrieb:

I know the path of my directory.
Now i want to check its attributes.
But there is no function( i do not find) ,which will take path of

directory

and return directoryinfo :-(

\\\
Imports System.IO
.
.
.
Dim di As New DirectoryInfo("C:\.......")
...
///

HTH,
Herfried K. Wagner
--
MVP · VB Classic, VB .NET
http://www.mvps.org/dotnet

[Herfried K. Wagner [MVP]]

Hello,

"Ms.net" <Re**********@IhateSpam.fuck> schrieb:

i shared a folder and set access to FULL, Read ,write
is set to TRUE from windows.
TempPath="\elysee\mysharefolder"
Dim mydir As DirectoryInfo = New irectoryInfo(TempPath)

If mydir.Attributes.ReadOnly Then Throw New Exception ("read only
directory")

But the exception is throw......WHY???

Untested:

\\\
If (MyDir.Attributes And FileAttributes.ReadOnly) =
FileAttributes.ReadOnly Then
...
End If
///

HTH,
Herfried K. Wagner
--
MVP · VB Classic, VB .NET
http://www.mvps.org/dotnet

[Armin Zingler]

"Ms.net" <Re**********@IhateSpam.fuck> schrieb

Strange.

i shared a folder and set access to FULL, Read ,write is set to TRUE
from windows.
TempPath="\elysee\mysharefolder"
Dim mydir As DirectoryInfo = New irectoryInfo(TempPath)

If mydir.Attributes.ReadOnly Then Throw New Exception ("read only
directory")

But the exception is throw......WHY???

Enable option strict in the project's properties and you'll see why it does
not work.
--
Armin

[Ms.net]

IT WORK.
THANKS U

"Herfried K. Wagner [MVP]" <hi*******@m.activevb.de> wrote in message
news:OI**************@TK2MSFTNGP09.phx.gbl...

Hello,

"Ms.net" <Re**********@IhateSpam.fuck> schrieb:

i shared a folder and set access to FULL, Read ,write
is set to TRUE from windows.
TempPath="\elysee\mysharefolder"
Dim mydir As DirectoryInfo = New irectoryInfo(TempPath)

If mydir.Attributes.ReadOnly Then Throw New Exception ("read only
directory")

But the exception is throw......WHY???

Untested:

\\\
If (MyDir.Attributes And FileAttributes.ReadOnly) =
FileAttributes.ReadOnly Then
...
End If
///

HTH,
Herfried K. Wagner
--
MVP · VB Classic, VB .NET
http://www.mvps.org/dotnet