[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文件操作] 导出IE收藏夹的批处理(已解决)

如题,注意是利用IE工具栏上的“文件”→“导入和导出”功能的导出,而不是单纯的复制url。并可以通过编辑来指定导出的路径。

其实我这个想法是由于我想将IE收藏夹备份到35766在线书签。里面就有一个上传至35766在线书签的方法,详情请看http://www.35766.com/Help/Import_IE.asp。有没有办法可以实现呢?

[ 本帖最后由 Wingl83 于 2008-10-2 18:12 编辑 ]
我是小菜菜……

你所叙述的,它们有区别吗?

TOP

利用导出功能默认是导出一个bookmark.htm文件,而复制只是将收藏夹复制备份而已。
我是小菜菜……

TOP

bookmark.htm的版面格式自己弄
@echo off
for /f "skip=4 tokens=2*" %%a in ('reg query "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v Favorites') do set "favor=%%b"
for /r "%favor%" %%a in (*.url) do for /f "tokens=1* delims==" %%i in ('findstr /i "^URL=" "%%a"') do (echo ^<a href="%%j"^>%%~na^</a^>^<br^>^<br^>) >>bookmark.htm
start iexplore bookmark.htm

[ 本帖最后由 zqz0012005 于 2008-9-28 22:52 编辑 ]
命令行参考:hh.exe ntcmds.chm::/ntcmds.htm
求助者请拿出诚心,别人才愿意奉献热心!
把查看手册形成条件反射!

TOP

请问,为什么导出的bookmark.htm不能像IE导出的那样把文件名带上呢?
我是小菜菜……

TOP

4楼导出的不带文件名吗?
命令行参考:hh.exe ntcmds.chm::/ntcmds.htm
求助者请拿出诚心,别人才愿意奉献热心!
把查看手册形成条件反射!

TOP

抱歉,是文件夹名……
我是小菜菜……

TOP

版面格式自己弄,那个属于html的范畴了,我只会一点点
@echo off
for /f "skip=4 tokens=2*" %%a in ('reg query "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v Favorites') do set "favor=%%b"
for /f "delims=" %%a in ('dir /s/b/on "%favor%"') do (
    if exist "%%a\" (
        echo ^<b^>%%~na^</b^>^<br^> >>bookmark.htm
    ) else (
        for /f "tokens=1* delims==" %%i in ('findstr /i "^URL=" "%%a"') do (echo ^<a href="%%j"^>%%~na^</a^>^<br^>^<br^>) >>bookmark.htm
    )
)
start iexplore bookmark.htm

[ 本帖最后由 zqz0012005 于 2008-9-28 23:30 编辑 ]
命令行参考:hh.exe ntcmds.chm::/ntcmds.htm
求助者请拿出诚心,别人才愿意奉献热心!
把查看手册形成条件反射!

TOP

可以成功上传35766的代码(我用的输入法是搜狗,所以输入http://www.35766.com/Fav/Import_IE.asp后有一个enter),存为vbs即可。谢谢各同学的帮忙。

  1. set ws=wscript.createobject("wscript.shell")
  2. ws.run "C:\Progra~1\Intern~1\iexplore.exe"
  3. wscript.sleep 5000
  4. ws.sendkeys("%fi%n")
  5. wscript.sleep 200
  6. ws.sendkeys("{down 1}%n%n")
  7. ws.sendkeys("{tab}")
  8. wscript.sleep 500
  9. ws.sendkeys("http://www.35766.com/Fav/Import_IE.asp")
  10. wscript.sleep 500
  11. ws.sendkeys("{enter}")
  12. wscript.sleep 500
  13. ws.sendkeys("{enter}")
  14. wscript.sleep 500
  15. ws.sendkeys("{enter}")
  16. wscript.sleep 10000
  17. ws.sendkeys("{enter}")
  18. wscript.sleep 400
  19. ws.sendkeys("%{f4}")
  20. wscript.sleep 1000
复制代码

[ 本帖最后由 Wingl83 于 2008-10-2 18:14 编辑 ]
我是小菜菜……

TOP

返回列表