MyTetra Share
Делитесь знаниями!
Подключить SharePoint как сетевой диск
31.01.2020
23:15
Текстовые метки: VBA_SharePoint
Раздел: !Закладки - VBA - SharePoint


'======================================================================================================

Const CONST_strDisk As String = "X:"

Const CONST_strSite As String = "https://_________________/"

Const CONST_strFile As String = "X:\07 КАЧЕСТВО/ACTIONS_OF_THE_DAY2.xlsx"

Sub Connect_SHarePoint()

Dim spMap As Object


Set spMap = CreateObject("WScript.Network")

Set FSO = CreateObject("Scripting.FileSystemObject")

'MsgBox "Диск " & Disk & " существует = " & FSO.DriveExists(Disk)

If FSO.DriveExists(CONST_strDisk) Then spMap.RemoveNetworkDrive CONST_strDisk, True

spMap.MapNetworkDrive strDisk, CONST_strDisk 'spPath

DoEvents


End Sub

'======================================================================================================

Delete Excel file in SharePoint 2010 library only by using VBA

У меня есть книга Excel. Когда человек нажимает на марку, файлы сохраняются в двух новых папках, необходимо удалить файл Excel в SharePoint.

Я попытался функцию «Kill» в Excel VBA, но говорит, что файл не существует.

функция Убить

Sub DeleteExample3()

'You can use this to delete one xls file in the folder Test

On Error Resume Next

Kill "C:\Users\Ron\Test\ron.xls"

On Error GoTo 0

End Sub

ли какой-либо один имеет успех или пример, убивая файл с помощью VBA ?!

Благодаря

delete vba2,735

Источник Поделиться

Создан 06 сен. 12 boje

  • 2 ответа
  • Сортировка:
  • Активность
  • Возраст
  • Оценка

1

First your code sample points to a file locally stored on a hard drive, not a SharePoint file.

I'm not an expert in VBA but if you want to delete a SharePoint file from within an Excel file (=client application) I would use/call the SharePoint web services. You can delete a file from a SharePoint list using the lists.asmx web service http://{yourserver}/_vti_bin/lists.asmx

Make sure that the user has delete permissions in SharePoint

Источник Поделиться

Создан 07 сен. 12 Wout

  0

HI W0ut, It is correct that correct that i want's to delete a SharePoint file by clicked a macro in a Excel file. I will look into lists.asmx, and see if this is possible. – boje 08 сен. 12


1

простой путь к сетевому диску в папке Sharepoint

Dim spMap As Object, spPath As String


Set spMap = CreateObject("WScript.Network")

spMap.MapNetworkDrive "X:", spPath

DoEvents


Kill "X:\Book1.xls"


spMap.RemoveNetworkDrive "X:", True

проверки, чтобы увидеть, если она существует целый другой вопрос ...

 
MyTetra Share v.0.52
Яндекс индекс цитирования