查找文件是否在Google相册中

问题描述

最近，我的GDrive根目录中突然出现了一堆（超过8000个！）文件，所有图片和电影。它们似乎来自g Photos，但有些似乎没有出现在Photos中。因此，我决定写点东西来检查每个文件是否都在G Photos中（请参见代码打击）。
编写代码后，我意识到检查URL是否有效始终返回True，所以我走错了路。照片似乎有一个API。
所以我的问题是：

• 此API是否可以从VBA使用（我可以最终学习一些Python了：）
• API是否允许我按文件名搜索图片？

这是我编写的代码（我没有包括3个工作正常的UDF）：

Sub isFileInPhotos()
    Dim files,c As Range
    Dim baseUrl As String,baseFolder As String
    baseFolder = "\\Synoxyz\photo\900000 Gdrive pics\someFolder\"
    baseUrl = "https://photos.google.com/search/"
    
    files = GetFileList(baseFolder & "*.*")
    Sheet1.Range("a1:a30") = WorksheetFunction.Transpose(files)
    
    For Each c In Sheet1.Range("a1:a30").Cells
        c.Offset(0,1) = baseUrl & WorksheetFunction.EncodeURL(RemoveExt(c.Value2))
        c.Offset(0,2) = URLExists(c.Offset(0,1))   'always True :(
    Next c
    
End Sub

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）