VBScript help?

Bleek · 26 Aug 2008 at 15:35

Hi guys, I've never had to do any scripting before.

I need to create a script that deletes a number of desktop icons, I've found the following Microsoft TechNet article ( http://www.microsoft.com/technet/scriptcenter/resources/qanda/mar07/hey0319.mspx ), I've copied and run the script but it doesn't work?

Naturally I renamed the file to delete (and created it) but nothing happens when I run the vb.

Any help/suggestions?

Thanks in advance.

Burnsy2023 · 26 Aug 2008 at 16:08

I suggest adding a msgbox(strPath) in there to make sure you are getting the right path that you expect.

Burnsy

IAmATeaf · 26 Aug 2008 at 21:53

The script does work but it's specifically written to return only shortcuts so unless what you're trying to delete is a shortcut then the line:

Set colItems = objWMIService.ExecQuery _
("Select * From Win32_ShortcutFile Where FileName = 'fred99'")

will return nothing. In the above fred99 is a shortcut to the file fred999.txt, both the file and the shortcut were on my desktop, running the script it finds the shortcut fred99 and deletes it.

londonbairn · 26 Aug 2008 at 23:16

I would hazard a guess that you would change FileName = 'fred99'" to

Like 'fred99*'"

Bleek · 27 Aug 2008 at 10:24

Thanks guys, should have realised it only works for lnk files.

IAmATeaf · 27 Aug 2008 at 10:49

rafster said:
I would hazard a guess that you would change FileName = 'fred99'" to

Like 'fred99*'"

That would search for all shortcuts that match but still won't get around the fact that it's still searching for shortcuts only.