用vbs 取得收藏夹里的所有链接名称和URL的脚本

另外，可以考虑在输出的时候将链接输出成超链接形式，输出文件改为html文件。
getfavorites.vbs:

'===================================================================
const favorites = &h6&
const forwriting = 2
set objshell = createobject("shell.application")
set objfolder = objshell.namespace(favorites)
set fso = createobject ("scripting.filesystemobject")
processget objfolder
set objfolder = nothing
set fso = nothing
wscript.quit
'===================================================================
sub processget (objfolder)
for each objitem in objfolder.items
if objitem.islink then
set objlink = objitem.getlink
wscript.echo objitem.name
wscript.echo objlink.target
set objlink = nothing
elseif objitem.isfolder then
processget objitem.getfolder
else
exit for
end if
next
end sub
'===================================================================

getfavorites.bat:

cscript.exe c:\vbs\getfavorites.vbs >c:\vbs\getfavorites_result.txt
pause