主题：手机端每次重新进入都很慢

Dim endpoint As String = "https://oss-cn-shenzhen.aliyuncs.com"  '你的阿里云oss地域节点

Dim accessKeyId As String = "xxxxxxxxxxxxxxxx"

Dim accessKeySecret As String = "xxxxxxxxxxxxxxxx"

Dim bucketName As String ="mbldt"   '存储空间的名称

Dim client As New Aliyun.OSS.OssClient(endpoint, accessKeyId, accessKeySecret) '根据SDK创建阿里云oss对象

Try

    '设置要删除的文件列表---

    Dim DeleteFiles As New List(Of String)

    DeleteFiles.Add("demo1/2.zip")

    DeleteFiles.Add("demo1/我的记事本.txt")

    '设置要删除的文件列表---

    Dim request = New Aliyun.OSS.DeleteObjectsRequest(bucketName, DeleteFiles, False)

    client.DeleteObjects(request)

    MessageBox.show("删除成功")

Catch ex As Exception

    MessageBox.show("删除失败,原因" & ex.Message)

End Try

弄一个按妞，把我表格没有的文件全部删掉