手机
当前位置:查字典教程网 >脚本专栏 >vbs >用vbs 取得收藏夹里的所有链接名称和URL的脚本
用vbs 取得收藏夹里的所有链接名称和URL的脚本
摘要:另外,可以考虑在输出的时候将链接输出成超链接形式,输出文件改为html文件。GetFavorites.vbs:复制代码代码如下:'=====...

另外,可以考虑在输出的时候将链接输出成超链接形式,输出文件改为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:vbsGetfavorites.vbs >C:vbsGetfavorites_result.txt

pause

【用vbs 取得收藏夹里的所有链接名称和URL的脚本】相关文章:

用vbs实现zip功能的脚本

VBS 批量读取文件夹内所有的文本到Excel的脚本

用vbs写的短小精悍的字典生成器

用vbs实现的强制杀进程的脚本

用vbs将名称转换为正确的大小写的代码

用vbs实现取消隐藏文件夹中的所有文件

使用脚本自动压缩指定目标下的所有文件的代码

用vbs实现定时运行web文件的方法

vbscript 读取xml格式的配置文件

用vbs实现删除名称中有撇号的文件夹

精品推荐
分类导航