<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>Seven steps &#187; vbscript</title>
	<atom:link href="http://trevoke.net/blog/tag/vbscript/feed/" rel="self" type="application/rss+xml" />
	<link>http://trevoke.net/blog</link>
	<description>Martial arts and technology, $DEITY what a mix!</description>
	<lastBuildDate>Wed, 01 Feb 2012 03:43:14 +0000</lastBuildDate>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.3.1</generator>
		<item>
		<title>Recursively iterate through every file/subfolder  &#8211; VBScript</title>
		<link>http://trevoke.net/blog/2008/12/30/recursively-iterate-through-every-filesubfolder-vbscript/</link>
		<comments>http://trevoke.net/blog/2008/12/30/recursively-iterate-through-every-filesubfolder-vbscript/#comments</comments>
		<pubDate>Tue, 30 Dec 2008 16:13:18 +0000</pubDate>
		<dc:creator>Trevoke</dc:creator>
				<category><![CDATA[Uncategorized]]></category>
		<category><![CDATA[recursive]]></category>
		<category><![CDATA[vbs]]></category>
		<category><![CDATA[vbscript]]></category>

		<guid isPermaLink="false">http://trevoke.net/blog/?p=51</guid>
		<description><![CDATA[This is actually a lot simpler than I expected (gimme a break, this is my second foray into VBS!)]]></description>
			<content:encoded><![CDATA[<p>This is actually a lot simpler than I expected (gimme a break, this is my second foray into VBS!)</p>
<pre class="brush: vb; title: ; notranslate">Set fs = WScript.CreateObject (&quot;Scripting.FileSystemObject&quot;)

Sub ShowSubFolders(Folder)
	For Each Subfolder In Folder.SubFolders
		Set files = SubFolder.Files
		For Each file In files
			WScript.Echo file.Name, file.Size
		Next
		ShowSubFolders Subfolder
	Next
End Sub

ShowSubFolders fs.GetFolder(&quot;C:\your\path\here&quot;)</pre>
]]></content:encoded>
			<wfw:commentRss>http://trevoke.net/blog/2008/12/30/recursively-iterate-through-every-filesubfolder-vbscript/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
	</channel>
</rss>

<!-- Dynamic Page Served (once) in 0.274 seconds -->

