У меня есть функция, которую я использую, чтобы попытаться загрузить файл в корзину s3, вот как это выглядит.
Public Function AddFileToFolder(FileName As String, bucketName As String, folderName As String, ms As MemoryStream) As String
Dim returnval As String = ""
Try
Try
If Not AmazonS3Util.DoesS3BucketExist(s3Client, bucketName) Then
Dim fname() As String = folderName.Split("/")
CreateFolder(bucketName, fname)
Else
Dim path As String = FileName
Dim key As String = String.Format("{0}/{1}", folderName, path)
Dim por As PutObjectRequest = New PutObjectRequest()
por.BucketName = bucketName
por.StorageClass = S3StorageClass.Standard
por.ServerSideEncryptionMethod = ServerSideEncryptionMethod.None
por.CannedACL = S3CannedACL.PublicRead
por.Key = key
por.InputStream = ms
s3Client.PutObject(por)
End If
Catch ex As Exception
returnval = ex.Message
End Try
Catch ex As AmazonS3Exception
returnval = ex.Message
End Try
Return returnval
End Function
, но когда я пытаюсь использовать эту функцию, я просто получаю ошибка, которая гласит: «Возникло исключение:« Amazon.S3.AmazonS3Exception »в AWSSDK.Core.dll»
Если кто-то может помочь мне указать правильное направление, в котором я должен искать ошибку, или Как записать подробный отчет об ошибках, ваше понимание будет высоко оценено.