测试 google 驱动器中是否存在文件夹

Question

我想知道 google 驱动器中是否存在文件夹（子文件夹），在此 page 中搜索后，我尝试这样做，我创建了一个布尔函数 return 如果文件夹存在则为真。

这里是布尔函数的代码

 Public Function exist(v As String) As Boolean
    Dim pag As String
    Dim req = Service.Files.List()
    req.Q = "application/vnd.google-apps.folder"
    req.PageToken = pag
    Dim result = req.Execute()
    If (result.NextPageToken IsNot Nothing) Then
        Return False
    Else
        Return True
    End If

End Function

这里我怎么称呼它

 If (exist(dat_sauv.SelectedItem) = False) Then
        MessageBox.Show("folder exist")

    End If

例外是

异常已在本指令中的现有方法中消除

模糊结果 = req.Execute()

我的方法对不对？你能帮帮我吗

Answer 1

你的代码有两个问题。

查询不当

你的线路req.Q = "application/vnd.google-apps.folder" 应该是

req.Q = "mimeType='application/vnd.google-apps.folder' and name = '"+v+"' and trashed=false" 您可能需要整理引用和转义（即不要 copy/paste 并期望它第一次工作）

使用 nextPageToken

nextpageToken 的存在不会指示文件夹的存在。相反，您需要检查响应中的文件数组是否有 >0 个元素。

测试 google 驱动器中是否存在文件夹

test if a folder exist or not in google drive

vb.net

google-drive-api

directory

exists