Загрузка файлов в Sharepoint - PullRequest
Новая
       7

Загрузка файлов в Sharepoint

0 голосов
/ 03 апреля 2020

Я нашел этот код VBA в Интернете, который позволяет загружать файлы в SharePoint. Но я получаю сообщение об ошибке в 

FS.CopyFile LocalAddress, SharepointAddress

, в котором говорится об ошибке времени выполнения '5': недопустимый вызов процедуры или аргумент 

Sub UploadFileToSharepoint()
   Dim SharepointAddress As String
   Dim LocalAddress As String
   Dim objNet As Object
   Dim FS As Object

   'where you will enter Sharepoint location path
   SharepointAddress = "https://website.com/TEST%20FOLDER/My%20Comments?Web=1" & "/"

   'where you will enter the file path, ex: Excel file
   LocalAddress = "C:\Users\123456\Desktop\ref\Test File.xlsx"

   Set objNet = CreateObject("WScript.Network")
   Set FS = CreateObject("Scripting.FileSystemObject")

   If FS.FileExists(LocalAddress) Then
      FS.CopyFile LocalAddress, SharepointAddress
   End If

   Set objNet = Nothing
   Set FS = Nothing
End Sub

Надеюсь, вы могли бы выручи меня. Заранее спасибо!

...