Solved

W2K Pro Folder Redirection

Posted on 2002-05-08
7
630 Views
Last Modified: 2010-04-13
Hey, all...

I know that it is possible to set a group policy for folder redirection on a domain, but what about as a local policy?

My W2KP box is part of an internal p-2-p network, and I'm trying to implement folder redirection to keep files, foldes & apps off the drive that contains the sys files.

Would like to set folder redirection for MyDocs to a seperate volume for each of 4 users (I know I can setup HomeDir, but that is in *addition* to MyDocs & does not redirect, to my understanding)... also have temp & tempInternet folders redirected to T: volume.

Any help would be appreciated... working on it tonight.

Regards,
/ew
0
Comment
Question by:EricWestbo
  • 4
  • 3
7 Comments
 
LVL 3

Expert Comment

by:Corvax021899
ID: 6997953
Do it with a script that you add at user startup, in the allusers startup or personal startup!
Here is a sample:
------------------


'Initialize the Shell Object
Dim wshShell
Set wshShell = WScript.CreateObject("Wscript.Shell")
'Network Object
Dim wshNet
Set wshNet = WScript.CreateObject("Wscript.Network")

'File Sytem Object
Dim fso
Set fso = WScript.CreateObject("Scripting.FileSystemObject")


'Vars for MyDocs And Temp
Dim MyDocsPath
Dim TempPath

'Set the values wanted
MyDocsPath = "T:\" & wshNet.UserName & "\My Documents"
TempPath =  "T:\" & wshNet.UserName & "\Temp"

'Verifie if folder exists, if not then the folder must be created
'And regestry updated.
'Note: The Effects will Only take Place at next Logon.
'I Could force a logoff if you want...

If fso.FolderExists(TempPath) = False Then
     fso.CreateFolder TempPath
     'Write to the Regestry
     wshShell.RegWrite "HKEY_CURRENT_USER\Environment\TEMP",TempPath,"REG_SZ"
     wshShell.RegWrite "HKEY_CURRENT_USER\Environment\TMP",TempPath,"REG_SZ"
End If

If fso.FolderExists(MyDocsPath)= False Then
     fso.CreateFolder MyDocsPath
     'Write to the Regestry
     wshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Personal",MyDocsPath,"REG_EXPAND_SZ"
     wshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders\Personal",MyDocsPath,"REG_EXPAND_SZ"
End if

0
 
LVL 4

Author Comment

by:EricWestbo
ID: 6997963
Corvax,

Not a big scripter, to be honest, but can probably dance my way around the variables, etc.

How would I save this to disk?  ie: what kind of extension?  is this a .vbs?

Going to give it a try in a bit & will post results.

/ew
0
 
LVL 4

Author Comment

by:EricWestbo
ID: 6997974
Just a follow-up Q: I see the variable for MyDocs & Temp... what about Temporary Internet Files?  Is there a specific variable to use?

/ew
0
[Webinar] Disaster Recovery and Cloud Management

Learn from Unigma and CloudBerry industry veterans which providers are best for certain use cases and how to lower cloud costs, how to grow your Managed Services practice in IaaS clouds, and how to utilize public cloud for Disaster Recovery

 
LVL 3

Expert Comment

by:Corvax021899
ID: 6997975
Yes it is a .vbs, just open notepade and save it in there and rename it after...

If you copy past this, there is one problem.

the 2 lines for the Mydocs.  They are split in two lines, you will have to put them ont the same so that line that goes like this:
Folder\Personal",MyDocsPath,"REG_EXPAND_SZ"

is on the same line as the one on top...
0
 
LVL 3

Accepted Solution

by:
Corvax021899 earned 150 total points
ID: 6997980
Add this to the script!

dim TempIntPath

TempIntPath = "T:\" & wshNet.UserName & "\TempIneternet"

wshShell.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders\Cache",TempIntPath,"REG_EXPAND_SZ"


wshShell.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Cache",TempIntPath,"REG_EXPAND_SZ"
0
 
LVL 4

Author Comment

by:EricWestbo
ID: 6998016
I've actually taken the info from the script and done a work-around right in regedit...


1) HKU\.DEFAULT\Environment\TEMP = T:\Temp

2) HKU\.DEFAULT\Environment\TMP  = T:\Temp

3) HKU\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\
Explorer\User Shell Folders\Cache = T:\Temporary Internet Files

4) HKU\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\
Explorer\User Shell Folders\Cookies = T:\Cookies

5) Same changes in HKCU\

This is enabling me to dump all the trash into one volume which will then be cleaned up as part of my maintenance program.  Keeps clutter off the sysVol.

Still playing, but couldn't have done it without your help.

Thanks again...

/ew
0
 
LVL 3

Expert Comment

by:Corvax021899
ID: 6998021
No problem... My pleasure

Corvax
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

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

NTFS file system has been developed by Microsoft that is widely used by Windows NT operating system and its advanced versions. It is the mostly used over FAT file system as it provides superior features like reliability, security, storage, efficienc…
Note: This is the second blog post in a series on email clearinghouses (https://www.xmatters.com/alert-management/blog-email-has-failed-us?utm_campaign=70138000000ydLoAAI&utm_source=exex&utm_medium=article&utm_content=blog-post).   Every month t…
This Micro Tutorial will teach you how to censor certain areas of your screen. The example in this video will show a little boy's face being blurred. This will be demonstrated using Adobe Premiere Pro CS6.
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, just open a new email message. In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…

920 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