VBA для обновления списка sharepoint внутри папки - PullRequest
0 голосов
/ 10 марта 2019

Я пытаюсь обновить список sharepoint внутри папки. Структура нас, как показано ниже

NewGLJE Log_List_New: 2018: 12 декабря 18

С помощью приведенного ниже кода я могу добавить в основную папку новый элемент NewGLJE Log_List_New, однако хочу обновить в папке 12 декабря 18. код ниже

Option Explicit
Sub AddNew_SP()
Dim cnt As ADODB.Connection
Dim rst As ADODB.Recordset
Dim mySQL As String

Set cnt = New ADODB.Connection
Set rst = New ADODB.Recordset

mySQL = "SELECT * FROM [NewGLJE Log_List_New];"


With cnt
    .ConnectionString = _
    "Provider=Microsoft.ACE.OLEDB.12.0;WSS;IMEX=0;RetrieveIds=Yes;DATABASE=http://staging.gl.firstam.net/sites/IFSC/GL/;LIST={71D20BD2-393D-4055-AFC7-476BB8776DE3};"
    .Open
End With

rst.Open mySQL, cnt, adOpenDynamic, adLockOptimistic

rst.AddNew
    rst.Fields("JE/Batch Name") = "JE1234Test"
    rst.Fields("Division") = "DBS"
    rst.Fields("Description") = "TEST"
    rst.Fields("Control Total") = "10000"
rst.Update

If CBool(rst.State And adStateOpen) = True Then rst.Close
Set rst = Nothing
If CBool(cnt.State And adStateOpen) = True Then cnt.Close
Set cnt = Nothing

End Sub

Я попытался отредактировать оператор sql, включив в него вложенные папки, однако это привело к синтаксической ошибке.

Может кто-нибудь помочь мне, как добраться до обновления списка в подпапках.

Спасибо

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...