pop up the files in the folder
How I pop up the files name in the folder without files name extension? I try to pop up the files name but i got this..data member not found
Code:
Dim FSO As Scripting.FileSystemObject
Set FSO = New Scripting.FileSystemObject
Dim fldMainFolder As Folder
Dim fldAllSubFolders As Folders
Dim fldSubFolder As Folder
Dim flAllFiles As Files
Dim flFile As File
Set fldMainFolder = FSO.GetFolder("C:\Documents and Settings\fauzul\Desktop\Print Attribute")
Set fldSubFolders = fldMainFolder.Folders
For Each fldSubFolder In fldAllSubFolders
Set flAllFiles = fldSubFolder.Files
For Each flFile In flAllFiles
...
Next
Next
Re: pop up the files in the folder
I don't use the FSO...but a few things...
Use Option Explicit if you are not already.
You have a variable named fldSubFolder and later you added an s to it here:
Set fldSubFolders = fldMainFolder.Folders
Also, there is no .Folders member. But there is a .SubFolders member.
Anything after that I probably can't help with since I don't use the FileSystemObject.
Re: pop up the files in the folder
If you don't mind.. What method you use to get the filename? Can I see you sample?