[THIN] Re: vbscript help

  • From: Jeff Malczewski <jeff.malczewski@xxxxxxxxx>
  • To: thin@xxxxxxxxxxxxx
  • Date: Mon, 25 Apr 2005 15:22:50 -0400

Try this..  You need to instantiate your wshnetwork object for it to
work..  You didn't do that in the code above..   But, here's how to
append the "desktop" portion (and the instantiation)...


Set WshNetwork = CreateObject("WScript.Network")
Set objUser=getobject("WinNT://williamsville/"& WshNetwork.Username)
Set fso = CreateObject("Scripting.FileSystemObject")
SourceFolder=objUser.profile
If Right(SourceFolder,1) <> "\" Then SourceFolder = SourceFolder & "\"
SourceFolder = SourceFolder & "desktop"
TargetFolder="H:\Desktop"
fso.CopyFolder SourceFolder,TargetFolder,false
set fso=nothing



HTH,
Jeff

On 4/25/05, Greg Watts <cgwatts@xxxxxxxxx> wrote:
> I am tying to get the following script to copy the desktop folder from
> thier regular profile path to their home directory. I am getting a
> "path not found" but I have tested both paths and they are correct. I
> am no means a scripting guru so I am hoping someone can help me out. I
> just want to copy files and folders from
> \\servername\profileshare\username\desktop to h:\desktop. My
> sourcefolder equels \\servername\profileshare\username I am unsure how
> to add \desktop to it.
> 
> Any help would be great!
> 
> Thanks,
> 
> Set objUser=getobject("WinNT://RND/"& WshNetwork.Username)
> Set fso = CreateObject("Scripting.FileSystemObject")
> sourcefolder=objuser.profile
> targetfolder="H:\Desktop\"
> fso.CopyFolder sourcefolder,targetfolder,false
> set fso=nothing
> 
> Thanks,
> 
> Greg Watts
> greg.watts@xxxxxxxx
> cgwatts@xxxxxxxxx
> 410.274.3076 (cell)
> ********************************************************
> This Weeks Sponsor: RTO Software TScale
> TScale provides a cost-effective way to improve performance, capacity and 
> stability for thin-client servers like Citrix MetaFrame or Microsoft Terminal 
> Services running Windows NT, 2000 or 2003.
> http://www.rtosoft.com/enter.asp?id)6
> **********************************************************
> Useful Thin Client Computing Links are available at:
> http://thin.net/links.cfm
> ThinWiki community - Excellent SBC Search Capabilities!
> http://www.thinwiki.com
> ***********************************************************
> For Archives, to Unsubscribe, Subscribe or
> set Digest or Vacation mode use the below link:
> http://thin.net/citrixlist.cfm
>
********************************************************
This Weeks Sponsor: RTO Software TScale
TScale provides a cost-effective way to improve performance, capacity and 
stability for thin-client servers like Citrix MetaFrame or Microsoft Terminal 
Services running Windows NT, 2000 or 2003.
http://www.rtosoft.com/enter.asp?id)6
**********************************************************
Useful Thin Client Computing Links are available at:
http://thin.net/links.cfm
ThinWiki community - Excellent SBC Search Capabilities!
http://www.thinwiki.com
***********************************************************
For Archives, to Unsubscribe, Subscribe or
set Digest or Vacation mode use the below link:
http://thin.net/citrixlist.cfm

Other related posts: