网站首页  汉语字词  英语词汇  考试资料  写作素材  旧版资料

请输入您要查询的范文:

 

标题 用vbs 取得收藏夹里的所有链接名称和URL的脚本
范文
    新建一个vbs文件(C:\vbs\Getfavorites.vbs),再新建一个bat文件(Getfavorites.bat),执行bat文件,收藏夹里的所有项目都会被写入到C:\vbs\Getfavorites_result.txt文件中。
    另外,可以考虑在输出的时候将链接输出成超链接形式,输出文件改为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
随便看

 

在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。

 

Copyright © 2002-2024 cuapp.net All Rights Reserved
更新时间:2025/5/23 14:34:28