用VB导出导入IE收藏夹
来源:百度文库 编辑:神马文学网 时间:2024/04/26 09:00:09
本文来自:http://blog.csdn.net/beingstudio/archive/2007/02/12/1508209.aspx 经常使用IE的朋友,在收藏夹中积累了大量的网址,在重装系统或进行多用户配置时,手工进行备份或恢复收藏夹操作较为麻烦。可以用VB编制一个简单的IE收藏夹管理程序,自动实现导入和导出收藏夹内容的操作。
在VB6中新建工程,在窗体上放置两个按钮,其caption属性分别设为“导入”和“导出”,一个通用对话框命名为“CDlog”。单击VB6“工程/引用”菜单项,在“引用”对话框选择“Microsoft Internet Controls”类型库,然后确定即可。
代码如下:
Option Explicit
Private Sub ImportExportBookmark(I As Boolean)
Dim ObjSUH As SHDocVw.ShellUIHelper
Set ObjSUH = New SHDocVw.ShellUIHelper
If I = True Then
CDlog.DialogTitle = "请选择导入收藏夹的书签文件:"
On Error GoTo CancelHandler
CDlog.ShowOpen
Else
CDlog.DialogTitle = "请选择导出收藏夹的书签文件:"
On Error GoTo CancelHandler
CDlog.ShowSave
End If
ObjSUH.ImportExportFavorites I, CDlog.FileName
'在文件对话框中选择“取消”按钮
CancelHandler:
If Err.Number = cdlCancel Then Exit Sub
End Sub
Private Sub Command1_Click()
ImportExportBookmark (False)
End Sub
Private Sub Command2_Click()
ImportExportBookmark (True)
End Sub
代码输入完毕,按F5运行,现在只要通过“导入”和“导出”按钮就可以轻松实现对IE收藏夹的导入和导出操作了。本程序在Windows 98 SE和VB6.0企业版下调试通过。
在VB6中新建工程,在窗体上放置两个按钮,其caption属性分别设为“导入”和“导出”,一个通用对话框命名为“CDlog”。单击VB6“工程/引用”菜单项,在“引用”对话框选择“Microsoft Internet Controls”类型库,然后确定即可。
代码如下:
Option Explicit
Private Sub ImportExportBookmark(I As Boolean)
Dim ObjSUH As SHDocVw.ShellUIHelper
Set ObjSUH = New SHDocVw.ShellUIHelper
If I = True Then
CDlog.DialogTitle = "请选择导入收藏夹的书签文件:"
On Error GoTo CancelHandler
CDlog.ShowOpen
Else
CDlog.DialogTitle = "请选择导出收藏夹的书签文件:"
On Error GoTo CancelHandler
CDlog.ShowSave
End If
ObjSUH.ImportExportFavorites I, CDlog.FileName
'在文件对话框中选择“取消”按钮
CancelHandler:
If Err.Number = cdlCancel Then Exit Sub
End Sub
Private Sub Command1_Click()
ImportExportBookmark (False)
End Sub
Private Sub Command2_Click()
ImportExportBookmark (True)
End Sub
代码输入完毕,按F5运行,现在只要通过“导入”和“导出”按钮就可以轻松实现对IE收藏夹的导入和导出操作了。本程序在Windows 98 SE和VB6.0企业版下调试通过。
用VB导出导入IE收藏夹
怎样导出IE收藏夹?
如何导出IE收藏夹呢?
遨游如何导入IE收藏夹
FireFox导入导出Cookies和收藏夹的方法-月光博客
可以导入IE收藏夹到del.icio.us的软件
可以导入IE收藏夹到del.icio.us的软件
将搜狗浏览器收藏夹导入到IE、Firefox、Chrome
MySQL导出导入命令的用例
MySQL导出导入命令的用例
ie收藏夹
MyYahoo! OPML导入导出
导出导入EFS密钥
MySQL导出导入常用命令
MySQL数据导入导出
MySQL导出导入常用命令
导入导出的权限
sqlserver导入导出数据库
360网络收藏夹导出
mysql数据库常用导出导入命令的几个用例
如何导入导出MySQL数据库
MySQL数据导入与导出
怎么导出收藏夹| 菜鸟学院
excel导入VB