<div>
<br />
<br />
good morning!<br />
<br />
you can use the filesystemobject or FSO..<br />
sumthing like this..<br />
<br />
sub MoveFolder()<br />
&nbsp; dim FSO as new FileSystemObject<br />
<br />
&nbsp; FSO.CopyFolder , ,<br />
<br />
<br />
end sub<br />
<br />
&nbsp; ' hope this will give idea..<br />
<br />
game-master
</div>


<div>
sirbounty:<br />
<br />
I get an error at line 7 saying &quot;runtime error '424': object required<br />
<br />
Can you help?
</div>


<div>
Suppose your existing data is in a directory structure on C:. &nbsp;For example, C:\DATA\050108DATA, c:\DATA\050208DATA, etc.<br />
<br />
You would open a command window, CD in to c:\data, and then, from the command window,<br />
give the command:<br />
<br />
Xcopy DATA551*.* d:\ALLDATA /S<br />
<br />
This will create a directory called ALLDATA on your D: drive that contains the files you want. &nbsp;Then, you can just copy that directory back to wherever you want to put it on C:.<br />
<br />

</div>


<div>
Hmm - I didn't have that error in my test, but you might try fld.Name instead of just fld...<br />
<br />
Wscript.echo &quot;Scanning &quot;&nbsp;&amp; fld.Name<br />

</div>


<div>
sirbounty, <br />
<br />
i got it working. &nbsp;Thanks for your help. &nbsp;It was the folder name.
</div>


<div>
<div class="content wysiwyg-content">
I have an Access Database project that I am ready to load a lot of data into. &nbsp;However, all of my files are in subdirectories like &quot;050108 Data&quot;. &nbsp;Each day has it's own folder and each folder has 8 files in it. &nbsp;I would like to copy the fle that begins with &quot;DATA551&quot; in each subfolder to a new folder called &quot;ALL DATA&quot;. &nbsp;Thanks.
</div>
</div>


I have an Access Database project that I am ready to load a lot of data into.  However, all of my files are in subdirectories like "050108 Data".  Each day has it's own folder and each folder has 8 files in it.  I would like to copy the fle that begins with "DATA551" in each subfolder to a new folder called "ALL DATA".  Thanks.

How to move certain files in subfolders into a new folder

Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.

Visual Basic Classic

VBScript (Visual Basic Scripting Edition) is an interpreted scripting language developed by Microsoft that is modeled on Visual Basic, but with some important differences. VBScript is commonly used for automating administrative and other tasks in Windows operating systems (by means of the Windows Script Host) and for server-side scripting in ASP web applications. It is also used for client-side scripting in Internet Explorer, specifically in intranet web applications.