【发布时间】:2018-01-15 16:31:02
【问题描述】:
我想用 vb.net 验证文件是否存在于谷歌驱动器中,文件路径在子文件夹中。我创建了 existsfile 方法,其中列出了子文件夹和列表文件并使用了测试,但总是 countfile=0 。 这是existfile方法代码
Public Function existfile(v As String) As String
Dim page As String = ""
Dim req = Service.Files.List()
req.Q = "mimeType = 'application/vnd.google-apps.file' and trashed = false "
req.Spaces = "drive"
req.Fields = "nextPageToken, items(id, title)"
req.PageToken = page
Dim result = req.Execute()
' sous doc
Dim ref = Service.Files.List()
ref.Q = "mimeType = 'application/vnd.google-apps.folder' and trashed = false "
Dim fo = ref.Execute()
'récuprer la reference (ID) du dossier existant , sinon la fonction retourne false en cas d'inexistance'
Const a As String = "false"
For Each listf In fo.Items
For Each test In result.Items
If (test.Title = v) Then
Return (test.Id)
End If
Next
Next
Return (a)
End Function
每个的第一个是列表文件夹,第二个是列表文件已经存在,但result.item总是0
文件路径在子文件夹下,子文件夹在大文件夹下
【问题讨论】:
标签: vb.net file google-drive-api exists