如何导出百度网盘详细目录结构-超详细的

您所在的位置:网站首页 百度云管家安装目录在哪看 如何导出百度网盘详细目录结构-超详细的

如何导出百度网盘详细目录结构-超详细的

2024-07-09 14:30| 来源: 网络整理| 查看: 265

百度网盘大家都在用,有时候希望把自己的文件目录结构给导出来,能形成一个文件树的形式,无奈网上找了好多资料都无果,大多数说的是在浏览器里控制台下,那个方法已经不适用,而且只能导出一级目录,求人不如求己,无奈之下决定自己动手丰衣足食,下面小编手把手教你怎么把百度云网盘里的文件目录机构给导出来。

首先,你要有百度云管家客户端(注意是PC版的哦),打开其程序所在目录。

右键点击百度云客户端快捷方式---选择“打开文件位置(XP不适用)”,或点属性,查看快捷方式目标,一般在“C:\Users\Administrator\AppData\Roaming\baidu\BaiduYunGuanjia\”位置,打开后可以看到有个user目录,双击打开,如下图所示。

里面有几个文件夹,分别存放各用户文件资料。

打开那个一长串的文件夹,可以看到里面有个“BaiduYunCacheFileV0.db”文件,每个人可能文件名不一样,但是后缀肯定是.db文件,然后是大小最大的那个文件,这个就是存放你网盘的详细信息的数据库了,如下图所示。

如何打开这个数据库呢?

这需要一个软件,Navicat Premium。这里就不提供下载地址了,自己百度去吧,百度的时候在关键字后面加一个绿色免安装,下载的双击就可以用,不用安装了。

打开Navicat Premium,点连接>选择SQLite>常规>现有数据库文件>浏览并选择你的百度云客户端目录中“BaiduYunCacheFileV0.db”文件,点“连接测试”,如显示“连接成功”,点击确定回到主界面,如下图所示。

双击刚才建立的那个百度云管家数据库,出现main,再双击main,点开表,双击cache_file表,如下图所示:

这里就是你的百度网盘上的所有目录结构信息,其中parent_path是路径,server_filename是文件名。接下来就是导出这些信息到文件里,导出的时候可以选择全部导出也可以选择导出自己需要的部分,怎么导出自己需要的部分呢,比如我只需要“教程”文件夹下的内容,看下面的截图:

这样一来出现的都是自己需要的数据了,接下来点击导出按钮,你可以选择全部导出,也可以选择导出部分。

打开导出的文件:

接下来就是怎么把这些信息生成文件树的形式了,下面介绍两种方法:

(方法1)利用PHP程序把xls文件读取生成目录文件夹,然后再利用windows命令生成目录结构。

PHP代码如下:

[php]  view plain  copy  print ?   

运行完这个程序后,找到已经建好的文件夹,打开命令行,如下图所示:

然后再命令窗口输入tree /f > mulu.txt ,回车后你会发现多了个mulu.txt文件,打开看看:

看到没,文件目录树已经生成啦,下面来看第二种方法。

(方法2)利用Excel表格的vba宏命令来实现(默认下没有这个宏,需要自己下载安装)

如果你对VBA有所了解,那就选择这个方法吧,如果不了解的话建议还是选择上一个,下面看代码:

[plain]  view plain  copy  print ? For i = 2 To 37204’数据行数   k = Val(Sheet1.Cells(i, 18))   For z = 0 To k   Sheet1.Cells(i, 21 + z) = "│"   Next   If Sheet1.Cells(i, 13)  Sheet1.Cells(i - 1, 13) Then   strCell = Split(Sheet1.Cells(i, 13), "/")   If UBound(strCell) >= 1 Then Sheet1.Cells(i, 21 + k) = "├" & strCell(UBound(strCell) - 1) Else Sheet1.Cells(i, 21 + k) = "├" & Sheet1.Cells(i, 13)   ' If UBound(strCell) >= 1 Then Sheet1.Cells(i, 21 + k) = strCell(UBound(strCell) - 1) Else Sheet1.Cells(i, 21 + k) = Sheet1.Cells(i, 13)   'Worksheets("Sheet1").Range(Cells(i, 21 + k), Cells(i, 21 + k)).Font.FontStyle = "Bold"   ‘如果是文件夹则设置成红色显示   Worksheets("Sheet1").Range(Cells(i, 21 + k), Cells(i, 21 + k)).Font.ColorIndex = 3   Worksheets("Sheet1").Range(Cells(i, 21 + k), Cells(i, 21 + k)).Select   Selection.Columns.AutoFit   End If   If Sheet1.Cells(i, 7) = 0 Then   Sheet1.Cells(i, 21 + k + 1) = "├" & Sheet1.Cells(i, 3)   If Val(Sheet1.Cells(i, 4)) >= 1048576 Then’文件大小,小于1M的以K表示   Sheet1.Cells(i, 20) = Format(CStr(Val(Sheet1.Cells(i, 4) / 1024 / 1024)), "######0.##")& "M"   Else   Sheet1.Cells(i, 20) = Format(CStr(Val(Sheet1.Cells(i, 4) / 1024)), "######0.##") & "K"   End If   'Sheet1.Cells(i, 21 + k + 1) = Sheet1.Cells(i, 3)   Else   'Sheet1.Cells(i, 21 + k + 1) = Sheet1.Cells(i, 3)   'Worksheets("Sheet1").Range(Cells(i, 21 + k + 1), Cells(i, 21 + k + 1)).Font.ColorIndex = 5   End If   Next  

生成目录树后复制到词本里是这个样子的:

以上是两种方法,供大家参考。



【本文地址】


今日新闻


推荐新闻


CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3