#vba #sharepoint-2013
#vba #sharepoint-2013
Вопрос:
Я пытаюсь обновить список 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, чтобы включить вложенные папки, однако это выдает синтаксическую ошибку.
Может кто-нибудь, пожалуйста, помочь мне, как перейти к обновлению списка во вложенных папках.
Спасибо
Комментарии:
1. Подойдет ли для вашей цели использование ListObject вместо ADO? Вы можете проверить здесь , чтобы увидеть.
2. Здравствуйте, прошу прощения, я пропустил упомянуть, что я пытаюсь это сделать в Outlook. Итак, когда приходит письмо, оно регистрируется в sharepoint в соответствующем году и месяце. У меня уже есть код обработчика событий, который активируется при получении почты, и код функции Get folder, чтобы найти папку готовой. Есть ли способ в инструкции My Sql, которым я могу выбрать подпапку, а не основную. Спасибо
3. Здравствуйте. Также хотел узнать, как обновить средство выбора пользователей, поскольку оно выдает несоответствие типа ошибки. Ценю вашу помощь