[AccessD] Make Folder Problem

I thought that it built the entire path, but it will only build one level
in the path at a time.



Sorry,

jim

> When I try the following I get a runtime error 76
>
> If Not fso.folderexists(ResultsPath2) Then
>     fso.CreateFolder ("C:\Files1\Excel1\Scaleup1")
> End If
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Moss
> Sent: Friday, April 28, 2006 11:06 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Make Folder Problem
>
> Chester,
>
> I use the fso.CreateFolder("C:\Accounts Payable\Processed") and it
> creates
> sub folders just fine.
>
> Jim
>
>> I use the following code on my machine to create a folder and it works
>> fine. Just tried it on another users machine and got a message could
> not
>> create folder. I was able to do it manually. Any thoughts?
>>
>>
>>
>> ChDrive "C:"
>>
>> Set fso = CreateObject("Scripting.FileSystemObject")
>>
>> ResultsPath = "C:\Files\Excel\Scaleup10"
>>
>>
>>
>> If Not fso.folderexists(ResultsPath) Then
>>
>>     MkDir "C:\Files\Excel\Scaleup10"
>>
>> End If
>>
>>
>>
>> Chester Kaup
>>
>> Engineering Technician
>>
>> Kinder Morgan CO2 Company, LLP
>>
>> Office (432) 688-3797
>>
>> FAX (432) 688-3799
>>
>>
>>
>>
>>
>> No trees were killed in the sending of this message. However a large
>> number of electrons were terribly inconvenienced.
>>
>>
>>
>> --
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
>
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
>
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>