Vista - Sorting files in a folder

06-02-2008

Hello,

How do I sort files in a folder with VBS? I tried the following but that did
not work:

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}\\" & strComputer & "\root\cimv2")

Set colFiles = objWMIService.ExecQuery _
("Select * from Win32_FileSpecification order by CreationDate")

For Each objFiles in colFiles
Wscript.Echo objFiles.Name
Next

The problem I have is that the query results in (8, 1) (null): 0x80041017
And I cannot specify the folder name.

Any help is appreciated.

With kind regards,
WVR

06-02-2008

WVR wrote:

Quote:

> How do I sort files in a folder with VBS? I tried the following but that
> did
> not work:
>
> strComputer = "."
> Set objWMIService = GetObject("winmgmts:" _
> & "{impersonationLevel=impersonate}\\" & strComputer & "\root\cimv2")
>
> Set colFiles = objWMIService.ExecQuery _
> ("Select * from Win32_FileSpecification order by CreationDate")
>
> For Each objFiles in colFiles
> Wscript.Echo objFiles.Name
> Next
>
>
> The problem I have is that the query results in (8, 1) (null): 0x80041017
> And I cannot specify the folder name.

The WMI Query Language does not support sorting. You can use a disconnected
recordset to sort. See this link:

http://www.microsoft.com/technet/scr..._ent_piij.mspx

--
Richard Mueller
MVP Directory Services
Hilltop Lab - http://www.rlmueller.net
--

06-02-2008	#1 (permalink)
WVR n/a posts	Sorting files in a folder Hello, How do I sort files in a folder with VBS? I tried the following but that did not work: strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}\\" & strComputer & "\root\cimv2") Set colFiles = objWMIService.ExecQuery _ ("Select * from Win32_FileSpecification order by CreationDate") For Each objFiles in colFiles Wscript.Echo objFiles.Name Next The problem I have is that the query results in (8, 1) (null): 0x80041017 And I cannot specify the folder name. Any help is appreciated. With kind regards, WVR
My System Specs

06-02-2008	#2 (permalink)
Richard Mueller [MVP] n/a posts	Re: Sorting files in a folder WVR wrote: Quote: > How do I sort files in a folder with VBS? I tried the following but that > did > not work: > > strComputer = "." > Set objWMIService = GetObject("winmgmts:" _ > & "{impersonationLevel=impersonate}\\" & strComputer & "\root\cimv2") > > Set colFiles = objWMIService.ExecQuery _ > ("Select * from Win32_FileSpecification order by CreationDate") > > For Each objFiles in colFiles > Wscript.Echo objFiles.Name > Next > > > The problem I have is that the query results in (8, 1) (null): 0x80041017 > And I cannot specify the folder name. The WMI Query Language does not support sorting. You can use a disconnected recordset to sort. See this link: http://www.microsoft.com/technet/scr..._ent_piij.mspx -- Richard Mueller MVP Directory Services Hilltop Lab - http://www.rlmueller.net --
My System Specs

Similar Threads
Thread	Forum
Auto sorting of files in folder	Vista General
Folder Sorting	Tutorials
Folder sorting and details?	Vista file management
File and Folder Sorting...Help!	Vista General