Da.
 
Looked up in MSDN the ShellSpecialFoldersConstant. This is where that &H11& in 
the snippet comes from. For MY Network places:
 
Const NETHOOD = &H13&
Set objNetwork = CreateObject("Wscript.Network")
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(NETHOOD)
Set objFolderItem = objFolder.Self
objFolderItem.Name = objNetwork.UserDomain

 


 
--Brian Desmond
[EMAIL PROTECTED]
Payton on the web! www.wpcp.org
 
v - 773.534.0034 x135
f - 773.534.8101

________________________________

From: [EMAIL PROTECTED] on behalf of Cothern Jeff D. Team EITC
Sent: Wed 2/16/2005 3:24 PM
To: ActiveDir@mail.activedir.org
Subject: RE: [ActiveDir] Display Computer Name on Desktop



Ok another question.  Is there a simple way to modify  this script so that My 
Network Places is renamed to the Domain they are logged into and My Documents 
is renamed to the username?   And Yes I know BGINFO can provide this but we are 
wanting things to be unobtrusive and limit what is actually being displayed on 
the desktop. 

 

Thanks. For any further help.

Jeff

 

 

________________________________

From: Brian Desmond [mailto:[EMAIL PROTECTED] On Behalf Of Brian Desmond
Sent: Tuesday, February 15, 2005 12:13 AM
To: ActiveDir@mail.activedir.org
Subject: RE: [ActiveDir] Display Computer Name on Desktop

 

Thats enough. Windows knows what program to use to execute them.

 

To run frm a commandline - cscript myscript.vbs :)

 

--Brian Desmond
[EMAIL PROTECTED]
Payton on the web! www.wpcp.org
 
v - 773.534.0034 x135
f - 773.534.8101

 

________________________________

From: [EMAIL PROTECTED] on behalf of Cothern Jeff D. Team EITC
Sent: Mon 2/14/2005 9:36 PM
To: ActiveDir@mail.activedir.org
Subject: RE: [ActiveDir] Display Computer Name on Desktop

I don't know a lot about scripting or vbs.  But can I take the below
Lines of text starting at CONST and paste that into a notepad and save
it as .vbs does that work or do I need to use some vbs program?




-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Devan Pala
Sent: Friday, February 11, 2005 2:02 PM
To: ActiveDir@mail.activedir.org
Subject: RE: [ActiveDir] Display Computer Name on Desktop

The code would help right.....8-)

Const MY_COMPUTER = &H11&
Set objNetwork = CreateObject("Wscript.Network")
objComputerName = objNetwork.ComputerName
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(MY_COMPUTER)
Set objFolderItem = objFolder.Self
objFolderItem.Name = objComputerName


----Original Message Follows----
From: "Salandra, Justin A." <[EMAIL PROTECTED]>
Reply-To: ActiveDir@mail.activedir.org
To: <ActiveDir@mail.activedir.org>
CC: <[EMAIL PROTECTED]>
Subject: [ActiveDir] Display Computer Name on Desktop
Date: Fri, 11 Feb 2005 13:41:15 -0500

I have a question, is there a way to display the computer name on the
desktop either through a login script or via GPO?

Justin A. Salandra
MCSE Windows 2000 & 2003
Network and Technology Services Manager
Catholic Healthcare System
212.752.7300 - office
917.455.0110 - cell
[EMAIL PROTECTED]



List info   : http://www.activedir.org/List.aspx
List FAQ    : http://www.activedir.org/ListFAQ.aspx
List archive: http://www.mail-archive.com/activedir%40mail.activedir.org/

<<attachment: winmail.dat>>

Reply via email to