大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
这篇文章主要介绍“如何用vbs 取得收藏夹里的所有链接名称和URL的脚本”,在日常操作中,相信很多人在如何用vbs 取得收藏夹里的所有链接名称和URL的脚本问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答”如何用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
到此,关于“如何用vbs 取得收藏夹里的所有链接名称和URL的脚本”的学习就结束了,希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习,快去试试吧!若想继续学习更多相关知识,请继续关注创新互联网站,小编会继续努力为大家带来更多实用的文章!