An Unhandled Exception

[Laurence Nuttall]

Doing,

Dim arrFiles() as string
Dim strWinDir as String
Dim intRet as Integer
Dim strWavFilePath as string

StrWinDir = Space(255)
intRet = GetWindowsDirectory(StrWinDir, Len(StrWinDir))

If intRet > 0 Then
arrFiles = system.IO.Directory.GetFiles (strWinDir &
"\media\","*.wav")

End IF

'-------------------------------------------------------------

I get

An unhandled exception of type 'System.IO.PathtoLongException'
occured in mscorlib.dll

Additionl information. the path is too long after being fully
qualified. Make sure path is less than 260 characters.

'---------------------------------------------------------------

The exception occurs on the getfiles statement.
The path is less than 260 characters.

Any help would be appreciated.

Laurence Nuttall
Programmer Analyst III
UCLA - Division of Continuing Education

 

[CJ Taylor]

Doing,

Dim arrFiles() as string
Dim strWinDir as String
Dim intRet as Integer
Dim strWavFilePath as string

StrWinDir = Space(255)
intRet = GetWindowsDirectory(StrWinDir, Len(StrWinDir))

try trimming your strWinDir

I know you need the Space(255) for the buffer into unmanaged, but maybe
adding a .Trim() after all is said and done would help.

-CJ

 

[Herfried K. Wagner [MVP]]

Doing,

Dim arrFiles() as string
Dim strWinDir as String
Dim intRet as Integer
Dim strWavFilePath as string

StrWinDir = Space(255)
intRet = GetWindowsDirectory(StrWinDir, Len(StrWinDir))

If intRet > 0 Then
arrFiles = system.IO.Directory.GetFiles (strWinDir &
"\media\","*.wav")

Cut off the content of 'strWinDir' ('intRet' will contain the length of
the windows directory's path) using 'Left'.

 

[Laurence Nuttall]

I can't find the left in vb.net, so
I used the trim

arrFiles = system.IO.Directory.GetFiles (strWinDir.Trim & "\media\","*.wav")

This still gets me the exception.

If I remove the "*.wav" and substitute ""
no exception occurs, but the arrfiles array is empty.

Larry

 

[Herfried K. Wagner [MVP]]

I can't find the left in vb.net, so
I used the trim

'Trim' won't work here too. Use something like
'Strings.Left(strWinDir, intRet) & ...'.

 

[Laurence Nuttall]

If I put a literal "C:\Windows"
in the get files statement it works.

example:

arrFiles = system.IO.Directory.GetFiles ("C:\Windows" &
"\media\","*.wav")


but it doesn't like it if the first parameter is a variable
string.

Larry

 

[Laurence Nuttall]

The (Strings.Left(strWinDir, intRet)
worked.

What is Strings.left ?

 

[Tom Leylan]

Laurence,

It appears that you don't have to make the API call...

http://www.vb2themax.com/Item.asp?PageID=TipBank&ID=514

Worked for me...

Tom

 

[Armin Zingler]

The (Strings.Left(strWinDir, intRet)
worked.

What is Strings.left ?

Right-click on "left" and select "go to definition"


--
Armin

How to quote and why:
http://www.plig.net/nnq/nquote.html
http://www.netmeister.org/news/learn2quote.html

 

[Herfried K. Wagner [MVP]]

The (Strings.Left(strWinDir, intRet)
worked.

What is Strings.left ?

It takes the left part of a string (the 1st 'intRet' number of
characters).