微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

在 VBS 中使用 CSOM

如何解决在 VBS 中使用 CSOM

我们使用的软件可让您通过集成的 VBS 编辑器扩展其功能在这个系统中,我需要使用 CSOM 编写一个到我们 SharePoint Online 的接口脚本,以检查一些文件文件夹。

我的问题是我找不到创建必要 COM 对象的方法。我正在尝试 Nilpo 发布的针对一个有点类似的问题 Using DLLs in VBScript 的答案,但它不起作用。

Dim CTX
Dim CSOMBasePath

CSOMBasePath = "C:\MyPath\Microsoft\SharePoint SDK\Microsoft.SharePointOnline.CSOM.16.1.21116.12000\lib\"

on error resume next
Set CTX = Getobject(CSOMBasePath & "net40-full\Microsoft.SharePoint.Client.dll","SharePoint.Client.ClientContext")
Set CTX = Getobject(CSOMBasePath & "net40-full\Microsoft.SharePoint.Client.dll","ClientContext")
Set CTX = Getobject(CSOMBasePath & "net40-full\Microsoft.SharePoint.Client.dll","Client.ClientContext")
Set CTX = Getobject(CSOMBasePath & "net40-full\Microsoft.SharePoint.Client.dll","Microsoft.SharePoint.Client.ClientContext")

Set CTX = Getobject(CSOMBasePath & "net45\Microsoft.SharePoint.Client.dll","SharePoint.Client.ClientContext")
Set CTX = Getobject(CSOMBasePath & "net45\Microsoft.SharePoint.Client.dll","ClientContext")
Set CTX = Getobject(CSOMBasePath & "net45\Microsoft.SharePoint.Client.dll","Client.ClientContext")
Set CTX = Getobject(CSOMBasePath & "net45\Microsoft.SharePoint.Client.dll","Microsoft.SharePoint.Client.ClientContext")

Set CTX = Getobject(CSOMBasePath & "netstandard2.0\Microsoft.SharePoint.Client.dll","SharePoint.Client.ClientContext")
Set CTX = Getobject(CSOMBasePath & "netstandard2.0\Microsoft.SharePoint.Client.dll","ClientContext")
Set CTX = Getobject(CSOMBasePath & "netstandard2.0\Microsoft.SharePoint.Client.dll","Client.ClientContext")
Set CTX = Getobject(CSOMBasePath & "netstandard2.0\Microsoft.SharePoint.Client.dll","Microsoft.SharePoint.Client.ClientContext")

If CTX Is nothing Then
    MsgBox "No CTX"
End If

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。