CMD/BAT - Сравнение ярлыков

[123rese]

Ситуация такова - на рабочем столе очень много ярлыков, из которых нужно выбрать один с определенным расположением и переименовать его.

По логике, нужно сделать так:

1) Сравнить все ярлыки по местоположению

2) Когда ярлык с определенным местоположением найден, переименовать его.

Как сделать сие на практике - ума не приложу. Дайте, пожалуйста, наводку.

[Iska]

Цитата 123rese:



Как сделать сие на практике - ума не приложу.

CMD/BAT - Сравнение ярлыков

Перейти к использованию WSH/PoSH вместо пакетных файлов.




Цитата 123rese:



Дайте, пожалуйста, наводку.

CMD/BAT - Сравнение ярлыков

Держите:



Код:

Код: Выделить всё

Option Explicit
Dim objFile
Dim objWshShell
With WScript.CreateObject("Scripting.FileSystemObject")
	Set objWshShell = WScript.CreateObject("WScript.Shell")
	For Each objFile In .GetFolder(objWshShell.SpecialFolders.Item("Desktop")).Files
		Select Case LCase(.GetExtensionName(objFile))
			Case "lnk"
				With objWshShell.CreateShortcut(objFile.Path)
					If .TargetPath = "C:\Program Files\Notepad++\notepad++.exe" Then
						objFile.Name = "Мой Блокнот Плюс Плюс.lnk"
						Exit For
					End If
				End With
		End Select
	Next
	Set objWshShell = Nothing
End With
WScript.Quit 0

Заранее обращаю Ваше внимание, что поиск в примере производится только[/i] на Рабочем столе пользователя, и не затрагивает общий для всех пользователей Рабочий стол.

[mwz]

Iska, вроде бы товарища интересует не переименовать ярлык с заданным именем -- а ярлык с заданными [на Рабочем Столе] координатами, какое бы имя у этого ярлыка не было.

Смысл сего действа неясен. И интересно, что будет если координаты изменятся хоть на один пиксел.