[PNJLj]

So im trying to get evything that has ends with .iso into a list box, tryed a couple of things but not getting anywhere as yeat, i will keep trying but could someone please help in the meantime? Thanks

Here is code.

Dim Locate As String = Application.StartupPath & "\Games\"
ListBox1.Items.Add(Locate.EndsWith("*.iso"))

The Locate String is there because thats the location where the iso files are but the application is in the root of the drive.
The ListBox1 command is fairly easy to understand, if you dont i can explain what i was trying to achieve but dont think i need to.

Thank in advance.

[janne_panne]

I usually use DirectoryInfo.GetFiles method to get all files in a directory. You can specify search pattern too if you want to, like "*.iso"

There are samples at the bottom:
http://msdn.microsof...y/ms143327.aspx

[PNJLj]

thankyou very much, it worked a treat, BUT! when the program writes the file names to the listbox its also adding the .iso extension. do you know if this can be removed? i was gonna try TRIM in there somewhere.

[janne_panne]

I would use Substring method to remove the last 4 characters of a string (the .iso ending).

[PNJLj]

substring is not working for me atm, its saying that ".iso" is not an integer ... anyways, will try again tomorrow, a fresh brain might help me a bit more. Thanks anyways.

[janne_panne]

You should always post what you are trying because you are using substring in a wrong way. Substring takes two integers as input: starting position and length.

So the correct way to use it is this:

        Dim file As String = "C:\temp\myiso.iso"
        Const extension As String = ".iso"
        Dim file2 As String = file.Substring(0, file.Length - extension.Length)
        Console.WriteLine(file2)

[DimitriV]

There is, I'm pretty sure, a method in My.Computer.FileSystem called GetFileNameWithoutExtension.
However, you'll need to loop through the folders contents.

[PNJLj]

janne_panne <- I have tried some things that you suggested but this is the closest that ive come. is there something wrong with this? I am getting an UnHandled Exception Error.

Details = Length cannot be less than zero.
Parameter name: Length.

Dim ISO As String = "*.iso"
        Dim DirInfo As DirectoryInfo = New DirectoryInfo(Locate)
        Dim Files() As FileInfo = DirInfo.GetFiles(ISO, SearchOption.AllDirectories)
        Dim File As FileInfo

        Const extension As String = ".iso"
        For Each File In Files
            lstTitle.Items.Add(File.Name)
            lstTitle.Text.Substring(0, lstTitle.Text.Length - extension.Length)
            lblCount.Text = lstTitle.Items.Count
        Next (File)

Also, JimmyBo i tried looking for what you suggested but couldn't find it!

[DimitriV]

I don't see you setting the value of lstTitle anywhere so the error is that lstTitle has a length of zero and you're subtracting from that.

[PNJLj]

jimmyBo, on 20 December 2011 - 11:12 PM, said:

I don't see you setting the value of lstTitle anywhere so the error is that lstTitle has a length of zero and you're subtracting from that.

Is this what you mean, i just added and changed a little bit of code.

Dim TitleLength As Integer = lstTitle.Text.Length ' I added this to give it an integer length
lstTitle.Text.Substring(TitleLength, lstTitle.Text.Length - extension.Length) ' in the old code there is a 0 and i changed that to TitleLength.

Please explain if this is what you ment.

[DimitriV]

What I mean is - the string that you are getting the length of could have a length of 0.

[janne_panne]

Try this:

        Const extension As String = ".iso"
        For Each File In Files
            Dim fileName as string = File.Name
            fileName = fileName.Substring(0, fileName.Length - extension.Length)
            lstTitle.Items.Add(fileName)
        Next
        lblCount.Text = lstTitle.Items.Count

[PNJLj]

thanks janne_panne <- worked a treat, i see what i was doing wrong. Thankyou.
Now for the other part!! before i was able to get the picture as in the other post but now its not letting me. i think its because they are classed as file names now, not lstTitle.Text.
Please goto my other post about the picture box and see. Thankyou again!

[DimitriV]

Sorry - I don't see the post. Can you link to it?

[PNJLj]

@JimmyBo

Other Post

Its okay now thoe, its all fixed. Thanks anyways.