Solved

VB script to create folder to a user profile

Posted on 2013-05-16
8
513 Views
Last Modified: 2013-05-18
Hello,

I have this simple VB script to create a folder to user's profile which works to some extent. The problem I am running into is the profiles in the home directory have a (.cloud) extension (example= jondoe.cloud) The VB script below just recognizes the user name, but not the .cloud. Any ideas anyone??

Dim objFSO, strFolder
strFolder = "\\XXX.local\Site\Home$\%USERNAME%\WINDOWS\Fonts"
Set objFSO = CreateObject("Scripting.FileSystemObject")
If Not objFSO.FolderExists(strFolder) Then
   objFSO.CreateFolder(strFolder)
End If

Thanks,

JV
0
Comment
Question by:juniorval01
  • 3
  • 2
  • 2
  • +1
8 Comments
 
LVL 16

Expert Comment

by:santoshmotwani
ID: 39173454
have you tried using "%UserProfile% variable instead on Username?
0
 
LVL 53

Expert Comment

by:Bill Prew
ID: 39173469
Can't you just add it in to the path, like:

strFolder = "\\XXX.local\Site\Home$\%USERNAME%.cloud\WINDOWS\Fonts"

~bp
0
 
LVL 65

Assisted Solution

by:RobSampson
RobSampson earned 150 total points
ID: 39173820
Or the .cloud might be the domain:
strFolder = "\\XXX.local\Site\Home$\%USERNAME%.%USERDOMAIN%\WINDOWS\Fonts"

Rob.
0
DevOps Toolchain Recommendations

Read this Gartner Research Note and discover how your IT organization can automate and optimize DevOps processes using a toolchain architecture.

 

Author Comment

by:juniorval01
ID: 39175501
Thanks guys for the responses back.

@Rob, I have added the .%USERDOMAIN% and I was able to navigate to the location which is great. But it wont create the folder "FONTS".

Line: 5
Char: 4
Error: Path not found
Code: 800A004C

Any ideas?
0
 
LVL 53

Accepted Solution

by:
Bill Prew earned 350 total points
ID: 39175566
That's typically due to one of the higher level folders not already existing.  VB isn't like the DOS "mkdir" command, which will automatically create all higher level folders.  In VB you have to make sure each parent exists before creating children.

Typically there are two approaches to solving this.  One is to just shell out to a DOS command and use the MKDIR command for the folder creation.  The other is to use a function that walks down the folders in the path you want to ultimately create and adds any missings ones using VB commands.

I know Rob is up on all of this and can guide you in the code needed, so I won't interfere unless he can't get to this and then I'll lend a hand.  Here's some example code if you want to tackle it on your own.

http://stackoverflow.com/questions/4407386/help-to-create-folder1-folder2-in-windows-using-vbscript-both-the-folders-not

~bp
0
 

Author Closing Comment

by:juniorval01
ID: 39175753
@BP,

I went ahead and went with the info you sent me and worked as you expected.

Many thanks to BP and Rob!
0
 
LVL 53

Expert Comment

by:Bill Prew
ID: 39175889
Welcome, glad that helped.

~bp
0
 
LVL 65

Expert Comment

by:RobSampson
ID: 39176997
Thanks Bill for the support.  Thanks JV for the assist points.  Glad to help.

Rob.
0

Featured Post

Best Practices: Disaster Recovery Testing

Besides backup, any IT division should have a disaster recovery plan. You will find a few tips below relating to the development of such a plan and to what issues one should pay special attention in the course of backup planning.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article explains how to prepare an HTML email signature template file containing dynamic placeholders for users' Azure AD data. Furthermore, it explains how to use this file to remotely set up a department-wide email signature policy in Office …
This script can help you clean up your user profile database by comparing profiles to Active Directory users in a particular OU, and removing the profiles that don't match.
Learn the basics of lists in Python. Lists, as their name suggests, are a means for ordering and storing values. : Lists are declared using brackets; for example: t = [1, 2, 3]: Lists may contain a mix of data types; for example: t = ['string', 1, T…
Learn the basics of modules and packages in Python. Every Python file is a module, ending in the suffix: .py: Modules are a collection of functions and variables.: Packages are a collection of modules.: Module functions and variables are accessed us…

815 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now