最新消息: USBMI致力于为网友们分享Windows、安卓、IOS等主流手机系统相关的资讯以及评测、同时提供相关教程、应用、软件下载等服务。

将html所有链接导入收藏,HTML

IT圈 admin 52浏览 0评论

将html所有链接导入收藏,HTML

用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相关阅读:

微软克星Ubuntu 8.04版将于近日浮出水面

asp的日期转换星座函数

ASP实例:ASP+AJAX制作无刷新新闻评论系统

轻松掌握行分链与行迁移的相关概念

程序员最容易犯的五个PHP数据库问题及解释

JavaScript中继承的一些示例方法与属性参考

织梦DedeCMS v5.7全文检索使用说明(sphinx)

mysql数据库下损坏数据的恢复操作其过程总结

Javascript createElement和innerHTML增加页面元素的性能对比

一个程序下载的管理程序(三)

《PHP编程最快明白》第二讲 数字、浮点、布尔型、字符串和数组

In Javascript Class, how to call the prototype method.(three method)

不错的一篇关于javascript-prototype继承

java对XML文件的解析、节点的增加、删除操作总结

将html所有链接导入收藏,HTML

用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相关阅读:

微软克星Ubuntu 8.04版将于近日浮出水面

asp的日期转换星座函数

ASP实例:ASP+AJAX制作无刷新新闻评论系统

轻松掌握行分链与行迁移的相关概念

程序员最容易犯的五个PHP数据库问题及解释

JavaScript中继承的一些示例方法与属性参考

织梦DedeCMS v5.7全文检索使用说明(sphinx)

mysql数据库下损坏数据的恢复操作其过程总结

Javascript createElement和innerHTML增加页面元素的性能对比

一个程序下载的管理程序(三)

《PHP编程最快明白》第二讲 数字、浮点、布尔型、字符串和数组

In Javascript Class, how to call the prototype method.(three method)

不错的一篇关于javascript-prototype继承

java对XML文件的解析、节点的增加、删除操作总结

发布评论

评论列表 (0)

  1. 暂无评论