(Msg. 1) Posted: Tue Jul 22, 2008 2:08 pm
Post subject: Trying to change an icon for a shortcut via vbs/command line Add to elertz Archived from groups: microsoft>public>windowsxp>customize (more info?)
I have the following vbs script running as a logon script. But everytime it
runs, When the shortcut is created, it is created with the symbol of no icon.
How can I direct the icon location to an actual windows system icon file.
When I open up a file via properties, and browse for a new icon, it directs
me to look in shell32.dll, but I can't find a way to get to all of those
icons shown in that window.
Thanks
set objShell = Wscript.Createobject("Wscript.Shell")
strDesktopFld = objShell.SpecialFolders("Desktop")
Set objURLShortcut = objShell.createShortcut(strDesktopFld &
"\Install-CoM-Applications.lnk")
'Name for Shortcut to add
objURLShortcut.Targetpath = "http://localhost:9595/webportal/webportal.exe"
'Path to icon
objURLShortcut.IconLocation = "C:\WINDOWS\system32\oobe\images\thanks8.png"
'Path for Shortcut
objURLShortcut.Save
(Msg. 2) Posted: Tue Jul 22, 2008 9:37 pm
Post subject: RE: Trying to change an icon for a shortcut via vbs/command line Add to elertz [Login to view extended thread Info.] Archived from groups: per prev. post (more info?)
Open control-panel,folder options,file types,edit.
"booker@mgt" wrote:
> I have the following vbs script running as a logon script. But everytime it
> runs, When the shortcut is created, it is created with the symbol of no icon.
> How can I direct the icon location to an actual windows system icon file.
> When I open up a file via properties, and browse for a new icon, it directs
> me to look in shell32.dll, but I can't find a way to get to all of those
> icons shown in that window.
>
> Thanks
>
>
>
> set objShell = Wscript.Createobject("Wscript.Shell")
> strDesktopFld = objShell.SpecialFolders("Desktop")
> Set objURLShortcut = objShell.createShortcut(strDesktopFld &
> "\Install-CoM-Applications.lnk")
> 'Name for Shortcut to add
> objURLShortcut.Targetpath = "http://localhost:9595/webportal/webportal.exe"
> 'Path to icon
> objURLShortcut.IconLocation = "C:\WINDOWS\system32\oobe\images\thanks8.png"
> 'Path for Shortcut
> objURLShortcut.Save
>
(Msg. 3) Posted: Tue Jul 22, 2008 11:02 pm
Post subject: Re: Trying to change an icon for a shortcut via vbs/command line Add to elertz [Login to view extended thread Info.] Archived from groups: per prev. post (more info?)
You cannot, I think, use a PNG file as an icon. You must convert "thanks8.png" to an icon
file. That should work.
ju.c
"Andrew E." <eckrichco RemoveThis @msn.com> wrote in message
news:FCCE6DE7-4F84-4BC0-A77C-AAB8DB045B43@microsoft.com...
> Open control-panel,folder options,file types,edit.
>
> "booker@mgt" wrote:
>
>> I have the following vbs script running as a logon script. But everytime it
>> runs, When the shortcut is created, it is created with the symbol of no icon.
>> How can I direct the icon location to an actual windows system icon file.
>> When I open up a file via properties, and browse for a new icon, it directs
>> me to look in shell32.dll, but I can't find a way to get to all of those
>> icons shown in that window.
>>
>> Thanks
>>
>>
>>
>> set objShell = Wscript.Createobject("Wscript.Shell")
>> strDesktopFld = objShell.SpecialFolders("Desktop")
>> Set objURLShortcut = objShell.createShortcut(strDesktopFld &
>> "\Install-CoM-Applications.lnk")
>> 'Name for Shortcut to add
>> objURLShortcut.Targetpath = "http://localhost:9595/webportal/webportal.exe"
>> 'Path to icon
>> objURLShortcut.IconLocation = "C:\WINDOWS\system32\oobe\images\thanks8.png"
>> 'Path for Shortcut
>> objURLShortcut.Save
>>
(Msg. 4) Posted: Thu Jul 24, 2008 2:37 pm
Post subject: Re: Trying to change an icon for a shortcut via vbs/command line Add to elertz [Login to view extended thread Info.] Archived from groups: per prev. post (more info?)
"booker@mgt" <dummy.address DeleteThis @mgt.gatech.edu> wrote in message
news:82F65AF1-162E-4BCC-A84A-15A6CC798044@microsoft.com...
>I have the following vbs script running as a logon script. But everytime
>it
> runs, When the shortcut is created, it is created with the symbol of no
> icon.
> How can I direct the icon location to an actual windows system icon file.
> When I open up a file via properties, and browse for a new icon, it
> directs
> me to look in shell32.dll, but I can't find a way to get to all of those
> icons shown in that window.
>
> Thanks
>
>
>
> set objShell = Wscript.Createobject("Wscript.Shell")
> strDesktopFld = objShell.SpecialFolders("Desktop")
> Set objURLShortcut = objShell.createShortcut(strDesktopFld &
> "\Install-CoM-Applications.lnk")
> 'Name for Shortcut to add
> objURLShortcut.Targetpath =
> "http://localhost:9595/webportal/webportal.exe"
> 'Path to icon
> objURLShortcut.IconLocation =
> "C:\WINDOWS\system32\oobe\images\thanks8.png"
> 'Path for Shortcut
> objURLShortcut.Save
>
(Msg. 5) Posted: Mon Jul 28, 2008 3:08 am
Post subject: Re: Trying to change an icon for a shortcut via vbs/command line Add to elertz [Login to view extended thread Info.] Archived from groups: per prev. post (more info?)
"booker@mgt" wrote:
> I have the following vbs script running as a logon script. But everytime it
> runs, When the shortcut is created, it is created with the symbol of no icon.
> How can I direct the icon location to an actual windows system icon file.
> When I open up a file via properties, and browse for a new icon, it directs
> me to look in shell32.dll, but I can't find a way to get to all of those
> icons shown in that window.
> Thanks
>
> set objShell = Wscript.Createobject("Wscript.Shell")
> strDesktopFld = objShell.SpecialFolders("Desktop")
> Set objURLShortcut = objShell.createShortcut(strDesktopFld &
> "\Install-CoM-Applications.lnk")
> 'Name for Shortcut to add
> objURLShortcut.Targetpath = "http://localhost:9595/webportal/webportal.exe"
> 'Path to icon
> objURLShortcut.IconLocation = "C:\WINDOWS\system32\oobe\images\thanks8.png"
> 'Path for Shortcut
> objURLShortcut.Save
In 'Path for Icon' line,
"C:\WINDOWS\system32\shell32.dll,0"
will use the first icon in the file 'shell32.dll'. The number after the ','
is the zero-based index of the icon in any file which contains at least one icon.
In the 'Change Icon' dialog, the index value of the top-left icon is '0'.
0 4 8 ...
1 5 ...
2 6 ...
3 7 ...
(Your 'Path to icon' and 'Path for Shortcut' comments are transposed.)
All times are: Eastern Time (US & Canada) (change)
Page 1 of 1
You can post new topics in this forum You can reply to topics in this forum You can edit your posts in this forum You can delete your posts in this forum You can vote in polls in this forum
Home
Forums
Home
FAQ
Search
Profile
Private Messages
Log in/Register/Password
Windows XP